1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
// rgb.cmd
// Handy array of Surface Evolver's color RGB values in array form.
// Programmer: Ken Brakke, brakke@susqu.edu www.susqu.edu/brakke
define rgb_values real[16][4];
rgb_values := {{ 0.0, 0.0, 0.0, 1.},{ 0.0, 0.0, 1.0, 1.0},{ 0.0, 1.0, 0.0, 1.0},
{ 0.0, 1.0, 1.0, 1.0},{ 1.0, 0.0, 0.0, 1.0},{ 1.0, 0.0, 1.0, 1.0},
{ 1.0, 0.5, 0.0, 1.0},{ 0.6, 0.6, 0.6, 1.0},{ 0.3, 0.3, 0.3, 1.0},
{ 0.3, 0.8, 1.0, 1.0},{ 0.5, 1.0, 0.5, 1.0},{ 0.5, 1.0, 1.0, 1.0},
{ 1.0, 0.5, 0.5, 1.0},{ 1.0, 0.5, 1.0, 1.0},{ 1.0, 1.0, 0.0, 1.0},
{ 1.0, 1.0, 1.0, 1.0}};
|
