#N canvas 897 268 990 532 10;
#X declare -lib Gem;
#X obj -149 -108 gemwin;
#X msg 0 -165 0 \, destroy;
#N canvas 1041 125 450 316 light 0;
#X obj 110 200 declare -lib Gem;
#X obj 113 127 light;
#X obj 249 20 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X msg 249 58 debug \$1;
#X obj 113 12 gemhead 5;
#X connect 2 0 3 0;
#X connect 3 0 1 0;
#X connect 4 0 1 0;
#X restore -103 -108 pd light;
#N canvas 1058 204 362 426 mousemove 0;
#X obj 129 8 gemmouse;
#X obj 136 88 pack;
#X obj 136 110 spigot;
#X obj 136 131 unpack;
#X obj 136 196 t f f;
#X obj 36 16 gemkeyname;
#X obj 36 39 pack 0 s;
#X obj 36 62 route 1;
#X obj 36 84 route space;
#X msg 36 107 0;
#X msg 136 365 view \$2 \$3 \$1 0 0 0 0 1 0;
#X obj 136 173 +;
#X obj 136 221 * -1;
#X obj 201 237 t f f;
#X obj 201 174 +;
#X obj 201 262 * -1;
#X obj 36 129 t f f f;
#X text 61 106 reset;
#N canvas 292 198 304 356 coordinates 0;
#X obj 89 52 inlet;
#X obj 94 331 outlet;
#X obj 193 62 atan;
#X msg 193 41 1;
#X obj 193 84 / 45;
#X obj 193 20 loadbang;
#X text 94 29 r phi theta;
#X obj 89 78 unpack 0 0 0;
#X obj 128 123 *;
#X obj 168 123 *;
#X obj 120 197 cos;
#X obj 150 198 sin;
#X obj 120 166 t f f;
#X obj 183 198 cos;
#X obj 213 199 sin;
#X obj 183 167 t f f;
#X obj 120 230 *;
#X obj 150 231 *;
#X obj 85 275 *;
#X obj 125 275 *;
#X obj 174 277 *;
#X obj 66 242 t f f f;
#X obj 91 308 pack 0 0 0;
#X connect 0 0 7 0;
#X connect 2 0 4 0;
#X connect 3 0 2 0;
#X connect 4 0 9 1;
#X connect 4 0 8 1;
#X connect 5 0 3 0;
#X connect 7 0 21 0;
#X connect 7 1 8 0;
#X connect 7 2 9 0;
#X connect 8 0 12 0;
#X connect 9 0 15 0;
#X connect 10 0 16 0;
#X connect 11 0 17 0;
#X connect 12 0 10 0;
#X connect 12 1 11 0;
#X connect 13 0 16 1;
#X connect 13 0 17 1;
#X connect 14 0 20 1;
#X connect 15 0 13 0;
#X connect 15 1 14 0;
#X connect 16 0 18 1;
#X connect 17 0 19 1;
#X connect 18 0 22 0;
#X connect 19 0 22 1;
#X connect 20 0 22 2;
#X connect 21 0 18 0;
#X connect 21 1 19 0;
#X connect 21 2 20 0;
#X connect 22 0 1 0;
#X restore 136 310 pd coordinates;
#X obj 136 249 t b f;
#X obj 136 289 pack 4 0 0;
#X obj 177 46 t f f;
#X obj 177 67 -;
#X obj 136 45 t f f;
#X obj 136 66 -;
#X obj 278 57 s stay_cube;
#X obj 278 35 select 1;
#X obj 201 151 * 0.5;
#X obj 136 153 * 0.5;
#X obj 201 209 clip -90 90;
#X obj 136 388 outlet;
#X connect 0 0 23 0;
#X connect 0 1 21 0;
#X connect 0 2 2 1;
#X connect 0 4 26 0;
#X connect 1 0 2 0;
#X connect 2 0 3 0;
#X connect 3 0 28 0;
#X connect 4 0 12 0;
#X connect 4 1 11 1;
#X connect 5 0 6 0;
#X connect 5 1 6 1;
#X connect 6 0 7 0;
#X connect 7 0 8 0;
#X connect 8 0 9 0;
#X connect 9 0 16 0;
#X connect 10 0 30 0;
#X connect 11 0 4 0;
#X connect 12 0 19 0;
#X connect 13 0 15 0;
#X connect 13 1 14 1;
#X connect 14 0 29 0;
#X connect 15 0 20 2;
#X connect 16 0 11 0;
#X connect 16 1 11 1;
#X connect 16 1 14 0;
#X connect 16 2 14 1;
#X connect 18 0 10 0;
#X connect 19 0 20 0;
#X connect 19 1 20 1;
#X connect 20 0 18 0;
#X connect 21 0 22 1;
#X connect 21 1 22 0;
#X connect 22 0 1 1;
#X connect 23 0 24 1;
#X connect 23 1 24 0;
#X connect 24 0 1 0;
#X connect 26 0 25 0;
#X connect 27 0 14 0;
#X connect 28 0 11 0;
#X connect 29 0 13 0;
#X restore -103 -132 pd mousemove;
#X obj 161 17 rotateXYZ;
#X obj 161 152 rotateXYZ;
#X msg -149 -165 lighting 1 \, create \, 1;
#X obj 304 196 sphere 1 20;
#X obj 161 196 sphere 0.3 20;
#X obj 161 55 translateXYZ 2.5 0 0;
#X obj -86 -22 gemhead 20;
#X obj -23 141 GLdefine GL_CULL_FACE;
#X obj -23 115 loadbang;
#X obj -86 69 GEMglCullFace;
#X obj -86 165 GEMglEnable;
#X obj -11 24 loadbang;
#X obj -11 46 GLdefine GL_BACK;
#X obj 493 44 GLdefine GL_CULL_FACE;
#X obj 493 18 loadbang;
#X obj 424 68 GEMglDisable;
#X obj 424 -22 gemhead 70;
#X obj 161 -21 gemhead 50;
#X obj 304 -21 gemhead 55;
#X connect 1 0 0 0;
#X connect 3 0 0 0;
#X connect 4 0 9 0;
#X connect 5 0 8 0;
#X connect 6 0 0 0;
#X connect 9 0 5 0;
#X connect 10 0 13 0;
#X connect 11 0 14 1;
#X connect 12 0 11 0;
#X connect 13 0 14 0;
#X connect 15 0 16 0;
#X connect 16 0 13 1;
#X connect 17 0 19 1;
#X connect 18 0 17 0;
#X connect 20 0 19 0;
#X connect 21 0 4 0;
#X connect 22 0 7 0;