#N canvas 484 420 738 394 10;
#X obj 63 50 gemhead;
#X obj 63 108 list;
#X obj 63 136 list trim;
#X obj 531 322 gemwin;
#X msg 530 302 0 \, destroy;
#X text 120 116 == [any] from IEMLIB;
#N canvas 0 0 450 300 repeat 1;
#X obj 181 204 list trim;
#X obj 181 139 until;
#X obj 181 112 f 10;
#X obj 238 48 inlet;
#X obj 181 48 inlet;
#X obj 238 78 t f;
#X obj 181 236 outlet;
#X obj 181 176 list;
#X obj 181 80 t b a;
#X connect 0 0 6 0;
#X connect 1 0 7 0;
#X connect 2 0 1 0;
#X connect 3 0 5 0;
#X connect 4 0 8 0;
#X connect 5 0 2 1;
#X connect 7 0 0 0;
#X connect 8 0 2 0;
#X connect 8 1 7 1;
#X restore 312 171 pd repeat;
#X obj 312 107 gemhead;
#X obj 312 246 rotateXYZ;
#X floatatom 341 222 5 0 0 0 - - -;
#X obj 167 76 world_light;
#X obj 167 45 gemhead;
#X obj 314 274 color 1 0 0;
#X obj 314 302 square 0.1;
#X obj 312 200 translateXYZ 0.3 0.5 0;
#X obj 63 237 circle 0.1;
#X obj 63 206 color 0.7 0.7 0;
#X floatatom 370 148 5 0 0 0 - - -;
#X floatatom 413 174 5 0 0 0 - - -;
#X obj 312 146 spigot;
#X obj 349 126 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0
1;
#X msg 578 278 0 \, destroy \, lighting 1 \, create \, 1;
#X obj 530 229 select 0 1 2;
#X obj 530 209 hradio 15 1 0 3 empty empty empty 0 -6 0 8 -262144 -1
-1 0;
#X msg 546 254 create \, lighting 0 \, 1;
#X text 307 42 This works \, but gives lots of "consistency-check failed"
messages -- and crashes with lighting on:;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 2 0 16 0;
#X connect 4 0 3 0;
#X connect 6 0 14 0;
#X connect 7 0 19 0;
#X connect 8 0 12 0;
#X connect 9 0 8 2;
#X connect 9 0 8 3;
#X connect 11 0 10 0;
#X connect 12 0 13 0;
#X connect 14 0 8 0;
#X connect 16 0 15 0;
#X connect 17 0 6 1;
#X connect 18 0 14 2;
#X connect 19 0 6 0;
#X connect 20 0 19 1;
#X connect 21 0 3 0;
#X connect 22 0 4 0;
#X connect 22 1 24 0;
#X connect 22 2 21 0;
#X connect 23 0 22 0;
#X connect 24 0 3 0;