ViewVC Help
View File | Revision Log | Show Annotations | Download File | Root Listing
root/radiance/ray/test/renders/ref/combined.rad
Revision: 1.1
Committed: Sun Nov 18 16:37:32 2018 UTC (6 years, 5 months ago) by greg
Branch: MAIN
Log Message:
Added xform test and avoided race condition for building octrees with -j > 1

File Contents

# User Rev Content
1 greg 1.1 # xform -n i0
2     # RCSid $Id: basic.mat,v 1.1 2018/11/17 22:09:12 greg Exp $
3     # Basic materials used for walls, etc.
4    
5     void plastic wall_mat
6     0
7     0
8     5 0.5 0.5 0.5 0 0
9    
10     void plastic ceil_mat
11     0
12     0
13     5 0.7 0.7 0.7 0 0
14    
15     void plastic floor_mat
16     0
17     0
18     5 0.3 0.2 0.1 0.02 0.04
19    
20     void plastic black_outside
21     0
22     0
23     5 0.05 0.05 0.05 0 0
24     # RCSid $Id: chrome.mat,v 1.1 2018/11/17 22:09:12 greg Exp $
25    
26     void metal chrome
27     0
28     0
29     5 0.6 0.6 0.75 1 0
30     # RCSid $Id: gold.mat,v 1.1 2018/11/17 22:09:12 greg Exp $
31    
32     void metal gold
33     0
34     0
35     5 0.99717 0.781957 0.334172 1 0
36     # RCSid $Id: sunset_sky.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
37     # A photographed sunset taken on Nov. 6 2018, Berkeley CA
38     # Artificial sun source scaled to cover circumsolar
39    
40     void colorpict sunset_pat
41     9 red green blue sunset.hdr fisheye.cal fish_u fish_v -rz 90
42     0
43     0
44    
45     sunset_pat glow sky_glow
46     0
47     0
48     4 37 37 37 0
49    
50     sky_glow source i0.west_sky
51     0
52     0
53     4 -1 0 0 180
54    
55     void light sol_light
56     0
57     0
58     3 25000 25000 25000
59    
60     sol_light source i0.bigsun
61     0
62     0
63     4 -0.9338 -0.35 0.001 1
64     # xform -n dielectric.1 -t 0 0 0
65     # RCSid $Id: diorama_walls.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
66     # Walls of our diorama
67     # xform -ry -90
68     # genprism black_outside wall 10 -.1 -.1 -.1 5.1 3.1 5.1 3.1 -.1 -.1 -.1 0 0 3 0 3 5 0 5 0 0 -l 0 0 8 -c
69    
70     black_outside polygon dielectric.1.wall.b
71     0
72     0
73     30
74     -6.12323399574e-18 -0.1 -0.1
75     -6.12323399574e-18 5.1 -0.1
76     1.89820253868e-16 5.1 3.1
77     1.89820253868e-16 -0.1 3.1
78     -6.12323399574e-18 -0.1 -0.1
79     0 0 0
80     1.83697019872e-16 0 3
81     1.83697019872e-16 5 3
82     0 5 0
83     0 0 0
84    
85     black_outside polygon dielectric.1.wall.t
86     0
87     0
88     30
89     -8 0 4.89858719659e-16
90     -8 5 4.89858719659e-16
91     -8 5 3
92     -8 0 3
93     -8 0 4.89858719659e-16
94     -8 -0.1 -0.1
95     -8 -0.1 3.1
96     -8 5.1 3.1
97     -8 5.1 -0.1
98     -8 -0.1 -0.1
99    
100     black_outside polygon dielectric.1.wall.1
101     0
102     0
103     12
104     -6.12323399574e-18 -0.1 -0.1
105     -8 -0.1 -0.1
106     -8 5.1 -0.1
107     -6.12323399574e-18 5.1 -0.1
108    
109     black_outside polygon dielectric.1.wall.2
110     0
111     0
112     12
113     -6.12323399574e-18 5.1 -0.1
114     -8 5.1 -0.1
115     -8 5.1 3.1
116     1.89820253868e-16 5.1 3.1
117    
118     black_outside polygon dielectric.1.wall.3
119     0
120     0
121     12
122     1.89820253868e-16 5.1 3.1
123     -8 5.1 3.1
124     -8 -0.1 3.1
125     1.89820253868e-16 -0.1 3.1
126    
127     black_outside polygon dielectric.1.wall.4
128     0
129     0
130     12
131     1.89820253868e-16 -0.1 3.1
132     -8 -0.1 3.1
133     -8 -0.1 -0.1
134     -6.12323399574e-18 -0.1 -0.1
135     # black_outside polygon wall.5
136     # 0
137     # 0
138     # 12
139     # -6.12323399574e-18 -0.1 -0.1
140     # -8 -0.1 -0.1
141     # -8 0 4.89858719659e-16
142     # 0 0 0
143    
144     wall_mat polygon dielectric.1.wall.6
145     0
146     0
147     12
148     0 0 0
149     -8 0 4.89858719659e-16
150     -8 0 3
151     1.83697019872e-16 0 3
152    
153     ceil_mat polygon dielectric.1.wall.7
154     0
155     0
156     12
157     1.83697019872e-16 0 3
158     -8 0 3
159     -8 5 3
160     1.83697019872e-16 5 3
161    
162     wall_mat polygon dielectric.1.wall.8
163     0
164     0
165     12
166     1.83697019872e-16 5 3
167     -8 5 3
168     -8 5 4.89858719659e-16
169     0 5 0
170    
171     floor_mat polygon dielectric.1.wall.9
172     0
173     0
174     12
175     0 5 0
176     -8 5 4.89858719659e-16
177     -8 0 4.89858719659e-16
178     0 0 0
179     # RCSid $Id: rect_opening.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
180     # Rectangular opening cut in end wall
181     # xform -ry -90 -t -8 0 0
182     # genprism wall_mat end_wall 10 -.1 -.1 -.1 5.1 3.1 5.1 3.1 -.1 -.1 -.1 1 1 2 1 2 4 1 4 1 1 -l 0 0 .2 -c
183    
184     wall_mat polygon dielectric.1.end_wall.b
185     0
186     0
187     30
188     -8 -0.1 -0.1
189     -8 5.1 -0.1
190     -8 5.1 3.1
191     -8 -0.1 3.1
192     -8 -0.1 -0.1
193     -8 1 1
194     -8 1 2
195     -8 4 2
196     -8 4 1
197     -8 1 1
198    
199     wall_mat polygon dielectric.1.end_wall.t
200     0
201     0
202     30
203     -8.2 1 1
204     -8.2 4 1
205     -8.2 4 2
206     -8.2 1 2
207     -8.2 1 1
208     -8.2 -0.1 -0.1
209     -8.2 -0.1 3.1
210     -8.2 5.1 3.1
211     -8.2 5.1 -0.1
212     -8.2 -0.1 -0.1
213    
214     wall_mat polygon dielectric.1.end_wall.1
215     0
216     0
217     12
218     -8 -0.1 -0.1
219     -8.2 -0.1 -0.1
220     -8.2 5.1 -0.1
221     -8 5.1 -0.1
222    
223     wall_mat polygon dielectric.1.end_wall.2
224     0
225     0
226     12
227     -8 5.1 -0.1
228     -8.2 5.1 -0.1
229     -8.2 5.1 3.1
230     -8 5.1 3.1
231    
232     wall_mat polygon dielectric.1.end_wall.3
233     0
234     0
235     12
236     -8 5.1 3.1
237     -8.2 5.1 3.1
238     -8.2 -0.1 3.1
239     -8 -0.1 3.1
240    
241     wall_mat polygon dielectric.1.end_wall.4
242     0
243     0
244     12
245     -8 -0.1 3.1
246     -8.2 -0.1 3.1
247     -8.2 -0.1 -0.1
248     -8 -0.1 -0.1
249    
250     wall_mat polygon dielectric.1.end_wall.5
251     0
252     0
253     12
254     -8 -0.1 -0.1
255     -8.2 -0.1 -0.1
256     -8.2 1 1
257     -8 1 1
258    
259     wall_mat polygon dielectric.1.end_wall.6
260     0
261     0
262     12
263     -8 1 1
264     -8.2 1 1
265     -8.2 1 2
266     -8 1 2
267    
268     wall_mat polygon dielectric.1.end_wall.7
269     0
270     0
271     12
272     -8 1 2
273     -8.2 1 2
274     -8.2 4 2
275     -8 4 2
276    
277     wall_mat polygon dielectric.1.end_wall.8
278     0
279     0
280     12
281     -8 4 2
282     -8.2 4 2
283     -8.2 4 1
284     -8 4 1
285    
286     wall_mat polygon dielectric.1.end_wall.9
287     0
288     0
289     12
290     -8 4 1
291     -8.2 4 1
292     -8.2 1 1
293     -8 1 1
294     # RCSid $Id: vase.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
295     #
296     # Vase model courtesy Tom Mertens from web page:
297     # http://people.csail.mit.edu/tmertens/textransfer/data
298     # Include acknowledgment in any published work:
299     # "textured 3D model from the MIT CSAIL database"
300     #
301     # Origin is at center of base; Z-axis is up.
302     # Vase is approx. 23cm tall
303     # Moved into middle of room for testing
304     #
305    
306     void colorpict vase_pat
307     13 lim_r lim_g lim_b vase.hdr climit.cal Lu Lv -i 1 -t 0 0 0
308     0
309     3 0.318558228 0.196044229 0.0860372415
310    
311     vase_pat plastic vase_clay
312     0
313     0
314     5 1 1 1 0 0
315    
316     vase_clay mesh dielectric.1.vase
317     17 vase.rtm -t 25 5 130 -s .005 -t -4 2.5 1 -i 1 -t 0 0 0
318     0
319     0
320     # RCSid $Id: rect_fixture.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
321     # xform -s 0.0253999863 -rz 90 -t -4 2.5 2.999
322     #
323     # Wellmade 2 lamp fixture, model 395-12A-248RS
324     #
325     # Dimensions in inches, fixture parallel to y axis, center at origin
326     #
327    
328     void brightdata lum_dist
329     21 flatcorr source/wellmade/395-12A-248RS.dat source.cal src_phi4 src_theta -i 1 -s 0.0253999863 -rz 90 -t -4 2.5 2.999 -i 1 -t 0 0 0
330     0
331     0
332     # this is scaled by 1/area (SI)
333    
334     lum_dist light lum_bright
335     0
336     0
337     3 20 20 20
338     # 3 1.55 1.55 1.55
339    
340     lum_bright polygon dielectric.1.luminaire
341     0
342     0
343     12
344     -3.42215031167 2.22695014727 2.999
345     -4.57784968833 2.22695014728 2.999
346     -4.57784968833 2.77304985273 2.999
347     -3.42215031167 2.77304985272 2.999
348     # RCSid $Id: dielectric_pane.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
349     # Pink glass pane made of two dieletric faces to fit any opening in end wall
350    
351     void dielectric dielectric_pink
352     0
353     0
354     5 0.99 0.1 0.02 1.5 0
355    
356     dielectric_pink polygon dielectric.1.blue_glazing
357     0
358     0
359     12
360     -8.05 0 0
361     -8.05 5 0
362     -8.05 5 3
363     -8.05 0 3
364    
365     dielectric_pink polygon dielectric.1.blue_glazing
366     0
367     0
368     12
369     -8.15 0 3
370     -8.15 5 3
371     -8.15 5 0
372     -8.15 0 0
373     # xform -n glass.2 -t 0 5.1 0
374     # RCSid $Id: diorama_walls.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
375     # Walls of our diorama
376     # xform -ry -90
377     # genprism black_outside wall 10 -.1 -.1 -.1 5.1 3.1 5.1 3.1 -.1 -.1 -.1 0 0 3 0 3 5 0 5 0 0 -l 0 0 8 -c
378    
379     black_outside polygon glass.2.wall.b
380     0
381     0
382     30
383     -6.12323399574e-18 5 -0.1
384     -6.12323399574e-18 10.2 -0.1
385     1.89820253868e-16 10.2 3.1
386     1.89820253868e-16 5 3.1
387     -6.12323399574e-18 5 -0.1
388     0 5.1 0
389     1.83697019872e-16 5.1 3
390     1.83697019872e-16 10.1 3
391     0 10.1 0
392     0 5.1 0
393    
394     black_outside polygon glass.2.wall.t
395     0
396     0
397     30
398     -8 5.1 4.89858719659e-16
399     -8 10.1 4.89858719659e-16
400     -8 10.1 3
401     -8 5.1 3
402     -8 5.1 4.89858719659e-16
403     -8 5 -0.1
404     -8 5 3.1
405     -8 10.2 3.1
406     -8 10.2 -0.1
407     -8 5 -0.1
408    
409     black_outside polygon glass.2.wall.1
410     0
411     0
412     12
413     -6.12323399574e-18 5 -0.1
414     -8 5 -0.1
415     -8 10.2 -0.1
416     -6.12323399574e-18 10.2 -0.1
417    
418     black_outside polygon glass.2.wall.2
419     0
420     0
421     12
422     -6.12323399574e-18 10.2 -0.1
423     -8 10.2 -0.1
424     -8 10.2 3.1
425     1.89820253868e-16 10.2 3.1
426    
427     black_outside polygon glass.2.wall.3
428     0
429     0
430     12
431     1.89820253868e-16 10.2 3.1
432     -8 10.2 3.1
433     -8 5 3.1
434     1.89820253868e-16 5 3.1
435    
436     black_outside polygon glass.2.wall.4
437     0
438     0
439     12
440     1.89820253868e-16 5 3.1
441     -8 5 3.1
442     -8 5 -0.1
443     -6.12323399574e-18 5 -0.1
444     # black_outside polygon wall.5
445     # 0
446     # 0
447     # 12
448     # -6.12323399574e-18 -0.1 -0.1
449     # -8 -0.1 -0.1
450     # -8 0 4.89858719659e-16
451     # 0 0 0
452    
453     wall_mat polygon glass.2.wall.6
454     0
455     0
456     12
457     0 5.1 0
458     -8 5.1 4.89858719659e-16
459     -8 5.1 3
460     1.83697019872e-16 5.1 3
461    
462     ceil_mat polygon glass.2.wall.7
463     0
464     0
465     12
466     1.83697019872e-16 5.1 3
467     -8 5.1 3
468     -8 10.1 3
469     1.83697019872e-16 10.1 3
470    
471     wall_mat polygon glass.2.wall.8
472     0
473     0
474     12
475     1.83697019872e-16 10.1 3
476     -8 10.1 3
477     -8 10.1 4.89858719659e-16
478     0 10.1 0
479    
480     floor_mat polygon glass.2.wall.9
481     0
482     0
483     12
484     0 10.1 0
485     -8 10.1 4.89858719659e-16
486     -8 5.1 4.89858719659e-16
487     0 5.1 0
488     # RCSid $Id: rect_opening.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
489     # Rectangular opening cut in end wall
490     # xform -ry -90 -t -8 0 0
491     # genprism wall_mat end_wall 10 -.1 -.1 -.1 5.1 3.1 5.1 3.1 -.1 -.1 -.1 1 1 2 1 2 4 1 4 1 1 -l 0 0 .2 -c
492    
493     wall_mat polygon glass.2.end_wall.b
494     0
495     0
496     30
497     -8 5 -0.1
498     -8 10.2 -0.1
499     -8 10.2 3.1
500     -8 5 3.1
501     -8 5 -0.1
502     -8 6.1 1
503     -8 6.1 2
504     -8 9.1 2
505     -8 9.1 1
506     -8 6.1 1
507    
508     wall_mat polygon glass.2.end_wall.t
509     0
510     0
511     30
512     -8.2 6.1 1
513     -8.2 9.1 1
514     -8.2 9.1 2
515     -8.2 6.1 2
516     -8.2 6.1 1
517     -8.2 5 -0.1
518     -8.2 5 3.1
519     -8.2 10.2 3.1
520     -8.2 10.2 -0.1
521     -8.2 5 -0.1
522    
523     wall_mat polygon glass.2.end_wall.1
524     0
525     0
526     12
527     -8 5 -0.1
528     -8.2 5 -0.1
529     -8.2 10.2 -0.1
530     -8 10.2 -0.1
531    
532     wall_mat polygon glass.2.end_wall.2
533     0
534     0
535     12
536     -8 10.2 -0.1
537     -8.2 10.2 -0.1
538     -8.2 10.2 3.1
539     -8 10.2 3.1
540    
541     wall_mat polygon glass.2.end_wall.3
542     0
543     0
544     12
545     -8 10.2 3.1
546     -8.2 10.2 3.1
547     -8.2 5 3.1
548     -8 5 3.1
549    
550     wall_mat polygon glass.2.end_wall.4
551     0
552     0
553     12
554     -8 5 3.1
555     -8.2 5 3.1
556     -8.2 5 -0.1
557     -8 5 -0.1
558    
559     wall_mat polygon glass.2.end_wall.5
560     0
561     0
562     12
563     -8 5 -0.1
564     -8.2 5 -0.1
565     -8.2 6.1 1
566     -8 6.1 1
567    
568     wall_mat polygon glass.2.end_wall.6
569     0
570     0
571     12
572     -8 6.1 1
573     -8.2 6.1 1
574     -8.2 6.1 2
575     -8 6.1 2
576    
577     wall_mat polygon glass.2.end_wall.7
578     0
579     0
580     12
581     -8 6.1 2
582     -8.2 6.1 2
583     -8.2 9.1 2
584     -8 9.1 2
585    
586     wall_mat polygon glass.2.end_wall.8
587     0
588     0
589     12
590     -8 9.1 2
591     -8.2 9.1 2
592     -8.2 9.1 1
593     -8 9.1 1
594    
595     wall_mat polygon glass.2.end_wall.9
596     0
597     0
598     12
599     -8 9.1 1
600     -8.2 9.1 1
601     -8.2 6.1 1
602     -8 6.1 1
603     # RCSid $Id: torus.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
604     # A green metal torus with glowing red stripes
605    
606     void metal green_metal
607     0
608     0
609     5 0.1 0.8 0.1 0.6 0.08
610    
611     void glow red_glow
612     0
613     0
614     4 0.8 0.02 0.01 0
615    
616     void mixfunc striped
617     10 green_metal red_glow "if(mod(atan2(Py-A2,Px-A1),PI/10) - PI/20, 1, 0)" . -i 1 -t 0 5.1 0
618     0
619     3 -4 2.5 1.5
620     # xform -ry 52 -s .2 -t -4 2.5 1.5
621     # genrev striped torus sin(2*PI*t) 2+cos(2*PI*t) 32 -s
622    
623     striped texfunc Phong
624     20 rev_dx rev_dy rev_dz rev.cal -i 1 -ry 52 -s .2 -t -4 2.5 1.5 -i 1 -t 0 5.1 0
625     0
626     4 1.48795016716 0 -49.8024616447 149.407384934
627    
628     Phong cone glass.2.torus.1
629     0
630     0
631     8
632     -4 7.6 1.5
633     -3.96925334567 7.6 1.52402191909
634     0.6 0.59615705608
635    
636     striped texfunc Phong
637     20 rev_dx rev_dy rev_dz rev.cal -i 1 -ry 52 -s .2 -t -4 2.5 1.5 -i 1 -t 0 5.1 0
638     0
639     4 1.99036945334 -0.290284677254 1.99036945334 -4.93767924242
640    
641     Phong cone glass.2.torus.2
642     0
643     0
644     8
645     -3.96925334567 7.6 1.52402191909
646     -3.93968826801 7.6 1.54712068931
647     0.59615705608 0.584775906502
648    
649     striped texfunc Phong
650     20 rev_dx rev_dy rev_dz rev.cal -i 1 -ry 52 -s .2 -t -4 2.5 1.5 -i 1 -t 0 5.1 0
651     0
652     4 1.99036945334 -0.471396736826 1.99036945334 -4.86266017104
653    
654     Phong cone glass.2.torus.3
655     0
656     0
657     8
658     -3.93968826801 7.6 1.54712068931
659     -3.9124409364 7.6 1.56840863786
660     0.584775906502 0.56629392246
661    
662     striped texfunc Phong
663     20 rev_dx rev_dy rev_dz rev.cal -i 1 -ry 52 -s .2 -t -4 2.5 1.5 -i 1 -t 0 5.1 0
664     0
665     4 1.99036945334 -0.634393284164 1.99036945334 -4.75374936005
666    
667     Phong cone glass.2.torus.4
668     0
669     0
670     8
671     -3.9124409364 7.6 1.56840863786
672     -3.8885584505 7.6 1.58706768082
673     0.56629392246 0.541421356238
674    
675     striped texfunc Phong
676     20 rev_dx rev_dy rev_dz rev.cal -i 1 -ry 52 -s .2 -t -4 2.5 1.5 -i 1 -t 0 5.1 0
677     0
678     4 1.99036945334 -0.773010453363 1.99036945334 -4.61513219085
679    
680     Phong cone glass.2.torus.5
681     0
682     0
683     8
684     -3.8885584505 7.6 1.58706768082
685     -3.86895860084 7.6 1.60238076164
686     0.541421356238 0.511114046604
687    
688     striped texfunc Phong
689     20 rev_dx rev_dy rev_dz rev.cal -i 1 -ry 52 -s .2 -t -4 2.5 1.5 -i 1 -t 0 5.1 0
690     0
691     4 1.99036945334 -0.881921264348 1.99036945334 -4.45213564351
692    
693     Phong cone glass.2.torus.6
694     0
695     0
696     8
697     -3.86895860084 7.6 1.60238076164
698     -3.85439459867 7.6 1.6137594072
699     0.511114046604 0.476536686474
700    
701     striped texfunc Phong
702     20 rev_dx rev_dy rev_dz rev.cal -i 1 -ry 52 -s .2 -t -4 2.5 1.5 -i 1 -t 0 5.1 0
703     0
704     4 1.99036945334 -0.956940335732 1.99036945334 -4.27102358394
705    
706     Phong cone glass.2.torus.7
707     0
708     0
709     8
710     -3.85439459867 7.6 1.6137594072
711     -3.84542613041 7.6 1.62076634254
712     0.476536686474 0.439018064404
713    
714     striped texfunc Phong
715     20 rev_dx rev_dy rev_dz rev.cal -i 1 -ry 52 -s .2 -t -4 2.5 1.5 -i 1 -t 0 5.1 0
716     0
717     4 1.99036945334 -0.995184726672 1.99036945334 -4.07875604702
718    
719     Phong cone glass.2.torus.8
720     0
721     0
722     8
723     -3.84542613041 7.6 1.62076634254
724     -3.84239784928 7.6 1.62313229507
725     0.439018064404 0.4
726    
727     striped texfunc Phong
728     20 rev_dx rev_dy rev_dz rev.cal -i 1 -ry 52 -s .2 -t -4 2.5 1.5 -i 1 -t 0 5.1 0
729     0
730     4 1.99036945334 -0.995184726672 1.99036945334 -3.88272176636
731    
732     Phong cup glass.2.torus.9
733     0
734     0
735     8
736     -3.84239784928 7.6 1.62313229507
737     -3.84542613041 7.6 1.62076634254
738     0.4 0.360981935596
739    
740     striped texfunc Phong
741     20 rev_dx rev_dy rev_dz rev.cal -i 1 -ry 52 -s .2 -t -4 2.5 1.5 -i 1 -t 0 5.1 0
742     0
743     4 1.99036945334 -0.956940335732 1.99036945334 -3.69045422943
744    
745     Phong cup glass.2.torus.10
746     0
747     0
748     8
749     -3.84542613041 7.6 1.62076634254
750     -3.85439459867 7.6 1.6137594072
751     0.360981935596 0.323463313526
752    
753     striped texfunc Phong
754     20 rev_dx rev_dy rev_dz rev.cal -i 1 -ry 52 -s .2 -t -4 2.5 1.5 -i 1 -t 0 5.1 0
755     0
756     4 1.99036945334 -0.881921264348 1.99036945334 -3.50934216986
757    
758     Phong cup glass.2.torus.11
759     0
760     0
761     8
762     -3.85439459867 7.6 1.6137594072
763     -3.86895860084 7.6 1.60238076164
764     0.323463313526 0.288885953396
765    
766     striped texfunc Phong
767     20 rev_dx rev_dy rev_dz rev.cal -i 1 -ry 52 -s .2 -t -4 2.5 1.5 -i 1 -t 0 5.1 0
768     0
769     4 1.99036945334 -0.773010453363 1.99036945334 -3.34634562253
770    
771     Phong cup glass.2.torus.12
772     0
773     0
774     8
775     -3.86895860084 7.6 1.60238076164
776     -3.8885584505 7.6 1.58706768082
777     0.288885953396 0.258578643762
778    
779     striped texfunc Phong
780     20 rev_dx rev_dy rev_dz rev.cal -i 1 -ry 52 -s .2 -t -4 2.5 1.5 -i 1 -t 0 5.1 0
781     0
782     4 1.99036945334 -0.634393284164 1.99036945334 -3.20772845333
783    
784     Phong cup glass.2.torus.13
785     0
786     0
787     8
788     -3.8885584505 7.6 1.58706768082
789     -3.9124409364 7.6 1.56840863786
790     0.258578643762 0.23370607754
791    
792     striped texfunc Phong
793     20 rev_dx rev_dy rev_dz rev.cal -i 1 -ry 52 -s .2 -t -4 2.5 1.5 -i 1 -t 0 5.1 0
794     0
795     4 1.99036945334 -0.471396736826 1.99036945334 -3.09881764234
796    
797     Phong cup glass.2.torus.14
798     0
799     0
800     8
801     -3.9124409364 7.6 1.56840863786
802     -3.93968826801 7.6 1.54712068931
803     0.23370607754 0.215224093498
804    
805     striped texfunc Phong
806     20 rev_dx rev_dy rev_dz rev.cal -i 1 -ry 52 -s .2 -t -4 2.5 1.5 -i 1 -t 0 5.1 0
807     0
808     4 1.99036945334 -0.290284677254 1.99036945334 -3.02379857096
809    
810     Phong cup glass.2.torus.15
811     0
812     0
813     8
814     -3.93968826801 7.6 1.54712068931
815     -3.96925334567 7.6 1.52402191909
816     0.215224093498 0.20384294392
817    
818     striped texfunc Phong
819     20 rev_dx rev_dy rev_dz rev.cal -i 1 -ry 52 -s .2 -t -4 2.5 1.5 -i 1 -t 0 5.1 0
820     0
821     4 1.99036945334 -0.0980171403296 1.99036945334 -2.98555418002
822    
823     Phong cup glass.2.torus.16
824     0
825     0
826     8
827     -3.96925334567 7.6 1.52402191909
828     -4 7.6 1.5
829     0.20384294392 0.2
830    
831     striped texfunc Phong
832     20 rev_dx rev_dy rev_dz rev.cal -i 1 -ry 52 -s .2 -t -4 2.5 1.5 -i 1 -t 0 5.1 0
833     0
834     4 1.99036945334 0.0980171403296 1.99036945334 -2.98555418002
835    
836     Phong cup glass.2.torus.17
837     0
838     0
839     8
840     -4 7.6 1.5
841     -4.03074665433 7.6 1.47597808091
842     0.2 0.20384294392
843    
844     striped texfunc Phong
845     20 rev_dx rev_dy rev_dz rev.cal -i 1 -ry 52 -s .2 -t -4 2.5 1.5 -i 1 -t 0 5.1 0
846     0
847     4 1.99036945334 0.290284677254 1.99036945334 -3.02379857096
848    
849     Phong cup glass.2.torus.18
850     0
851     0
852     8
853     -4.03074665433 7.6 1.47597808091
854     -4.06031173199 7.6 1.45287931069
855     0.20384294392 0.215224093498
856    
857     striped texfunc Phong
858     20 rev_dx rev_dy rev_dz rev.cal -i 1 -ry 52 -s .2 -t -4 2.5 1.5 -i 1 -t 0 5.1 0
859     0
860     4 1.99036945334 0.471396736826 1.99036945334 -3.09881764234
861    
862     Phong cup glass.2.torus.19
863     0
864     0
865     8
866     -4.06031173199 7.6 1.45287931069
867     -4.0875590636 7.6 1.43159136214
868     0.215224093498 0.23370607754
869    
870     striped texfunc Phong
871     20 rev_dx rev_dy rev_dz rev.cal -i 1 -ry 52 -s .2 -t -4 2.5 1.5 -i 1 -t 0 5.1 0
872     0
873     4 1.99036945334 0.634393284164 1.99036945334 -3.20772845333
874    
875     Phong cup glass.2.torus.20
876     0
877     0
878     8
879     -4.0875590636 7.6 1.43159136214
880     -4.1114415495 7.6 1.41293231918
881     0.23370607754 0.258578643762
882    
883     striped texfunc Phong
884     20 rev_dx rev_dy rev_dz rev.cal -i 1 -ry 52 -s .2 -t -4 2.5 1.5 -i 1 -t 0 5.1 0
885     0
886     4 1.99036945334 0.773010453363 1.99036945334 -3.34634562253
887    
888     Phong cup glass.2.torus.21
889     0
890     0
891     8
892     -4.1114415495 7.6 1.41293231918
893     -4.13104139916 7.6 1.39761923836
894     0.258578643762 0.288885953396
895    
896     striped texfunc Phong
897     20 rev_dx rev_dy rev_dz rev.cal -i 1 -ry 52 -s .2 -t -4 2.5 1.5 -i 1 -t 0 5.1 0
898     0
899     4 1.99036945334 0.881921264348 1.99036945334 -3.50934216986
900    
901     Phong cup glass.2.torus.22
902     0
903     0
904     8
905     -4.13104139916 7.6 1.39761923836
906     -4.14560540133 7.6 1.3862405928
907     0.288885953396 0.323463313526
908    
909     striped texfunc Phong
910     20 rev_dx rev_dy rev_dz rev.cal -i 1 -ry 52 -s .2 -t -4 2.5 1.5 -i 1 -t 0 5.1 0
911     0
912     4 1.99036945334 0.956940335732 1.99036945334 -3.69045422943
913    
914     Phong cup glass.2.torus.23
915     0
916     0
917     8
918     -4.14560540133 7.6 1.3862405928
919     -4.15457386959 7.6 1.37923365746
920     0.323463313526 0.360981935596
921    
922     striped texfunc Phong
923     20 rev_dx rev_dy rev_dz rev.cal -i 1 -ry 52 -s .2 -t -4 2.5 1.5 -i 1 -t 0 5.1 0
924     0
925     4 1.99036945334 0.995184726672 1.99036945334 -3.88272176636
926    
927     Phong cup glass.2.torus.24
928     0
929     0
930     8
931     -4.15457386959 7.6 1.37923365746
932     -4.15760215072 7.6 1.37686770493
933     0.360981935596 0.4
934    
935     striped texfunc Phong
936     20 rev_dx rev_dy rev_dz rev.cal -i 1 -ry 52 -s .2 -t -4 2.5 1.5 -i 1 -t 0 5.1 0
937     0
938     4 1.99036945334 0.995184726672 1.99036945334 -4.07875604702
939    
940     Phong cone glass.2.torus.25
941     0
942     0
943     8
944     -4.15760215072 7.6 1.37686770493
945     -4.15457386959 7.6 1.37923365746
946     0.4 0.439018064404
947    
948     striped texfunc Phong
949     20 rev_dx rev_dy rev_dz rev.cal -i 1 -ry 52 -s .2 -t -4 2.5 1.5 -i 1 -t 0 5.1 0
950     0
951     4 1.99036945334 0.956940335732 1.99036945334 -4.27102358394
952    
953     Phong cone glass.2.torus.26
954     0
955     0
956     8
957     -4.15457386959 7.6 1.37923365746
958     -4.14560540133 7.6 1.3862405928
959     0.439018064404 0.476536686474
960    
961     striped texfunc Phong
962     20 rev_dx rev_dy rev_dz rev.cal -i 1 -ry 52 -s .2 -t -4 2.5 1.5 -i 1 -t 0 5.1 0
963     0
964     4 1.99036945334 0.881921264348 1.99036945334 -4.45213564351
965    
966     Phong cone glass.2.torus.27
967     0
968     0
969     8
970     -4.14560540133 7.6 1.3862405928
971     -4.13104139916 7.6 1.39761923836
972     0.476536686474 0.511114046604
973    
974     striped texfunc Phong
975     20 rev_dx rev_dy rev_dz rev.cal -i 1 -ry 52 -s .2 -t -4 2.5 1.5 -i 1 -t 0 5.1 0
976     0
977     4 1.99036945334 0.773010453363 1.99036945334 -4.61513219085
978    
979     Phong cone glass.2.torus.28
980     0
981     0
982     8
983     -4.13104139916 7.6 1.39761923836
984     -4.1114415495 7.6 1.41293231918
985     0.511114046604 0.541421356238
986    
987     striped texfunc Phong
988     20 rev_dx rev_dy rev_dz rev.cal -i 1 -ry 52 -s .2 -t -4 2.5 1.5 -i 1 -t 0 5.1 0
989     0
990     4 1.99036945334 0.634393284164 1.99036945334 -4.75374936005
991    
992     Phong cone glass.2.torus.29
993     0
994     0
995     8
996     -4.1114415495 7.6 1.41293231918
997     -4.0875590636 7.6 1.43159136214
998     0.541421356238 0.56629392246
999    
1000     striped texfunc Phong
1001     20 rev_dx rev_dy rev_dz rev.cal -i 1 -ry 52 -s .2 -t -4 2.5 1.5 -i 1 -t 0 5.1 0
1002     0
1003     4 1.99036945334 0.471396736826 1.99036945334 -4.86266017104
1004    
1005     Phong cone glass.2.torus.30
1006     0
1007     0
1008     8
1009     -4.0875590636 7.6 1.43159136214
1010     -4.06031173199 7.6 1.45287931069
1011     0.56629392246 0.584775906502
1012    
1013     striped texfunc Phong
1014     20 rev_dx rev_dy rev_dz rev.cal -i 1 -ry 52 -s .2 -t -4 2.5 1.5 -i 1 -t 0 5.1 0
1015     0
1016     4 1.99036945334 0.290284677254 1.99036945334 -4.93767924242
1017    
1018     Phong cone glass.2.torus.31
1019     0
1020     0
1021     8
1022     -4.06031173199 7.6 1.45287931069
1023     -4.03074665433 7.6 1.47597808091
1024     0.584775906502 0.59615705608
1025    
1026     striped texfunc Phong
1027     20 rev_dx rev_dy rev_dz rev.cal -i 1 -ry 52 -s .2 -t -4 2.5 1.5 -i 1 -t 0 5.1 0
1028     0
1029     4 1.48795016716 3.33066907388e-16 -49.8024616447 149.407384934
1030    
1031     Phong cone glass.2.torus.32
1032     0
1033     0
1034     8
1035     -4.03074665433 7.6 1.47597808091
1036     -4 7.6 1.5
1037     0.59615705608 0.6
1038     # RCSid $Id: illum_glass.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
1039     # A clear glazing used to create rectangular illum at window
1040     #@mkillum f=glass_ill c=d d=50 s=64
1041    
1042     void glass glass_clear
1043     0
1044     0
1045     3 0.92 0.92 0.92
1046    
1047     glass_clear polygon glass.2.clear_glazing
1048     0
1049     0
1050     12
1051     -8.1 6.1 1
1052     -8.1 9.1 1
1053     -8.1 9.1 2
1054     -8.1 6.1 2
1055     # xform -n inst.3 -t 0 10.2 0
1056     # RCSid $Id: diorama_walls.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
1057     # Walls of our diorama
1058     # xform -ry -90
1059     # genprism black_outside wall 10 -.1 -.1 -.1 5.1 3.1 5.1 3.1 -.1 -.1 -.1 0 0 3 0 3 5 0 5 0 0 -l 0 0 8 -c
1060    
1061     black_outside polygon inst.3.wall.b
1062     0
1063     0
1064     30
1065     -6.12323399574e-18 10.1 -0.1
1066     -6.12323399574e-18 15.3 -0.1
1067     1.89820253868e-16 15.3 3.1
1068     1.89820253868e-16 10.1 3.1
1069     -6.12323399574e-18 10.1 -0.1
1070     0 10.2 0
1071     1.83697019872e-16 10.2 3
1072     1.83697019872e-16 15.2 3
1073     0 15.2 0
1074     0 10.2 0
1075    
1076     black_outside polygon inst.3.wall.t
1077     0
1078     0
1079     30
1080     -8 10.2 4.89858719659e-16
1081     -8 15.2 4.89858719659e-16
1082     -8 15.2 3
1083     -8 10.2 3
1084     -8 10.2 4.89858719659e-16
1085     -8 10.1 -0.1
1086     -8 10.1 3.1
1087     -8 15.3 3.1
1088     -8 15.3 -0.1
1089     -8 10.1 -0.1
1090    
1091     black_outside polygon inst.3.wall.1
1092     0
1093     0
1094     12
1095     -6.12323399574e-18 10.1 -0.1
1096     -8 10.1 -0.1
1097     -8 15.3 -0.1
1098     -6.12323399574e-18 15.3 -0.1
1099    
1100     black_outside polygon inst.3.wall.2
1101     0
1102     0
1103     12
1104     -6.12323399574e-18 15.3 -0.1
1105     -8 15.3 -0.1
1106     -8 15.3 3.1
1107     1.89820253868e-16 15.3 3.1
1108    
1109     black_outside polygon inst.3.wall.3
1110     0
1111     0
1112     12
1113     1.89820253868e-16 15.3 3.1
1114     -8 15.3 3.1
1115     -8 10.1 3.1
1116     1.89820253868e-16 10.1 3.1
1117    
1118     black_outside polygon inst.3.wall.4
1119     0
1120     0
1121     12
1122     1.89820253868e-16 10.1 3.1
1123     -8 10.1 3.1
1124     -8 10.1 -0.1
1125     -6.12323399574e-18 10.1 -0.1
1126     # black_outside polygon wall.5
1127     # 0
1128     # 0
1129     # 12
1130     # -6.12323399574e-18 -0.1 -0.1
1131     # -8 -0.1 -0.1
1132     # -8 0 4.89858719659e-16
1133     # 0 0 0
1134    
1135     wall_mat polygon inst.3.wall.6
1136     0
1137     0
1138     12
1139     0 10.2 0
1140     -8 10.2 4.89858719659e-16
1141     -8 10.2 3
1142     1.83697019872e-16 10.2 3
1143    
1144     ceil_mat polygon inst.3.wall.7
1145     0
1146     0
1147     12
1148     1.83697019872e-16 10.2 3
1149     -8 10.2 3
1150     -8 15.2 3
1151     1.83697019872e-16 15.2 3
1152    
1153     wall_mat polygon inst.3.wall.8
1154     0
1155     0
1156     12
1157     1.83697019872e-16 15.2 3
1158     -8 15.2 3
1159     -8 15.2 4.89858719659e-16
1160     0 15.2 0
1161    
1162     floor_mat polygon inst.3.wall.9
1163     0
1164     0
1165     12
1166     0 15.2 0
1167     -8 15.2 4.89858719659e-16
1168     -8 10.2 4.89858719659e-16
1169     0 10.2 0
1170     # RCSid $Id: closed_end.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
1171     # A closed wall for the end cap of our diorama
1172     # xform -t -8.2 -.1 -.1
1173     # genbox wall_mat end_wall .2 5.2 3.2
1174    
1175     wall_mat polygon inst.3.end_wall.1540
1176     0
1177     0
1178     12
1179     -8 10.1 -0.1
1180     -8 10.1 3.1
1181     -8.2 10.1 3.1
1182     -8.2 10.1 -0.1
1183    
1184     wall_mat polygon inst.3.end_wall.4620
1185     0
1186     0
1187     12
1188     -8.2 10.1 3.1
1189     -8.2 15.3 3.1
1190     -8.2 15.3 -0.1
1191     -8.2 10.1 -0.1
1192    
1193     wall_mat polygon inst.3.end_wall.2310
1194     0
1195     0
1196     12
1197     -8.2 15.3 -0.1
1198     -8 15.3 -0.1
1199     -8 10.1 -0.1
1200     -8.2 10.1 -0.1
1201    
1202     wall_mat polygon inst.3.end_wall.3267
1203     0
1204     0
1205     12
1206     -8 15.3 -0.1
1207     -8.2 15.3 -0.1
1208     -8.2 15.3 3.1
1209     -8 15.3 3.1
1210    
1211     wall_mat polygon inst.3.end_wall.5137
1212     0
1213     0
1214     12
1215     -8 10.1 3.1
1216     -8 10.1 -0.1
1217     -8 15.3 -0.1
1218     -8 15.3 3.1
1219    
1220     wall_mat polygon inst.3.end_wall.6457
1221     0
1222     0
1223     12
1224     -8.2 15.3 3.1
1225     -8.2 10.1 3.1
1226     -8 10.1 3.1
1227     -8 15.3 3.1
1228     # RCSid $Id: porsches.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
1229     #
1230     # Test of instance primitive and spaces in names and modifiers
1231     #
1232    
1233     void instance "inst.3.porsche #1"
1234     15 porsche.octf -rx 90 -s .15 -t -4 2 1 -i 1 -t 0 10.2 0
1235     0
1236     0
1237    
1238     void ashik2 "ashik mat"
1239     10 1 0 0 . -i 1 -t 0 10.2 0
1240     0
1241     8 0.3 0.1 0.05 0.05 0.05 0.08 5 30
1242    
1243     "ashik mat" instance inst.3.porsche2
1244     15 porsche.octf -rx 90 -s .15 -t -4 3 1 -i 1 -t 0 10.2 0
1245     0
1246     0
1247     # RCSid $Id: spotlights.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
1248     # A pair of spotlights, one pink and one bluish
1249    
1250     void spotlight pink_spotlight
1251     0
1252     0
1253     7 1000 400 200 30
1254     -2.5 1.5 -2
1255    
1256     pink_spotlight ring inst.3.pspot
1257     0
1258     0
1259     8
1260     -2 11.2 2.5
1261     -2.5 1.5 -2
1262     0 0.2
1263    
1264     void spotlight blue_spotlight
1265     0
1266     0
1267     7 200 400 1000 30
1268     -2.5 -1.5 -2
1269    
1270     blue_spotlight ring inst.3.bspot
1271     0
1272     0
1273     8
1274     -2 14.2 2.5
1275     -2.5 -1.5 -2
1276     0 0.2
1277     # RCSid $Id: rect_fixture.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
1278     # xform -s 0.0253999863 -rz 90 -t -4 2.5 2.999
1279     #
1280     # Wellmade 2 lamp fixture, model 395-12A-248RS
1281     #
1282     # Dimensions in inches, fixture parallel to y axis, center at origin
1283     #
1284    
1285     void brightdata lum_dist
1286     21 flatcorr source/wellmade/395-12A-248RS.dat source.cal src_phi4 src_theta -i 1 -s 0.0253999863 -rz 90 -t -4 2.5 2.999 -i 1 -t 0 10.2 0
1287     0
1288     0
1289     # this is scaled by 1/area (SI)
1290    
1291     lum_dist light lum_bright
1292     0
1293     0
1294     3 20 20 20
1295     # 3 1.55 1.55 1.55
1296    
1297     lum_bright polygon inst.3.luminaire
1298     0
1299     0
1300     12
1301     -3.42215031167 12.4269501473 2.999
1302     -4.57784968833 12.4269501473 2.999
1303     -4.57784968833 12.9730498527 2.999
1304     -3.42215031167 12.9730498527 2.999
1305     # xform -n mesh.4 -t 0 15.3 0
1306     # RCSid $Id: diorama_walls.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
1307     # Walls of our diorama
1308     # xform -ry -90
1309     # genprism black_outside wall 10 -.1 -.1 -.1 5.1 3.1 5.1 3.1 -.1 -.1 -.1 0 0 3 0 3 5 0 5 0 0 -l 0 0 8 -c
1310    
1311     black_outside polygon mesh.4.wall.b
1312     0
1313     0
1314     30
1315     -6.12323399574e-18 15.2 -0.1
1316     -6.12323399574e-18 20.4 -0.1
1317     1.89820253868e-16 20.4 3.1
1318     1.89820253868e-16 15.2 3.1
1319     -6.12323399574e-18 15.2 -0.1
1320     0 15.3 0
1321     1.83697019872e-16 15.3 3
1322     1.83697019872e-16 20.3 3
1323     0 20.3 0
1324     0 15.3 0
1325    
1326     black_outside polygon mesh.4.wall.t
1327     0
1328     0
1329     30
1330     -8 15.3 4.89858719659e-16
1331     -8 20.3 4.89858719659e-16
1332     -8 20.3 3
1333     -8 15.3 3
1334     -8 15.3 4.89858719659e-16
1335     -8 15.2 -0.1
1336     -8 15.2 3.1
1337     -8 20.4 3.1
1338     -8 20.4 -0.1
1339     -8 15.2 -0.1
1340    
1341     black_outside polygon mesh.4.wall.1
1342     0
1343     0
1344     12
1345     -6.12323399574e-18 15.2 -0.1
1346     -8 15.2 -0.1
1347     -8 20.4 -0.1
1348     -6.12323399574e-18 20.4 -0.1
1349    
1350     black_outside polygon mesh.4.wall.2
1351     0
1352     0
1353     12
1354     -6.12323399574e-18 20.4 -0.1
1355     -8 20.4 -0.1
1356     -8 20.4 3.1
1357     1.89820253868e-16 20.4 3.1
1358    
1359     black_outside polygon mesh.4.wall.3
1360     0
1361     0
1362     12
1363     1.89820253868e-16 20.4 3.1
1364     -8 20.4 3.1
1365     -8 15.2 3.1
1366     1.89820253868e-16 15.2 3.1
1367    
1368     black_outside polygon mesh.4.wall.4
1369     0
1370     0
1371     12
1372     1.89820253868e-16 15.2 3.1
1373     -8 15.2 3.1
1374     -8 15.2 -0.1
1375     -6.12323399574e-18 15.2 -0.1
1376     # black_outside polygon wall.5
1377     # 0
1378     # 0
1379     # 12
1380     # -6.12323399574e-18 -0.1 -0.1
1381     # -8 -0.1 -0.1
1382     # -8 0 4.89858719659e-16
1383     # 0 0 0
1384    
1385     wall_mat polygon mesh.4.wall.6
1386     0
1387     0
1388     12
1389     0 15.3 0
1390     -8 15.3 4.89858719659e-16
1391     -8 15.3 3
1392     1.83697019872e-16 15.3 3
1393    
1394     ceil_mat polygon mesh.4.wall.7
1395     0
1396     0
1397     12
1398     1.83697019872e-16 15.3 3
1399     -8 15.3 3
1400     -8 20.3 3
1401     1.83697019872e-16 20.3 3
1402    
1403     wall_mat polygon mesh.4.wall.8
1404     0
1405     0
1406     12
1407     1.83697019872e-16 20.3 3
1408     -8 20.3 3
1409     -8 20.3 4.89858719659e-16
1410     0 20.3 0
1411    
1412     floor_mat polygon mesh.4.wall.9
1413     0
1414     0
1415     12
1416     0 20.3 0
1417     -8 20.3 4.89858719659e-16
1418     -8 15.3 4.89858719659e-16
1419     0 15.3 0
1420     # RCSid $Id: closed_end.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
1421     # A closed wall for the end cap of our diorama
1422     # xform -t -8.2 -.1 -.1
1423     # genbox wall_mat end_wall .2 5.2 3.2
1424    
1425     wall_mat polygon mesh.4.end_wall.1540
1426     0
1427     0
1428     12
1429     -8 15.2 -0.1
1430     -8 15.2 3.1
1431     -8.2 15.2 3.1
1432     -8.2 15.2 -0.1
1433    
1434     wall_mat polygon mesh.4.end_wall.4620
1435     0
1436     0
1437     12
1438     -8.2 15.2 3.1
1439     -8.2 20.4 3.1
1440     -8.2 20.4 -0.1
1441     -8.2 15.2 -0.1
1442    
1443     wall_mat polygon mesh.4.end_wall.2310
1444     0
1445     0
1446     12
1447     -8.2 20.4 -0.1
1448     -8 20.4 -0.1
1449     -8 15.2 -0.1
1450     -8.2 15.2 -0.1
1451    
1452     wall_mat polygon mesh.4.end_wall.3267
1453     0
1454     0
1455     12
1456     -8 20.4 -0.1
1457     -8.2 20.4 -0.1
1458     -8.2 20.4 3.1
1459     -8 20.4 3.1
1460    
1461     wall_mat polygon mesh.4.end_wall.5137
1462     0
1463     0
1464     12
1465     -8 15.2 3.1
1466     -8 15.2 -0.1
1467     -8 20.4 -0.1
1468     -8 20.4 3.1
1469    
1470     wall_mat polygon mesh.4.end_wall.6457
1471     0
1472     0
1473     12
1474     -8.2 20.4 3.1
1475     -8.2 15.2 3.1
1476     -8 15.2 3.1
1477     -8 20.4 3.1
1478     # xform -n mesh.plainclothes.5.0 -s 1.5 -rx 90 -rz -80 -t 1 0 0 -i 0 -rz 40 -i 1 -t -5 2.5 0 -t 0 15 0
1479     # RCSid $Id: woman.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
1480     #
1481     # Mesh test with a woman model
1482     #
1483    
1484     void mesh mesh.plainclothes.5.0.woman
1485     27 woman.rtm -i 1 -s 1.5 -rx 90 -rz -80 -t 1 0 0 -i 0 -rz 40 -i 1 -t -5 2.5 0 -t 0 15 0
1486     0
1487     0
1488     # xform -n mesh.plainclothes.5.1 -s 1.5 -rx 90 -rz -80 -t 1 0 0 -i 1 -rz 40 -i 1 -t -5 2.5 0 -t 0 15 0
1489     # RCSid $Id: woman.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
1490     #
1491     # Mesh test with a woman model
1492     #
1493    
1494     void mesh mesh.plainclothes.5.1.woman
1495     27 woman.rtm -i 1 -s 1.5 -rx 90 -rz -80 -t 1 0 0 -i 1 -rz 40 -i 1 -t -5 2.5 0 -t 0 15 0
1496     0
1497     0
1498     # xform -n mesh.plainclothes.5.2 -s 1.5 -rx 90 -rz -80 -t 1 0 0 -i 2 -rz 40 -i 1 -t -5 2.5 0 -t 0 15 0
1499     # RCSid $Id: woman.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
1500     #
1501     # Mesh test with a woman model
1502     #
1503    
1504     void mesh mesh.plainclothes.5.2.woman
1505     27 woman.rtm -i 1 -s 1.5 -rx 90 -rz -80 -t 1 0 0 -i 2 -rz 40 -i 1 -t -5 2.5 0 -t 0 15 0
1506     0
1507     0
1508     # xform -n mesh.plainclothes.5.3 -s 1.5 -rx 90 -rz -80 -t 1 0 0 -i 3 -rz 40 -i 1 -t -5 2.5 0 -t 0 15 0
1509     # RCSid $Id: woman.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
1510     #
1511     # Mesh test with a woman model
1512     #
1513    
1514     void mesh mesh.plainclothes.5.3.woman
1515     27 woman.rtm -i 1 -s 1.5 -rx 90 -rz -80 -t 1 0 0 -i 3 -rz 40 -i 1 -t -5 2.5 0 -t 0 15 0
1516     0
1517     0
1518     # xform -n mesh.plainclothes.5.4 -s 1.5 -rx 90 -rz -80 -t 1 0 0 -i 4 -rz 40 -i 1 -t -5 2.5 0 -t 0 15 0
1519     # RCSid $Id: woman.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
1520     #
1521     # Mesh test with a woman model
1522     #
1523    
1524     void mesh mesh.plainclothes.5.4.woman
1525     27 woman.rtm -i 1 -s 1.5 -rx 90 -rz -80 -t 1 0 0 -i 4 -rz 40 -i 1 -t -5 2.5 0 -t 0 15 0
1526     0
1527     0
1528     # xform -n mesh.plainclothes.5.5 -s 1.5 -rx 90 -rz -80 -t 1 0 0 -i 5 -rz 40 -i 1 -t -5 2.5 0 -t 0 15 0
1529     # RCSid $Id: woman.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
1530     #
1531     # Mesh test with a woman model
1532     #
1533    
1534     void mesh mesh.plainclothes.5.5.woman
1535     27 woman.rtm -i 1 -s 1.5 -rx 90 -rz -80 -t 1 0 0 -i 5 -rz 40 -i 1 -t -5 2.5 0 -t 0 15 0
1536     0
1537     0
1538     # xform -n mesh.plainclothes.5.6 -s 1.5 -rx 90 -rz -80 -t 1 0 0 -i 6 -rz 40 -i 1 -t -5 2.5 0 -t 0 15 0
1539     # RCSid $Id: woman.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
1540     #
1541     # Mesh test with a woman model
1542     #
1543    
1544     void mesh mesh.plainclothes.5.6.woman
1545     27 woman.rtm -i 1 -s 1.5 -rx 90 -rz -80 -t 1 0 0 -i 6 -rz 40 -i 1 -t -5 2.5 0 -t 0 15 0
1546     0
1547     0
1548     # xform -n mesh.plainclothes.5.7 -s 1.5 -rx 90 -rz -80 -t 1 0 0 -i 7 -rz 40 -i 1 -t -5 2.5 0 -t 0 15 0
1549     # RCSid $Id: woman.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
1550     #
1551     # Mesh test with a woman model
1552     #
1553    
1554     void mesh mesh.plainclothes.5.7.woman
1555     27 woman.rtm -i 1 -s 1.5 -rx 90 -rz -80 -t 1 0 0 -i 7 -rz 40 -i 1 -t -5 2.5 0 -t 0 15 0
1556     0
1557     0
1558     # xform -n mesh.plainclothes.5.8 -s 1.5 -rx 90 -rz -80 -t 1 0 0 -i 8 -rz 40 -i 1 -t -5 2.5 0 -t 0 15 0
1559     # RCSid $Id: woman.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
1560     #
1561     # Mesh test with a woman model
1562     #
1563    
1564     void mesh mesh.plainclothes.5.8.woman
1565     27 woman.rtm -i 1 -s 1.5 -rx 90 -rz -80 -t 1 0 0 -i 8 -rz 40 -i 1 -t -5 2.5 0 -t 0 15 0
1566     0
1567     0
1568     # xform -m chrome -n mesh.shiny.6.0 -s 1.5 -rx 90 -rz -105 -t 1 0 0 -rz 20 -i 0 -rz 40 -i 1 -t -5 2.5 0 -t 0 15 0
1569     # RCSid $Id: woman.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
1570     #
1571     # Mesh test with a woman model
1572     #
1573    
1574     chrome mesh mesh.shiny.6.0.woman
1575     29 woman.rtm -i 1 -s 1.5 -rx 90 -rz -105 -t 1 0 0 -rz 20 -i 0 -rz 40 -i 1 -t -5 2.5 0 -t 0 15 0
1576     0
1577     0
1578     # xform -m chrome -n mesh.shiny.6.1 -s 1.5 -rx 90 -rz -105 -t 1 0 0 -rz 20 -i 1 -rz 40 -i 1 -t -5 2.5 0 -t 0 15 0
1579     # RCSid $Id: woman.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
1580     #
1581     # Mesh test with a woman model
1582     #
1583    
1584     chrome mesh mesh.shiny.6.1.woman
1585     29 woman.rtm -i 1 -s 1.5 -rx 90 -rz -105 -t 1 0 0 -rz 20 -i 1 -rz 40 -i 1 -t -5 2.5 0 -t 0 15 0
1586     0
1587     0
1588     # xform -m chrome -n mesh.shiny.6.2 -s 1.5 -rx 90 -rz -105 -t 1 0 0 -rz 20 -i 2 -rz 40 -i 1 -t -5 2.5 0 -t 0 15 0
1589     # RCSid $Id: woman.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
1590     #
1591     # Mesh test with a woman model
1592     #
1593    
1594     chrome mesh mesh.shiny.6.2.woman
1595     29 woman.rtm -i 1 -s 1.5 -rx 90 -rz -105 -t 1 0 0 -rz 20 -i 2 -rz 40 -i 1 -t -5 2.5 0 -t 0 15 0
1596     0
1597     0
1598     # xform -m chrome -n mesh.shiny.6.3 -s 1.5 -rx 90 -rz -105 -t 1 0 0 -rz 20 -i 3 -rz 40 -i 1 -t -5 2.5 0 -t 0 15 0
1599     # RCSid $Id: woman.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
1600     #
1601     # Mesh test with a woman model
1602     #
1603    
1604     chrome mesh mesh.shiny.6.3.woman
1605     29 woman.rtm -i 1 -s 1.5 -rx 90 -rz -105 -t 1 0 0 -rz 20 -i 3 -rz 40 -i 1 -t -5 2.5 0 -t 0 15 0
1606     0
1607     0
1608     # xform -m chrome -n mesh.shiny.6.4 -s 1.5 -rx 90 -rz -105 -t 1 0 0 -rz 20 -i 4 -rz 40 -i 1 -t -5 2.5 0 -t 0 15 0
1609     # RCSid $Id: woman.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
1610     #
1611     # Mesh test with a woman model
1612     #
1613    
1614     chrome mesh mesh.shiny.6.4.woman
1615     29 woman.rtm -i 1 -s 1.5 -rx 90 -rz -105 -t 1 0 0 -rz 20 -i 4 -rz 40 -i 1 -t -5 2.5 0 -t 0 15 0
1616     0
1617     0
1618     # xform -m chrome -n mesh.shiny.6.5 -s 1.5 -rx 90 -rz -105 -t 1 0 0 -rz 20 -i 5 -rz 40 -i 1 -t -5 2.5 0 -t 0 15 0
1619     # RCSid $Id: woman.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
1620     #
1621     # Mesh test with a woman model
1622     #
1623    
1624     chrome mesh mesh.shiny.6.5.woman
1625     29 woman.rtm -i 1 -s 1.5 -rx 90 -rz -105 -t 1 0 0 -rz 20 -i 5 -rz 40 -i 1 -t -5 2.5 0 -t 0 15 0
1626     0
1627     0
1628     # xform -m chrome -n mesh.shiny.6.6 -s 1.5 -rx 90 -rz -105 -t 1 0 0 -rz 20 -i 6 -rz 40 -i 1 -t -5 2.5 0 -t 0 15 0
1629     # RCSid $Id: woman.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
1630     #
1631     # Mesh test with a woman model
1632     #
1633    
1634     chrome mesh mesh.shiny.6.6.woman
1635     29 woman.rtm -i 1 -s 1.5 -rx 90 -rz -105 -t 1 0 0 -rz 20 -i 6 -rz 40 -i 1 -t -5 2.5 0 -t 0 15 0
1636     0
1637     0
1638     # xform -m chrome -n mesh.shiny.6.7 -s 1.5 -rx 90 -rz -105 -t 1 0 0 -rz 20 -i 7 -rz 40 -i 1 -t -5 2.5 0 -t 0 15 0
1639     # RCSid $Id: woman.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
1640     #
1641     # Mesh test with a woman model
1642     #
1643    
1644     chrome mesh mesh.shiny.6.7.woman
1645     29 woman.rtm -i 1 -s 1.5 -rx 90 -rz -105 -t 1 0 0 -rz 20 -i 7 -rz 40 -i 1 -t -5 2.5 0 -t 0 15 0
1646     0
1647     0
1648     # xform -m chrome -n mesh.shiny.6.8 -s 1.5 -rx 90 -rz -105 -t 1 0 0 -rz 20 -i 8 -rz 40 -i 1 -t -5 2.5 0 -t 0 15 0
1649     # RCSid $Id: woman.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
1650     #
1651     # Mesh test with a woman model
1652     #
1653    
1654     chrome mesh mesh.shiny.6.8.woman
1655     29 woman.rtm -i 1 -s 1.5 -rx 90 -rz -105 -t 1 0 0 -rz 20 -i 8 -rz 40 -i 1 -t -5 2.5 0 -t 0 15 0
1656     0
1657     0
1658     # xform -n mirror.7 -t 0 0 3.1
1659     # RCSid $Id: diorama_walls.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
1660     # Walls of our diorama
1661     # xform -ry -90
1662     # genprism black_outside wall 10 -.1 -.1 -.1 5.1 3.1 5.1 3.1 -.1 -.1 -.1 0 0 3 0 3 5 0 5 0 0 -l 0 0 8 -c
1663    
1664     black_outside polygon mirror.7.wall.b
1665     0
1666     0
1667     30
1668     -6.12323399574e-18 -0.1 3
1669     -6.12323399574e-18 5.1 3
1670     1.89820253868e-16 5.1 6.2
1671     1.89820253868e-16 -0.1 6.2
1672     -6.12323399574e-18 -0.1 3
1673     0 0 3.1
1674     1.83697019872e-16 0 6.1
1675     1.83697019872e-16 5 6.1
1676     0 5 3.1
1677     0 0 3.1
1678    
1679     black_outside polygon mirror.7.wall.t
1680     0
1681     0
1682     30
1683     -8 0 3.1
1684     -8 5 3.1
1685     -8 5 6.1
1686     -8 0 6.1
1687     -8 0 3.1
1688     -8 -0.1 3
1689     -8 -0.1 6.2
1690     -8 5.1 6.2
1691     -8 5.1 3
1692     -8 -0.1 3
1693    
1694     black_outside polygon mirror.7.wall.1
1695     0
1696     0
1697     12
1698     -6.12323399574e-18 -0.1 3
1699     -8 -0.1 3
1700     -8 5.1 3
1701     -6.12323399574e-18 5.1 3
1702    
1703     black_outside polygon mirror.7.wall.2
1704     0
1705     0
1706     12
1707     -6.12323399574e-18 5.1 3
1708     -8 5.1 3
1709     -8 5.1 6.2
1710     1.89820253868e-16 5.1 6.2
1711    
1712     black_outside polygon mirror.7.wall.3
1713     0
1714     0
1715     12
1716     1.89820253868e-16 5.1 6.2
1717     -8 5.1 6.2
1718     -8 -0.1 6.2
1719     1.89820253868e-16 -0.1 6.2
1720    
1721     black_outside polygon mirror.7.wall.4
1722     0
1723     0
1724     12
1725     1.89820253868e-16 -0.1 6.2
1726     -8 -0.1 6.2
1727     -8 -0.1 3
1728     -6.12323399574e-18 -0.1 3
1729     # black_outside polygon wall.5
1730     # 0
1731     # 0
1732     # 12
1733     # -6.12323399574e-18 -0.1 -0.1
1734     # -8 -0.1 -0.1
1735     # -8 0 4.89858719659e-16
1736     # 0 0 0
1737    
1738     wall_mat polygon mirror.7.wall.6
1739     0
1740     0
1741     12
1742     0 0 3.1
1743     -8 0 3.1
1744     -8 0 6.1
1745     1.83697019872e-16 0 6.1
1746    
1747     ceil_mat polygon mirror.7.wall.7
1748     0
1749     0
1750     12
1751     1.83697019872e-16 0 6.1
1752     -8 0 6.1
1753     -8 5 6.1
1754     1.83697019872e-16 5 6.1
1755    
1756     wall_mat polygon mirror.7.wall.8
1757     0
1758     0
1759     12
1760     1.83697019872e-16 5 6.1
1761     -8 5 6.1
1762     -8 5 3.1
1763     0 5 3.1
1764    
1765     floor_mat polygon mirror.7.wall.9
1766     0
1767     0
1768     12
1769     0 5 3.1
1770     -8 5 3.1
1771     -8 0 3.1
1772     0 0 3.1
1773     # RCSid $Id: closed_end.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
1774     # A closed wall for the end cap of our diorama
1775     # xform -t -8.2 -.1 -.1
1776     # genbox wall_mat end_wall .2 5.2 3.2
1777    
1778     wall_mat polygon mirror.7.end_wall.1540
1779     0
1780     0
1781     12
1782     -8 -0.1 3
1783     -8 -0.1 6.2
1784     -8.2 -0.1 6.2
1785     -8.2 -0.1 3
1786    
1787     wall_mat polygon mirror.7.end_wall.4620
1788     0
1789     0
1790     12
1791     -8.2 -0.1 6.2
1792     -8.2 5.1 6.2
1793     -8.2 5.1 3
1794     -8.2 -0.1 3
1795    
1796     wall_mat polygon mirror.7.end_wall.2310
1797     0
1798     0
1799     12
1800     -8.2 5.1 3
1801     -8 5.1 3
1802     -8 -0.1 3
1803     -8.2 -0.1 3
1804    
1805     wall_mat polygon mirror.7.end_wall.3267
1806     0
1807     0
1808     12
1809     -8 5.1 3
1810     -8.2 5.1 3
1811     -8.2 5.1 6.2
1812     -8 5.1 6.2
1813    
1814     wall_mat polygon mirror.7.end_wall.5137
1815     0
1816     0
1817     12
1818     -8 -0.1 6.2
1819     -8 -0.1 3
1820     -8 5.1 3
1821     -8 5.1 6.2
1822    
1823     wall_mat polygon mirror.7.end_wall.6457
1824     0
1825     0
1826     12
1827     -8.2 5.1 6.2
1828     -8.2 -0.1 6.2
1829     -8 -0.1 6.2
1830     -8 5.1 6.2
1831     # RCSid $Id: glass_pane.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
1832     # A bluish glass pane to fit any opening in end wall
1833    
1834     void glass glass_blue
1835     0
1836     0
1837     4 0.7 0.9 0.98 1.5
1838    
1839     glass_blue polygon mirror.7.blue_glazing
1840     0
1841     0
1842     12
1843     -8.1 0 3.1
1844     -8.1 5 3.1
1845     -8.1 5 6.1
1846     -8.1 0 6.1
1847     # RCSid $Id: antimatter_portal.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
1848     # Antimatter to cut through window wall with round, bevelled portal
1849     # Couple with closed_end.rad
1850    
1851     void antimatter wall_eraser
1852     1 wall_mat
1853     0
1854     0
1855    
1856     wall_eraser ring mirror.7.outer_portal
1857     0
1858     0
1859     8
1860     -8.201 2.5 4.6
1861     -1 0 0
1862     0 1
1863    
1864     wall_eraser cone mirror.7.side_portal
1865     0
1866     0
1867     8
1868     -8.201 2.5 4.6
1869     -7.999 2.5 4.6
1870     1 1.1
1871    
1872     wall_eraser ring mirror.7.inner_portal
1873     0
1874     0
1875     8
1876     -7.999 2.5 4.6
1877     1 0 0
1878     0 1.1
1879     # RCSid $Id: bubble_in_cube.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
1880     # Red ball inside water cube, test for interface
1881     # Should match ball_in_cube.rad, but using bubble to invert normal
1882    
1883     void dielectric clear_water
1884     0
1885     0
1886     5 0.98 0.98 0.98 1.33 0
1887    
1888     void interface red_interface
1889     0
1890     0
1891     8
1892     0.98 0.98 0.98 1.33
1893     0.98 0.05 0.02 1.6
1894     # xform -t -.5 -.5 -.5 -rz 17 -t -4 2.5 1.5
1895     # genbox clear_water watery 1 1 1
1896    
1897     clear_water polygon mirror.7.watery.1540
1898     0
1899     0
1900     12
1901     -3.37566176966 2.16803347438 4.1
1902     -3.37566176966 2.16803347438 5.1
1903     -4.33196652562 1.87566176966 5.1
1904     -4.33196652562 1.87566176966 4.1
1905    
1906     clear_water polygon mirror.7.watery.4620
1907     0
1908     0
1909     12
1910     -4.33196652562 1.87566176966 5.1
1911     -4.62433823034 2.83196652562 5.1
1912     -4.62433823034 2.83196652562 4.1
1913     -4.33196652562 1.87566176966 4.1
1914    
1915     clear_water polygon mirror.7.watery.2310
1916     0
1917     0
1918     12
1919     -4.62433823034 2.83196652562 4.1
1920     -3.66803347438 3.12433823034 4.1
1921     -3.37566176966 2.16803347438 4.1
1922     -4.33196652562 1.87566176966 4.1
1923    
1924     clear_water polygon mirror.7.watery.3267
1925     0
1926     0
1927     12
1928     -3.66803347438 3.12433823034 4.1
1929     -4.62433823034 2.83196652562 4.1
1930     -4.62433823034 2.83196652562 5.1
1931     -3.66803347438 3.12433823034 5.1
1932    
1933     clear_water polygon mirror.7.watery.5137
1934     0
1935     0
1936     12
1937     -3.37566176966 2.16803347438 5.1
1938     -3.37566176966 2.16803347438 4.1
1939     -3.66803347438 3.12433823034 4.1
1940     -3.66803347438 3.12433823034 5.1
1941    
1942     clear_water polygon mirror.7.watery.6457
1943     0
1944     0
1945     12
1946     -4.62433823034 2.83196652562 5.1
1947     -4.33196652562 1.87566176966 5.1
1948     -3.37566176966 2.16803347438 5.1
1949     -3.66803347438 3.12433823034 5.1
1950    
1951     red_interface bubble mirror.7.red_ruby
1952     0
1953     0
1954     4 -4 2.5 4.6 0.25
1955     # RCSid $Id: mirror.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
1956     #
1957     # A mirror on the Y=5 wall with an alternate material having some pink diffuse
1958     #
1959    
1960     void plastic pink_mirror_mat
1961     0
1962     0
1963     5 0.9 0.5 0.6 0.8 0.015
1964    
1965     void mirror wall_mirror
1966     1 pink_mirror_mat
1967     0
1968     3 0.8 0.8 0.8
1969    
1970     wall_mirror polygon mirror.7.mirror
1971     0
1972     0
1973     12
1974     -5 4.99 4.1
1975     -2 4.99 4.1
1976     -2 4.99 5.1
1977     -5 4.99 5.1
1978     # xform -n mist.8 -t 0 5.1 3.1
1979     # RCSid $Id: diorama_walls.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
1980     # Walls of our diorama
1981     # xform -ry -90
1982     # genprism black_outside wall 10 -.1 -.1 -.1 5.1 3.1 5.1 3.1 -.1 -.1 -.1 0 0 3 0 3 5 0 5 0 0 -l 0 0 8 -c
1983    
1984     black_outside polygon mist.8.wall.b
1985     0
1986     0
1987     30
1988     -6.12323399574e-18 5 3
1989     -6.12323399574e-18 10.2 3
1990     1.89820253868e-16 10.2 6.2
1991     1.89820253868e-16 5 6.2
1992     -6.12323399574e-18 5 3
1993     0 5.1 3.1
1994     1.83697019872e-16 5.1 6.1
1995     1.83697019872e-16 10.1 6.1
1996     0 10.1 3.1
1997     0 5.1 3.1
1998    
1999     black_outside polygon mist.8.wall.t
2000     0
2001     0
2002     30
2003     -8 5.1 3.1
2004     -8 10.1 3.1
2005     -8 10.1 6.1
2006     -8 5.1 6.1
2007     -8 5.1 3.1
2008     -8 5 3
2009     -8 5 6.2
2010     -8 10.2 6.2
2011     -8 10.2 3
2012     -8 5 3
2013    
2014     black_outside polygon mist.8.wall.1
2015     0
2016     0
2017     12
2018     -6.12323399574e-18 5 3
2019     -8 5 3
2020     -8 10.2 3
2021     -6.12323399574e-18 10.2 3
2022    
2023     black_outside polygon mist.8.wall.2
2024     0
2025     0
2026     12
2027     -6.12323399574e-18 10.2 3
2028     -8 10.2 3
2029     -8 10.2 6.2
2030     1.89820253868e-16 10.2 6.2
2031    
2032     black_outside polygon mist.8.wall.3
2033     0
2034     0
2035     12
2036     1.89820253868e-16 10.2 6.2
2037     -8 10.2 6.2
2038     -8 5 6.2
2039     1.89820253868e-16 5 6.2
2040    
2041     black_outside polygon mist.8.wall.4
2042     0
2043     0
2044     12
2045     1.89820253868e-16 5 6.2
2046     -8 5 6.2
2047     -8 5 3
2048     -6.12323399574e-18 5 3
2049     # black_outside polygon wall.5
2050     # 0
2051     # 0
2052     # 12
2053     # -6.12323399574e-18 -0.1 -0.1
2054     # -8 -0.1 -0.1
2055     # -8 0 4.89858719659e-16
2056     # 0 0 0
2057    
2058     wall_mat polygon mist.8.wall.6
2059     0
2060     0
2061     12
2062     0 5.1 3.1
2063     -8 5.1 3.1
2064     -8 5.1 6.1
2065     1.83697019872e-16 5.1 6.1
2066    
2067     ceil_mat polygon mist.8.wall.7
2068     0
2069     0
2070     12
2071     1.83697019872e-16 5.1 6.1
2072     -8 5.1 6.1
2073     -8 10.1 6.1
2074     1.83697019872e-16 10.1 6.1
2075    
2076     wall_mat polygon mist.8.wall.8
2077     0
2078     0
2079     12
2080     1.83697019872e-16 10.1 6.1
2081     -8 10.1 6.1
2082     -8 10.1 3.1
2083     0 10.1 3.1
2084    
2085     floor_mat polygon mist.8.wall.9
2086     0
2087     0
2088     12
2089     0 10.1 3.1
2090     -8 10.1 3.1
2091     -8 5.1 3.1
2092     0 5.1 3.1
2093     # RCSid $Id: closed_end.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
2094     # A closed wall for the end cap of our diorama
2095     # xform -t -8.2 -.1 -.1
2096     # genbox wall_mat end_wall .2 5.2 3.2
2097    
2098     wall_mat polygon mist.8.end_wall.1540
2099     0
2100     0
2101     12
2102     -8 5 3
2103     -8 5 6.2
2104     -8.2 5 6.2
2105     -8.2 5 3
2106    
2107     wall_mat polygon mist.8.end_wall.4620
2108     0
2109     0
2110     12
2111     -8.2 5 6.2
2112     -8.2 10.2 6.2
2113     -8.2 10.2 3
2114     -8.2 5 3
2115    
2116     wall_mat polygon mist.8.end_wall.2310
2117     0
2118     0
2119     12
2120     -8.2 10.2 3
2121     -8 10.2 3
2122     -8 5 3
2123     -8.2 5 3
2124    
2125     wall_mat polygon mist.8.end_wall.3267
2126     0
2127     0
2128     12
2129     -8 10.2 3
2130     -8.2 10.2 3
2131     -8.2 10.2 6.2
2132     -8 10.2 6.2
2133    
2134     wall_mat polygon mist.8.end_wall.5137
2135     0
2136     0
2137     12
2138     -8 5 6.2
2139     -8 5 3
2140     -8 10.2 3
2141     -8 10.2 6.2
2142    
2143     wall_mat polygon mist.8.end_wall.6457
2144     0
2145     0
2146     12
2147     -8.2 10.2 6.2
2148     -8.2 5 6.2
2149     -8 5 6.2
2150     -8 10.2 6.2
2151     # RCSid $Id: ball_in_cube.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
2152     # Red ball inside water cube, test for interface
2153    
2154     void dielectric clear_water
2155     0
2156     0
2157     5 0.98 0.98 0.98 1.33 0
2158    
2159     void interface red_interface
2160     0
2161     0
2162     8
2163     0.98 0.05 0.02 1.6
2164     0.98 0.98 0.98 1.33
2165     # xform -t -.5 -.5 -.5 -rz 17 -t -4 2.5 1.5
2166     # genbox clear_water watery 1 1 1
2167    
2168     clear_water polygon mist.8.watery.1540
2169     0
2170     0
2171     12
2172     -3.37566176966 7.26803347438 4.1
2173     -3.37566176966 7.26803347438 5.1
2174     -4.33196652562 6.97566176966 5.1
2175     -4.33196652562 6.97566176966 4.1
2176    
2177     clear_water polygon mist.8.watery.4620
2178     0
2179     0
2180     12
2181     -4.33196652562 6.97566176966 5.1
2182     -4.62433823034 7.93196652562 5.1
2183     -4.62433823034 7.93196652562 4.1
2184     -4.33196652562 6.97566176966 4.1
2185    
2186     clear_water polygon mist.8.watery.2310
2187     0
2188     0
2189     12
2190     -4.62433823034 7.93196652562 4.1
2191     -3.66803347438 8.22433823034 4.1
2192     -3.37566176966 7.26803347438 4.1
2193     -4.33196652562 6.97566176966 4.1
2194    
2195     clear_water polygon mist.8.watery.3267
2196     0
2197     0
2198     12
2199     -3.66803347438 8.22433823034 4.1
2200     -4.62433823034 7.93196652562 4.1
2201     -4.62433823034 7.93196652562 5.1
2202     -3.66803347438 8.22433823034 5.1
2203    
2204     clear_water polygon mist.8.watery.5137
2205     0
2206     0
2207     12
2208     -3.37566176966 7.26803347438 5.1
2209     -3.37566176966 7.26803347438 4.1
2210     -3.66803347438 8.22433823034 4.1
2211     -3.66803347438 8.22433823034 5.1
2212    
2213     clear_water polygon mist.8.watery.6457
2214     0
2215     0
2216     12
2217     -4.62433823034 7.93196652562 5.1
2218     -4.33196652562 6.97566176966 5.1
2219     -3.37566176966 7.26803347438 5.1
2220     -3.66803347438 8.22433823034 5.1
2221    
2222     red_interface sphere mist.8.red_ruby
2223     0
2224     0
2225     4 -4 7.6 4.6 0.25
2226     # RCSid $Id: mist.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
2227     # Bluish mist suffusing space
2228    
2229     void mist blue_mist
2230     0
2231     0
2232     7 0.1 0.1 0.4 0.9 0.9 0.9 0.3
2233     # xform -t -7.99 .01 .01
2234     # genbox blue_mist smoke 7.98 4.98 2.98
2235    
2236     blue_mist polygon mist.8.smoke.1540
2237     0
2238     0
2239     12
2240     -0.01 5.11 3.11
2241     -0.01 5.11 6.09
2242     -7.99 5.11 6.09
2243     -7.99 5.11 3.11
2244    
2245     blue_mist polygon mist.8.smoke.4620
2246     0
2247     0
2248     12
2249     -7.99 5.11 6.09
2250     -7.99 10.09 6.09
2251     -7.99 10.09 3.11
2252     -7.99 5.11 3.11
2253    
2254     blue_mist polygon mist.8.smoke.2310
2255     0
2256     0
2257     12
2258     -7.99 10.09 3.11
2259     -0.01 10.09 3.11
2260     -0.01 5.11 3.11
2261     -7.99 5.11 3.11
2262    
2263     blue_mist polygon mist.8.smoke.3267
2264     0
2265     0
2266     12
2267     -0.01 10.09 3.11
2268     -7.99 10.09 3.11
2269     -7.99 10.09 6.09
2270     -0.01 10.09 6.09
2271    
2272     blue_mist polygon mist.8.smoke.5137
2273     0
2274     0
2275     12
2276     -0.01 5.11 6.09
2277     -0.01 5.11 3.11
2278     -0.01 10.09 3.11
2279     -0.01 10.09 6.09
2280    
2281     blue_mist polygon mist.8.smoke.6457
2282     0
2283     0
2284     12
2285     -7.99 10.09 6.09
2286     -7.99 5.11 6.09
2287     -0.01 5.11 6.09
2288     -0.01 10.09 6.09
2289     # RCSid $Id: spotlights.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
2290     # A pair of spotlights, one pink and one bluish
2291    
2292     void spotlight pink_spotlight
2293     0
2294     0
2295     7 1000 400 200 30
2296     -2.5 1.5 -2
2297    
2298     pink_spotlight ring mist.8.pspot
2299     0
2300     0
2301     8
2302     -2 6.1 5.6
2303     -2.5 1.5 -2
2304     0 0.2
2305    
2306     void spotlight blue_spotlight
2307     0
2308     0
2309     7 200 400 1000 30
2310     -2.5 -1.5 -2
2311    
2312     blue_spotlight ring mist.8.bspot
2313     0
2314     0
2315     8
2316     -2 9.1 5.6
2317     -2.5 -1.5 -2
2318     0 0.2
2319     # RCSid $Id: spotcones.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
2320     # Mist cones to accompany spotlights
2321    
2322     void mist blue_spot_mist
2323     1 mist.8.bspot
2324     0
2325     0
2326    
2327     blue_spot_mist ring mist.8.blue_spot_start
2328     0
2329     0
2330     8
2331     -1.95 9.13 5.64
2332     2.5 1.5 2
2333     0 0.3
2334    
2335     blue_spot_mist cone mist.8.blue_spot_beam
2336     0
2337     0
2338     8
2339     -1.95 9.13 5.64
2340     -6.95 6.13 1.64
2341     0.3 2.13
2342    
2343     blue_spot_mist ring mist.8.blue_spot_end
2344     0
2345     0
2346     8
2347     -6.95 6.13 1.64
2348     -2.5 -1.5 -2
2349     0 2.13
2350    
2351     void mist pink_spot_mist
2352     1 mist.8.pspot
2353     0
2354     0
2355    
2356     pink_spot_mist ring mist.8.pink_spot_start
2357     0
2358     0
2359     8
2360     -1.95 6.07 5.64
2361     2.5 -1.5 2
2362     0 0.3
2363    
2364     pink_spot_mist cone mist.8.pink_spot_beam
2365     0
2366     0
2367     8
2368     -1.95 6.07 5.64
2369     -6.95 9.07 1.64
2370     0.3 2.13
2371    
2372     pink_spot_mist ring mist.8.pink_spot_end
2373     0
2374     0
2375     8
2376     -6.95 9.07 1.64
2377     -2.5 1.5 -2
2378     0 2.13
2379     # xform -n prism1.9 -t 0 10.2 3.1
2380     # RCSid $Id: diorama_walls.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
2381     # Walls of our diorama
2382     # xform -ry -90
2383     # genprism black_outside wall 10 -.1 -.1 -.1 5.1 3.1 5.1 3.1 -.1 -.1 -.1 0 0 3 0 3 5 0 5 0 0 -l 0 0 8 -c
2384    
2385     black_outside polygon prism1.9.wall.b
2386     0
2387     0
2388     30
2389     -6.12323399574e-18 10.1 3
2390     -6.12323399574e-18 15.3 3
2391     1.89820253868e-16 15.3 6.2
2392     1.89820253868e-16 10.1 6.2
2393     -6.12323399574e-18 10.1 3
2394     0 10.2 3.1
2395     1.83697019872e-16 10.2 6.1
2396     1.83697019872e-16 15.2 6.1
2397     0 15.2 3.1
2398     0 10.2 3.1
2399    
2400     black_outside polygon prism1.9.wall.t
2401     0
2402     0
2403     30
2404     -8 10.2 3.1
2405     -8 15.2 3.1
2406     -8 15.2 6.1
2407     -8 10.2 6.1
2408     -8 10.2 3.1
2409     -8 10.1 3
2410     -8 10.1 6.2
2411     -8 15.3 6.2
2412     -8 15.3 3
2413     -8 10.1 3
2414    
2415     black_outside polygon prism1.9.wall.1
2416     0
2417     0
2418     12
2419     -6.12323399574e-18 10.1 3
2420     -8 10.1 3
2421     -8 15.3 3
2422     -6.12323399574e-18 15.3 3
2423    
2424     black_outside polygon prism1.9.wall.2
2425     0
2426     0
2427     12
2428     -6.12323399574e-18 15.3 3
2429     -8 15.3 3
2430     -8 15.3 6.2
2431     1.89820253868e-16 15.3 6.2
2432    
2433     black_outside polygon prism1.9.wall.3
2434     0
2435     0
2436     12
2437     1.89820253868e-16 15.3 6.2
2438     -8 15.3 6.2
2439     -8 10.1 6.2
2440     1.89820253868e-16 10.1 6.2
2441    
2442     black_outside polygon prism1.9.wall.4
2443     0
2444     0
2445     12
2446     1.89820253868e-16 10.1 6.2
2447     -8 10.1 6.2
2448     -8 10.1 3
2449     -6.12323399574e-18 10.1 3
2450     # black_outside polygon wall.5
2451     # 0
2452     # 0
2453     # 12
2454     # -6.12323399574e-18 -0.1 -0.1
2455     # -8 -0.1 -0.1
2456     # -8 0 4.89858719659e-16
2457     # 0 0 0
2458    
2459     wall_mat polygon prism1.9.wall.6
2460     0
2461     0
2462     12
2463     0 10.2 3.1
2464     -8 10.2 3.1
2465     -8 10.2 6.1
2466     1.83697019872e-16 10.2 6.1
2467    
2468     ceil_mat polygon prism1.9.wall.7
2469     0
2470     0
2471     12
2472     1.83697019872e-16 10.2 6.1
2473     -8 10.2 6.1
2474     -8 15.2 6.1
2475     1.83697019872e-16 15.2 6.1
2476    
2477     wall_mat polygon prism1.9.wall.8
2478     0
2479     0
2480     12
2481     1.83697019872e-16 15.2 6.1
2482     -8 15.2 6.1
2483     -8 15.2 3.1
2484     0 15.2 3.1
2485    
2486     floor_mat polygon prism1.9.wall.9
2487     0
2488     0
2489     12
2490     0 15.2 3.1
2491     -8 15.2 3.1
2492     -8 10.2 3.1
2493     0 10.2 3.1
2494     # RCSid $Id: rect_opening.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
2495     # Rectangular opening cut in end wall
2496     # xform -ry -90 -t -8 0 0
2497     # genprism wall_mat end_wall 10 -.1 -.1 -.1 5.1 3.1 5.1 3.1 -.1 -.1 -.1 1 1 2 1 2 4 1 4 1 1 -l 0 0 .2 -c
2498    
2499     wall_mat polygon prism1.9.end_wall.b
2500     0
2501     0
2502     30
2503     -8 10.1 3
2504     -8 15.3 3
2505     -8 15.3 6.2
2506     -8 10.1 6.2
2507     -8 10.1 3
2508     -8 11.2 4.1
2509     -8 11.2 5.1
2510     -8 14.2 5.1
2511     -8 14.2 4.1
2512     -8 11.2 4.1
2513    
2514     wall_mat polygon prism1.9.end_wall.t
2515     0
2516     0
2517     30
2518     -8.2 11.2 4.1
2519     -8.2 14.2 4.1
2520     -8.2 14.2 5.1
2521     -8.2 11.2 5.1
2522     -8.2 11.2 4.1
2523     -8.2 10.1 3
2524     -8.2 10.1 6.2
2525     -8.2 15.3 6.2
2526     -8.2 15.3 3
2527     -8.2 10.1 3
2528    
2529     wall_mat polygon prism1.9.end_wall.1
2530     0
2531     0
2532     12
2533     -8 10.1 3
2534     -8.2 10.1 3
2535     -8.2 15.3 3
2536     -8 15.3 3
2537    
2538     wall_mat polygon prism1.9.end_wall.2
2539     0
2540     0
2541     12
2542     -8 15.3 3
2543     -8.2 15.3 3
2544     -8.2 15.3 6.2
2545     -8 15.3 6.2
2546    
2547     wall_mat polygon prism1.9.end_wall.3
2548     0
2549     0
2550     12
2551     -8 15.3 6.2
2552     -8.2 15.3 6.2
2553     -8.2 10.1 6.2
2554     -8 10.1 6.2
2555    
2556     wall_mat polygon prism1.9.end_wall.4
2557     0
2558     0
2559     12
2560     -8 10.1 6.2
2561     -8.2 10.1 6.2
2562     -8.2 10.1 3
2563     -8 10.1 3
2564    
2565     wall_mat polygon prism1.9.end_wall.5
2566     0
2567     0
2568     12
2569     -8 10.1 3
2570     -8.2 10.1 3
2571     -8.2 11.2 4.1
2572     -8 11.2 4.1
2573    
2574     wall_mat polygon prism1.9.end_wall.6
2575     0
2576     0
2577     12
2578     -8 11.2 4.1
2579     -8.2 11.2 4.1
2580     -8.2 11.2 5.1
2581     -8 11.2 5.1
2582    
2583     wall_mat polygon prism1.9.end_wall.7
2584     0
2585     0
2586     12
2587     -8 11.2 5.1
2588     -8.2 11.2 5.1
2589     -8.2 14.2 5.1
2590     -8 14.2 5.1
2591    
2592     wall_mat polygon prism1.9.end_wall.8
2593     0
2594     0
2595     12
2596     -8 14.2 5.1
2597     -8.2 14.2 5.1
2598     -8.2 14.2 4.1
2599     -8 14.2 4.1
2600    
2601     wall_mat polygon prism1.9.end_wall.9
2602     0
2603     0
2604     12
2605     -8 14.2 4.1
2606     -8.2 14.2 4.1
2607     -8.2 11.2 4.1
2608     -8 11.2 4.1
2609     # RCSid $Id: prism1.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
2610     # A singe-direction prism
2611    
2612     void prism1 prism1mat
2613     13 coef1 dx1 dy1 dz1 prism.cal -rz 90 -i 1 -t 0 10.2 3.1
2614     0
2615     4 1.52 0.2 0.1 0.2
2616    
2617     prism1mat polygon prism1.9.prism1_window
2618     0
2619     0
2620     12
2621     -8.1 11.2 4.1
2622     -8.1 14.2 4.1
2623     -8.1 14.2 5.1
2624     -8.1 11.2 5.1
2625     # xform -m gold -n prism1.10 -t 0 10.2 3.1
2626     # RCSid $Id: vase.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
2627     #
2628     # Vase model courtesy Tom Mertens from web page:
2629     # http://people.csail.mit.edu/tmertens/textransfer/data
2630     # Include acknowledgment in any published work:
2631     # "textured 3D model from the MIT CSAIL database"
2632     #
2633     # Origin is at center of base; Z-axis is up.
2634     # Vase is approx. 23cm tall
2635     # Moved into middle of room for testing
2636     #
2637    
2638     void colorpict vase_pat
2639     13 lim_r lim_g lim_b vase.hdr climit.cal Lu Lv -i 1 -t 0 10.2 3.1
2640     0
2641     3 0.318558228 0.196044229 0.0860372415
2642    
2643     vase_pat plastic vase_clay
2644     0
2645     0
2646     5 1 1 1 0 0
2647    
2648     gold mesh prism1.10.vase
2649     17 vase.rtm -t 25 5 130 -s .005 -t -4 2.5 1 -i 1 -t 0 10.2 3.1
2650     0
2651     0
2652     # xform -n prism2.11 -t 0 15.3 3.1
2653     # RCSid $Id: diorama_walls.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
2654     # Walls of our diorama
2655     # xform -ry -90
2656     # genprism black_outside wall 10 -.1 -.1 -.1 5.1 3.1 5.1 3.1 -.1 -.1 -.1 0 0 3 0 3 5 0 5 0 0 -l 0 0 8 -c
2657    
2658     black_outside polygon prism2.11.wall.b
2659     0
2660     0
2661     30
2662     -6.12323399574e-18 15.2 3
2663     -6.12323399574e-18 20.4 3
2664     1.89820253868e-16 20.4 6.2
2665     1.89820253868e-16 15.2 6.2
2666     -6.12323399574e-18 15.2 3
2667     0 15.3 3.1
2668     1.83697019872e-16 15.3 6.1
2669     1.83697019872e-16 20.3 6.1
2670     0 20.3 3.1
2671     0 15.3 3.1
2672    
2673     black_outside polygon prism2.11.wall.t
2674     0
2675     0
2676     30
2677     -8 15.3 3.1
2678     -8 20.3 3.1
2679     -8 20.3 6.1
2680     -8 15.3 6.1
2681     -8 15.3 3.1
2682     -8 15.2 3
2683     -8 15.2 6.2
2684     -8 20.4 6.2
2685     -8 20.4 3
2686     -8 15.2 3
2687    
2688     black_outside polygon prism2.11.wall.1
2689     0
2690     0
2691     12
2692     -6.12323399574e-18 15.2 3
2693     -8 15.2 3
2694     -8 20.4 3
2695     -6.12323399574e-18 20.4 3
2696    
2697     black_outside polygon prism2.11.wall.2
2698     0
2699     0
2700     12
2701     -6.12323399574e-18 20.4 3
2702     -8 20.4 3
2703     -8 20.4 6.2
2704     1.89820253868e-16 20.4 6.2
2705    
2706     black_outside polygon prism2.11.wall.3
2707     0
2708     0
2709     12
2710     1.89820253868e-16 20.4 6.2
2711     -8 20.4 6.2
2712     -8 15.2 6.2
2713     1.89820253868e-16 15.2 6.2
2714    
2715     black_outside polygon prism2.11.wall.4
2716     0
2717     0
2718     12
2719     1.89820253868e-16 15.2 6.2
2720     -8 15.2 6.2
2721     -8 15.2 3
2722     -6.12323399574e-18 15.2 3
2723     # black_outside polygon wall.5
2724     # 0
2725     # 0
2726     # 12
2727     # -6.12323399574e-18 -0.1 -0.1
2728     # -8 -0.1 -0.1
2729     # -8 0 4.89858719659e-16
2730     # 0 0 0
2731    
2732     wall_mat polygon prism2.11.wall.6
2733     0
2734     0
2735     12
2736     0 15.3 3.1
2737     -8 15.3 3.1
2738     -8 15.3 6.1
2739     1.83697019872e-16 15.3 6.1
2740    
2741     ceil_mat polygon prism2.11.wall.7
2742     0
2743     0
2744     12
2745     1.83697019872e-16 15.3 6.1
2746     -8 15.3 6.1
2747     -8 20.3 6.1
2748     1.83697019872e-16 20.3 6.1
2749    
2750     wall_mat polygon prism2.11.wall.8
2751     0
2752     0
2753     12
2754     1.83697019872e-16 20.3 6.1
2755     -8 20.3 6.1
2756     -8 20.3 3.1
2757     0 20.3 3.1
2758    
2759     floor_mat polygon prism2.11.wall.9
2760     0
2761     0
2762     12
2763     0 20.3 3.1
2764     -8 20.3 3.1
2765     -8 15.3 3.1
2766     0 15.3 3.1
2767     # RCSid $Id: rect_opening.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
2768     # Rectangular opening cut in end wall
2769     # xform -ry -90 -t -8 0 0
2770     # genprism wall_mat end_wall 10 -.1 -.1 -.1 5.1 3.1 5.1 3.1 -.1 -.1 -.1 1 1 2 1 2 4 1 4 1 1 -l 0 0 .2 -c
2771    
2772     wall_mat polygon prism2.11.end_wall.b
2773     0
2774     0
2775     30
2776     -8 15.2 3
2777     -8 20.4 3
2778     -8 20.4 6.2
2779     -8 15.2 6.2
2780     -8 15.2 3
2781     -8 16.3 4.1
2782     -8 16.3 5.1
2783     -8 19.3 5.1
2784     -8 19.3 4.1
2785     -8 16.3 4.1
2786    
2787     wall_mat polygon prism2.11.end_wall.t
2788     0
2789     0
2790     30
2791     -8.2 16.3 4.1
2792     -8.2 19.3 4.1
2793     -8.2 19.3 5.1
2794     -8.2 16.3 5.1
2795     -8.2 16.3 4.1
2796     -8.2 15.2 3
2797     -8.2 15.2 6.2
2798     -8.2 20.4 6.2
2799     -8.2 20.4 3
2800     -8.2 15.2 3
2801    
2802     wall_mat polygon prism2.11.end_wall.1
2803     0
2804     0
2805     12
2806     -8 15.2 3
2807     -8.2 15.2 3
2808     -8.2 20.4 3
2809     -8 20.4 3
2810    
2811     wall_mat polygon prism2.11.end_wall.2
2812     0
2813     0
2814     12
2815     -8 20.4 3
2816     -8.2 20.4 3
2817     -8.2 20.4 6.2
2818     -8 20.4 6.2
2819    
2820     wall_mat polygon prism2.11.end_wall.3
2821     0
2822     0
2823     12
2824     -8 20.4 6.2
2825     -8.2 20.4 6.2
2826     -8.2 15.2 6.2
2827     -8 15.2 6.2
2828    
2829     wall_mat polygon prism2.11.end_wall.4
2830     0
2831     0
2832     12
2833     -8 15.2 6.2
2834     -8.2 15.2 6.2
2835     -8.2 15.2 3
2836     -8 15.2 3
2837    
2838     wall_mat polygon prism2.11.end_wall.5
2839     0
2840     0
2841     12
2842     -8 15.2 3
2843     -8.2 15.2 3
2844     -8.2 16.3 4.1
2845     -8 16.3 4.1
2846    
2847     wall_mat polygon prism2.11.end_wall.6
2848     0
2849     0
2850     12
2851     -8 16.3 4.1
2852     -8.2 16.3 4.1
2853     -8.2 16.3 5.1
2854     -8 16.3 5.1
2855    
2856     wall_mat polygon prism2.11.end_wall.7
2857     0
2858     0
2859     12
2860     -8 16.3 5.1
2861     -8.2 16.3 5.1
2862     -8.2 19.3 5.1
2863     -8 19.3 5.1
2864    
2865     wall_mat polygon prism2.11.end_wall.8
2866     0
2867     0
2868     12
2869     -8 19.3 5.1
2870     -8.2 19.3 5.1
2871     -8.2 19.3 4.1
2872     -8 19.3 4.1
2873    
2874     wall_mat polygon prism2.11.end_wall.9
2875     0
2876     0
2877     12
2878     -8 19.3 4.1
2879     -8.2 19.3 4.1
2880     -8.2 16.3 4.1
2881     -8 16.3 4.1
2882     # RCSid $Id: prism2.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
2883     # A dual-direction prism
2884    
2885     void prism2 prism2mat
2886     17 coef1 dx1 dy1 dz1 coef2 dx2 dy2 dz2 prism.cal -rz 90 -i 1 -t 0 15.3 3.1
2887     0
2888     4 1.52 0.2 0.1 0.2
2889    
2890     prism2mat polygon prism2.11.prism2_window
2891     0
2892     0
2893     12
2894     -8.1 16.3 4.1
2895     -8.1 19.3 4.1
2896     -8.1 19.3 5.1
2897     -8.1 16.3 5.1
2898     # xform -m gold -n prism2.12 -t 0 15.3 3.1
2899     # RCSid $Id: vase.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
2900     #
2901     # Vase model courtesy Tom Mertens from web page:
2902     # http://people.csail.mit.edu/tmertens/textransfer/data
2903     # Include acknowledgment in any published work:
2904     # "textured 3D model from the MIT CSAIL database"
2905     #
2906     # Origin is at center of base; Z-axis is up.
2907     # Vase is approx. 23cm tall
2908     # Moved into middle of room for testing
2909     #
2910    
2911     void colorpict vase_pat
2912     13 lim_r lim_g lim_b vase.hdr climit.cal Lu Lv -i 1 -t 0 15.3 3.1
2913     0
2914     3 0.318558228 0.196044229 0.0860372415
2915    
2916     vase_pat plastic vase_clay
2917     0
2918     0
2919     5 1 1 1 0 0
2920    
2921     gold mesh prism2.12.vase
2922     17 vase.rtm -t 25 5 130 -s .005 -t -4 2.5 1 -i 1 -t 0 15.3 3.1
2923     0
2924     0
2925     # xform -n tfunc.13 -t 0 0 6.2
2926     # RCSid $Id: basic.mat,v 1.1 2018/11/17 22:09:12 greg Exp $
2927     # Basic materials used for walls, etc.
2928    
2929     void plastic wall_mat
2930     0
2931     0
2932     5 0.5 0.5 0.5 0 0
2933    
2934     void plastic ceil_mat
2935     0
2936     0
2937     5 0.7 0.7 0.7 0 0
2938    
2939     void plastic floor_mat
2940     0
2941     0
2942     5 0.3 0.2 0.1 0.02 0.04
2943    
2944     void plastic black_outside
2945     0
2946     0
2947     5 0.05 0.05 0.05 0 0
2948     # RCSid $Id: diorama_walls.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
2949     # Walls of our diorama
2950     # xform -ry -90
2951     # genprism black_outside wall 10 -.1 -.1 -.1 5.1 3.1 5.1 3.1 -.1 -.1 -.1 0 0 3 0 3 5 0 5 0 0 -l 0 0 8 -c
2952    
2953     black_outside polygon tfunc.13.wall.b
2954     0
2955     0
2956     30
2957     -6.12323399574e-18 -0.1 6.1
2958     -6.12323399574e-18 5.1 6.1
2959     1.89820253868e-16 5.1 9.3
2960     1.89820253868e-16 -0.1 9.3
2961     -6.12323399574e-18 -0.1 6.1
2962     0 0 6.2
2963     1.83697019872e-16 0 9.2
2964     1.83697019872e-16 5 9.2
2965     0 5 6.2
2966     0 0 6.2
2967    
2968     black_outside polygon tfunc.13.wall.t
2969     0
2970     0
2971     30
2972     -8 0 6.2
2973     -8 5 6.2
2974     -8 5 9.2
2975     -8 0 9.2
2976     -8 0 6.2
2977     -8 -0.1 6.1
2978     -8 -0.1 9.3
2979     -8 5.1 9.3
2980     -8 5.1 6.1
2981     -8 -0.1 6.1
2982    
2983     black_outside polygon tfunc.13.wall.1
2984     0
2985     0
2986     12
2987     -6.12323399574e-18 -0.1 6.1
2988     -8 -0.1 6.1
2989     -8 5.1 6.1
2990     -6.12323399574e-18 5.1 6.1
2991    
2992     black_outside polygon tfunc.13.wall.2
2993     0
2994     0
2995     12
2996     -6.12323399574e-18 5.1 6.1
2997     -8 5.1 6.1
2998     -8 5.1 9.3
2999     1.89820253868e-16 5.1 9.3
3000    
3001     black_outside polygon tfunc.13.wall.3
3002     0
3003     0
3004     12
3005     1.89820253868e-16 5.1 9.3
3006     -8 5.1 9.3
3007     -8 -0.1 9.3
3008     1.89820253868e-16 -0.1 9.3
3009    
3010     black_outside polygon tfunc.13.wall.4
3011     0
3012     0
3013     12
3014     1.89820253868e-16 -0.1 9.3
3015     -8 -0.1 9.3
3016     -8 -0.1 6.1
3017     -6.12323399574e-18 -0.1 6.1
3018     # black_outside polygon wall.5
3019     # 0
3020     # 0
3021     # 12
3022     # -6.12323399574e-18 -0.1 -0.1
3023     # -8 -0.1 -0.1
3024     # -8 0 4.89858719659e-16
3025     # 0 0 0
3026    
3027     wall_mat polygon tfunc.13.wall.6
3028     0
3029     0
3030     12
3031     0 0 6.2
3032     -8 0 6.2
3033     -8 0 9.2
3034     1.83697019872e-16 0 9.2
3035    
3036     ceil_mat polygon tfunc.13.wall.7
3037     0
3038     0
3039     12
3040     1.83697019872e-16 0 9.2
3041     -8 0 9.2
3042     -8 5 9.2
3043     1.83697019872e-16 5 9.2
3044    
3045     wall_mat polygon tfunc.13.wall.8
3046     0
3047     0
3048     12
3049     1.83697019872e-16 5 9.2
3050     -8 5 9.2
3051     -8 5 6.2
3052     0 5 6.2
3053    
3054     floor_mat polygon tfunc.13.wall.9
3055     0
3056     0
3057     12
3058     0 5 6.2
3059     -8 5 6.2
3060     -8 0 6.2
3061     0 0 6.2
3062     # RCSid $Id: rect_opening.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
3063     # Rectangular opening cut in end wall
3064     # xform -ry -90 -t -8 0 0
3065     # genprism wall_mat end_wall 10 -.1 -.1 -.1 5.1 3.1 5.1 3.1 -.1 -.1 -.1 1 1 2 1 2 4 1 4 1 1 -l 0 0 .2 -c
3066    
3067     wall_mat polygon tfunc.13.end_wall.b
3068     0
3069     0
3070     30
3071     -8 -0.1 6.1
3072     -8 5.1 6.1
3073     -8 5.1 9.3
3074     -8 -0.1 9.3
3075     -8 -0.1 6.1
3076     -8 1 7.2
3077     -8 1 8.2
3078     -8 4 8.2
3079     -8 4 7.2
3080     -8 1 7.2
3081    
3082     wall_mat polygon tfunc.13.end_wall.t
3083     0
3084     0
3085     30
3086     -8.2 1 7.2
3087     -8.2 4 7.2
3088     -8.2 4 8.2
3089     -8.2 1 8.2
3090     -8.2 1 7.2
3091     -8.2 -0.1 6.1
3092     -8.2 -0.1 9.3
3093     -8.2 5.1 9.3
3094     -8.2 5.1 6.1
3095     -8.2 -0.1 6.1
3096    
3097     wall_mat polygon tfunc.13.end_wall.1
3098     0
3099     0
3100     12
3101     -8 -0.1 6.1
3102     -8.2 -0.1 6.1
3103     -8.2 5.1 6.1
3104     -8 5.1 6.1
3105    
3106     wall_mat polygon tfunc.13.end_wall.2
3107     0
3108     0
3109     12
3110     -8 5.1 6.1
3111     -8.2 5.1 6.1
3112     -8.2 5.1 9.3
3113     -8 5.1 9.3
3114    
3115     wall_mat polygon tfunc.13.end_wall.3
3116     0
3117     0
3118     12
3119     -8 5.1 9.3
3120     -8.2 5.1 9.3
3121     -8.2 -0.1 9.3
3122     -8 -0.1 9.3
3123    
3124     wall_mat polygon tfunc.13.end_wall.4
3125     0
3126     0
3127     12
3128     -8 -0.1 9.3
3129     -8.2 -0.1 9.3
3130     -8.2 -0.1 6.1
3131     -8 -0.1 6.1
3132    
3133     wall_mat polygon tfunc.13.end_wall.5
3134     0
3135     0
3136     12
3137     -8 -0.1 6.1
3138     -8.2 -0.1 6.1
3139     -8.2 1 7.2
3140     -8 1 7.2
3141    
3142     wall_mat polygon tfunc.13.end_wall.6
3143     0
3144     0
3145     12
3146     -8 1 7.2
3147     -8.2 1 7.2
3148     -8.2 1 8.2
3149     -8 1 8.2
3150    
3151     wall_mat polygon tfunc.13.end_wall.7
3152     0
3153     0
3154     12
3155     -8 1 8.2
3156     -8.2 1 8.2
3157     -8.2 4 8.2
3158     -8 4 8.2
3159    
3160     wall_mat polygon tfunc.13.end_wall.8
3161     0
3162     0
3163     12
3164     -8 4 8.2
3165     -8.2 4 8.2
3166     -8.2 4 7.2
3167     -8 4 7.2
3168    
3169     wall_mat polygon tfunc.13.end_wall.9
3170     0
3171     0
3172     12
3173     -8 4 7.2
3174     -8.2 4 7.2
3175     -8.2 1 7.2
3176     -8 1 7.2
3177     # RCSid $Id: gymbal.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
3178     # Test of cylinders, tubes, and BRTDfunc material
3179    
3180     void BRTDfunc brtd_mat
3181     16 .1 .1 .1+if(Rdot-.8,0,.7) .1+if(RdotP-.8,.7,0) .1 .1 0 0 0 . -i 1 -t 0 0 6.2
3182     0
3183     9 0.01 0.01 0.01 0.01 0.1 0.01 0.05 0.05 0.05
3184    
3185     brtd_mat cylinder tfunc.13.cyl1
3186     0
3187     0
3188     7
3189     -4.2 2.5 7.7
3190     -3.8 2.5 7.7
3191     0.5
3192    
3193     brtd_mat tube tfunc.13.tube2
3194     0
3195     0
3196     7
3197     -4 2.3 7.7
3198     -4 2.7 7.7
3199     0.45
3200    
3201     brtd_mat cylinder tfunc.13.cyl3
3202     0
3203     0
3204     7
3205     -4 2.5 7.5
3206     -4 2.5 7.9
3207     0.4
3208     # RCSid $Id: illum_tfunc.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
3209     # A transfunc window to turn into a light source with mkillum
3210     #@mkillum l+ f=tfunc_ill c=a d=100 s=128
3211    
3212     void transfunc tfunc_mat
3213     8 absdf aniso.cal -i 1 -t 0 0 6.2
3214     0
3215     11 0.9 0.9 0.9 0.05 0.8 0.9 0.1 0.02 0 0 1
3216    
3217     tfunc_mat polygon tfunc.13.tfunc_window
3218     0
3219     0
3220     12
3221     -8.1 1 7.2
3222     -8.1 4 7.2
3223     -8.1 4 8.2
3224     -8.1 1 8.2
3225     # xform -n trans.14 -t 0 5.1 6.2
3226     # RCSid $Id: diorama_walls.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
3227     # Walls of our diorama
3228     # xform -ry -90
3229     # genprism black_outside wall 10 -.1 -.1 -.1 5.1 3.1 5.1 3.1 -.1 -.1 -.1 0 0 3 0 3 5 0 5 0 0 -l 0 0 8 -c
3230    
3231     black_outside polygon trans.14.wall.b
3232     0
3233     0
3234     30
3235     -6.12323399574e-18 5 6.1
3236     -6.12323399574e-18 10.2 6.1
3237     1.89820253868e-16 10.2 9.3
3238     1.89820253868e-16 5 9.3
3239     -6.12323399574e-18 5 6.1
3240     0 5.1 6.2
3241     1.83697019872e-16 5.1 9.2
3242     1.83697019872e-16 10.1 9.2
3243     0 10.1 6.2
3244     0 5.1 6.2
3245    
3246     black_outside polygon trans.14.wall.t
3247     0
3248     0
3249     30
3250     -8 5.1 6.2
3251     -8 10.1 6.2
3252     -8 10.1 9.2
3253     -8 5.1 9.2
3254     -8 5.1 6.2
3255     -8 5 6.1
3256     -8 5 9.3
3257     -8 10.2 9.3
3258     -8 10.2 6.1
3259     -8 5 6.1
3260    
3261     black_outside polygon trans.14.wall.1
3262     0
3263     0
3264     12
3265     -6.12323399574e-18 5 6.1
3266     -8 5 6.1
3267     -8 10.2 6.1
3268     -6.12323399574e-18 10.2 6.1
3269    
3270     black_outside polygon trans.14.wall.2
3271     0
3272     0
3273     12
3274     -6.12323399574e-18 10.2 6.1
3275     -8 10.2 6.1
3276     -8 10.2 9.3
3277     1.89820253868e-16 10.2 9.3
3278    
3279     black_outside polygon trans.14.wall.3
3280     0
3281     0
3282     12
3283     1.89820253868e-16 10.2 9.3
3284     -8 10.2 9.3
3285     -8 5 9.3
3286     1.89820253868e-16 5 9.3
3287    
3288     black_outside polygon trans.14.wall.4
3289     0
3290     0
3291     12
3292     1.89820253868e-16 5 9.3
3293     -8 5 9.3
3294     -8 5 6.1
3295     -6.12323399574e-18 5 6.1
3296     # black_outside polygon wall.5
3297     # 0
3298     # 0
3299     # 12
3300     # -6.12323399574e-18 -0.1 -0.1
3301     # -8 -0.1 -0.1
3302     # -8 0 4.89858719659e-16
3303     # 0 0 0
3304    
3305     wall_mat polygon trans.14.wall.6
3306     0
3307     0
3308     12
3309     0 5.1 6.2
3310     -8 5.1 6.2
3311     -8 5.1 9.2
3312     1.83697019872e-16 5.1 9.2
3313    
3314     ceil_mat polygon trans.14.wall.7
3315     0
3316     0
3317     12
3318     1.83697019872e-16 5.1 9.2
3319     -8 5.1 9.2
3320     -8 10.1 9.2
3321     1.83697019872e-16 10.1 9.2
3322    
3323     wall_mat polygon trans.14.wall.8
3324     0
3325     0
3326     12
3327     1.83697019872e-16 10.1 9.2
3328     -8 10.1 9.2
3329     -8 10.1 6.2
3330     0 10.1 6.2
3331    
3332     floor_mat polygon trans.14.wall.9
3333     0
3334     0
3335     12
3336     0 10.1 6.2
3337     -8 10.1 6.2
3338     -8 5.1 6.2
3339     0 5.1 6.2
3340     # RCSid $Id: rect_opening.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
3341     # Rectangular opening cut in end wall
3342     # xform -ry -90 -t -8 0 0
3343     # genprism wall_mat end_wall 10 -.1 -.1 -.1 5.1 3.1 5.1 3.1 -.1 -.1 -.1 1 1 2 1 2 4 1 4 1 1 -l 0 0 .2 -c
3344    
3345     wall_mat polygon trans.14.end_wall.b
3346     0
3347     0
3348     30
3349     -8 5 6.1
3350     -8 10.2 6.1
3351     -8 10.2 9.3
3352     -8 5 9.3
3353     -8 5 6.1
3354     -8 6.1 7.2
3355     -8 6.1 8.2
3356     -8 9.1 8.2
3357     -8 9.1 7.2
3358     -8 6.1 7.2
3359    
3360     wall_mat polygon trans.14.end_wall.t
3361     0
3362     0
3363     30
3364     -8.2 6.1 7.2
3365     -8.2 9.1 7.2
3366     -8.2 9.1 8.2
3367     -8.2 6.1 8.2
3368     -8.2 6.1 7.2
3369     -8.2 5 6.1
3370     -8.2 5 9.3
3371     -8.2 10.2 9.3
3372     -8.2 10.2 6.1
3373     -8.2 5 6.1
3374    
3375     wall_mat polygon trans.14.end_wall.1
3376     0
3377     0
3378     12
3379     -8 5 6.1
3380     -8.2 5 6.1
3381     -8.2 10.2 6.1
3382     -8 10.2 6.1
3383    
3384     wall_mat polygon trans.14.end_wall.2
3385     0
3386     0
3387     12
3388     -8 10.2 6.1
3389     -8.2 10.2 6.1
3390     -8.2 10.2 9.3
3391     -8 10.2 9.3
3392    
3393     wall_mat polygon trans.14.end_wall.3
3394     0
3395     0
3396     12
3397     -8 10.2 9.3
3398     -8.2 10.2 9.3
3399     -8.2 5 9.3
3400     -8 5 9.3
3401    
3402     wall_mat polygon trans.14.end_wall.4
3403     0
3404     0
3405     12
3406     -8 5 9.3
3407     -8.2 5 9.3
3408     -8.2 5 6.1
3409     -8 5 6.1
3410    
3411     wall_mat polygon trans.14.end_wall.5
3412     0
3413     0
3414     12
3415     -8 5 6.1
3416     -8.2 5 6.1
3417     -8.2 6.1 7.2
3418     -8 6.1 7.2
3419    
3420     wall_mat polygon trans.14.end_wall.6
3421     0
3422     0
3423     12
3424     -8 6.1 7.2
3425     -8.2 6.1 7.2
3426     -8.2 6.1 8.2
3427     -8 6.1 8.2
3428    
3429     wall_mat polygon trans.14.end_wall.7
3430     0
3431     0
3432     12
3433     -8 6.1 8.2
3434     -8.2 6.1 8.2
3435     -8.2 9.1 8.2
3436     -8 9.1 8.2
3437    
3438     wall_mat polygon trans.14.end_wall.8
3439     0
3440     0
3441     12
3442     -8 9.1 8.2
3443     -8.2 9.1 8.2
3444     -8.2 9.1 7.2
3445     -8 9.1 7.2
3446    
3447     wall_mat polygon trans.14.end_wall.9
3448     0
3449     0
3450     12
3451     -8 9.1 7.2
3452     -8.2 9.1 7.2
3453     -8.2 6.1 7.2
3454     -8 6.1 7.2
3455     # RCSid $Id: ballcompare.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
3456     #
3457     # Four balls made of plastic2, metal2, plasfunc, and metfunc
3458     # Mixtext used to label each
3459     #
3460    
3461     void plastic white_mat
3462     0
3463     0
3464     5 0.9 0.9 0.9 0 0
3465    
3466     void plastic black_shiny
3467     0
3468     0
3469     5 0.01 0.01 0.01 0.04 0.05
3470    
3471     void plastic2 plas2_mat
3472     10 0 0 1 . -i 1 -t 0 5.1 6.2
3473     0
3474     6 0.7 0.2 0.8 0.08 0.2 0.08
3475    
3476     void plasfunc plasfunc_mat
3477     8 absdf aniso.cal -i 1 -t 0 5.1 6.2
3478     0
3479     9 0.7 0.2 0.8 0.08 0.2 0.08 0 0 1
3480    
3481     void metal2 met2_mat
3482     10 0 1 0 . -i 1 -t 0 5.1 6.2
3483     0
3484     6 0.1 0.7 0.3 0.9 0.1 0.03
3485    
3486     void metfunc metfunc_mat
3487     8 absdf aniso.cal -i 1 -t 0 5.1 6.2
3488     0
3489     9 0.1 0.7 0.3 0.9 0.1 0.03 0 1 0
3490    
3491     plas2_mat sphere trans.14.plas2_ball
3492     0
3493     0
3494     4 -4 7.1 8.2 0.4
3495    
3496     void mixtext plas2_text
3497     5 black_shiny void helvet.fnt . plastic2
3498     0
3499     10
3500     -4 6.15 8.25
3501     0 0.05 0
3502     0 0 -0.1
3503     -0.2
3504    
3505     plas2_text polygon trans.14.plas2_label
3506     0
3507     0
3508     12
3509     -4 6.6 8.3
3510     -4 6.6 8.1
3511     -4 6.1 8.1
3512     -4 6.1 8.3
3513    
3514     plasfunc_mat sphere trans.14.plasfunc_ball
3515     0
3516     0
3517     4 -4 8.1 8.2 0.4
3518    
3519     void mixtext plasf_text
3520     5 void white_mat helvet.fnt . plasfunc
3521     0
3522     10
3523     -4 8.65 8.25
3524     0 0.05 0
3525     0 0 -0.1
3526     -0.2
3527    
3528     plasf_text polygon trans.14.plasf_label
3529     0
3530     0
3531     12
3532     -4 9.1 8.3
3533     -4 9.1 8.1
3534     -4 8.6 8.1
3535     -4 8.6 8.3
3536    
3537     met2_mat sphere trans.14.met2_ball
3538     0
3539     0
3540     4 -4 7.1 7.2 0.4
3541    
3542     void mixtext met2_text
3543     5 white_mat black_shiny helvet.fnt . metal2
3544     0
3545     10
3546     -4 6.15 7.25
3547     0 0.05 0
3548     0 0 -0.1
3549     -0.2
3550    
3551     met2_text polygon trans.14.met2_label
3552     0
3553     0
3554     12
3555     -4 6.6 7.3
3556     -4 6.6 7.1
3557     -4 6.1 7.1
3558     -4 6.1 7.3
3559    
3560     metfunc_mat sphere trans.14.metfunc_ball
3561     0
3562     0
3563     4 -4 8.1 7.2 0.4
3564    
3565     void mixtext metf_text
3566     5 black_shiny white_mat helvet.fnt . metfunc
3567     0
3568     10
3569     -4 8.65 7.25
3570     0 0.05 0
3571     0 0 -0.1
3572     -0.2
3573    
3574     metf_text polygon trans.14.metf_label
3575     0
3576     0
3577     12
3578     -4 9.1 7.3
3579     -4 9.1 7.1
3580     -4 8.6 7.1
3581     -4 8.6 7.3
3582     # RCSid $Id: spotlights.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
3583     # A pair of spotlights, one pink and one bluish
3584    
3585     void spotlight pink_spotlight
3586     0
3587     0
3588     7 1000 400 200 30
3589     -2.5 1.5 -2
3590    
3591     pink_spotlight ring trans.14.pspot
3592     0
3593     0
3594     8
3595     -2 6.1 8.7
3596     -2.5 1.5 -2
3597     0 0.2
3598    
3599     void spotlight blue_spotlight
3600     0
3601     0
3602     7 200 400 1000 30
3603     -2.5 -1.5 -2
3604    
3605     blue_spotlight ring trans.14.bspot
3606     0
3607     0
3608     8
3609     -2 9.1 8.7
3610     -2.5 -1.5 -2
3611     0 0.2
3612     # RCSid $Id: rect_fixture.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
3613     # xform -s 0.0253999863 -rz 90 -t -4 2.5 2.999
3614     #
3615     # Wellmade 2 lamp fixture, model 395-12A-248RS
3616     #
3617     # Dimensions in inches, fixture parallel to y axis, center at origin
3618     #
3619    
3620     void brightdata lum_dist
3621     21 flatcorr source/wellmade/395-12A-248RS.dat source.cal src_phi4 src_theta -i 1 -s 0.0253999863 -rz 90 -t -4 2.5 2.999 -i 1 -t 0 5.1 6.2
3622     0
3623     0
3624     # this is scaled by 1/area (SI)
3625    
3626     lum_dist light lum_bright
3627     0
3628     0
3629     3 20 20 20
3630     # 3 1.55 1.55 1.55
3631    
3632     lum_bright polygon trans.14.luminaire
3633     0
3634     0
3635     12
3636     -3.42215031167 7.32695014727 9.199
3637     -4.57784968833 7.32695014728 9.199
3638     -4.57784968833 7.87304985273 9.199
3639     -3.42215031167 7.87304985272 9.199
3640     # RCSid $Id: trans_pane.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
3641     # A yellowish trans material in our window
3642    
3643     void trans yellow_trans
3644     0
3645     0
3646     7 0.9 0.9 0.5 0.05 0 0.5 0.7
3647    
3648     yellow_trans polygon trans.14.yellow_diffuser
3649     0
3650     0
3651     12
3652     -8.1 5.1 6.2
3653     -8.1 10.1 6.2
3654     -8.1 10.1 9.2
3655     -8.1 5.1 9.2
3656     # xform -n trans2.15 -t 0 10.2 6.2
3657     # RCSid $Id: diorama_walls.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
3658     # Walls of our diorama
3659     # xform -ry -90
3660     # genprism black_outside wall 10 -.1 -.1 -.1 5.1 3.1 5.1 3.1 -.1 -.1 -.1 0 0 3 0 3 5 0 5 0 0 -l 0 0 8 -c
3661    
3662     black_outside polygon trans2.15.wall.b
3663     0
3664     0
3665     30
3666     -6.12323399574e-18 10.1 6.1
3667     -6.12323399574e-18 15.3 6.1
3668     1.89820253868e-16 15.3 9.3
3669     1.89820253868e-16 10.1 9.3
3670     -6.12323399574e-18 10.1 6.1
3671     0 10.2 6.2
3672     1.83697019872e-16 10.2 9.2
3673     1.83697019872e-16 15.2 9.2
3674     0 15.2 6.2
3675     0 10.2 6.2
3676    
3677     black_outside polygon trans2.15.wall.t
3678     0
3679     0
3680     30
3681     -8 10.2 6.2
3682     -8 15.2 6.2
3683     -8 15.2 9.2
3684     -8 10.2 9.2
3685     -8 10.2 6.2
3686     -8 10.1 6.1
3687     -8 10.1 9.3
3688     -8 15.3 9.3
3689     -8 15.3 6.1
3690     -8 10.1 6.1
3691    
3692     black_outside polygon trans2.15.wall.1
3693     0
3694     0
3695     12
3696     -6.12323399574e-18 10.1 6.1
3697     -8 10.1 6.1
3698     -8 15.3 6.1
3699     -6.12323399574e-18 15.3 6.1
3700    
3701     black_outside polygon trans2.15.wall.2
3702     0
3703     0
3704     12
3705     -6.12323399574e-18 15.3 6.1
3706     -8 15.3 6.1
3707     -8 15.3 9.3
3708     1.89820253868e-16 15.3 9.3
3709    
3710     black_outside polygon trans2.15.wall.3
3711     0
3712     0
3713     12
3714     1.89820253868e-16 15.3 9.3
3715     -8 15.3 9.3
3716     -8 10.1 9.3
3717     1.89820253868e-16 10.1 9.3
3718    
3719     black_outside polygon trans2.15.wall.4
3720     0
3721     0
3722     12
3723     1.89820253868e-16 10.1 9.3
3724     -8 10.1 9.3
3725     -8 10.1 6.1
3726     -6.12323399574e-18 10.1 6.1
3727     # black_outside polygon wall.5
3728     # 0
3729     # 0
3730     # 12
3731     # -6.12323399574e-18 -0.1 -0.1
3732     # -8 -0.1 -0.1
3733     # -8 0 4.89858719659e-16
3734     # 0 0 0
3735    
3736     wall_mat polygon trans2.15.wall.6
3737     0
3738     0
3739     12
3740     0 10.2 6.2
3741     -8 10.2 6.2
3742     -8 10.2 9.2
3743     1.83697019872e-16 10.2 9.2
3744    
3745     ceil_mat polygon trans2.15.wall.7
3746     0
3747     0
3748     12
3749     1.83697019872e-16 10.2 9.2
3750     -8 10.2 9.2
3751     -8 15.2 9.2
3752     1.83697019872e-16 15.2 9.2
3753    
3754     wall_mat polygon trans2.15.wall.8
3755     0
3756     0
3757     12
3758     1.83697019872e-16 15.2 9.2
3759     -8 15.2 9.2
3760     -8 15.2 6.2
3761     0 15.2 6.2
3762    
3763     floor_mat polygon trans2.15.wall.9
3764     0
3765     0
3766     12
3767     0 15.2 6.2
3768     -8 15.2 6.2
3769     -8 10.2 6.2
3770     0 10.2 6.2
3771     # RCSid $Id: rect_opening.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
3772     # Rectangular opening cut in end wall
3773     # xform -ry -90 -t -8 0 0
3774     # genprism wall_mat end_wall 10 -.1 -.1 -.1 5.1 3.1 5.1 3.1 -.1 -.1 -.1 1 1 2 1 2 4 1 4 1 1 -l 0 0 .2 -c
3775    
3776     wall_mat polygon trans2.15.end_wall.b
3777     0
3778     0
3779     30
3780     -8 10.1 6.1
3781     -8 15.3 6.1
3782     -8 15.3 9.3
3783     -8 10.1 9.3
3784     -8 10.1 6.1
3785     -8 11.2 7.2
3786     -8 11.2 8.2
3787     -8 14.2 8.2
3788     -8 14.2 7.2
3789     -8 11.2 7.2
3790    
3791     wall_mat polygon trans2.15.end_wall.t
3792     0
3793     0
3794     30
3795     -8.2 11.2 7.2
3796     -8.2 14.2 7.2
3797     -8.2 14.2 8.2
3798     -8.2 11.2 8.2
3799     -8.2 11.2 7.2
3800     -8.2 10.1 6.1
3801     -8.2 10.1 9.3
3802     -8.2 15.3 9.3
3803     -8.2 15.3 6.1
3804     -8.2 10.1 6.1
3805    
3806     wall_mat polygon trans2.15.end_wall.1
3807     0
3808     0
3809     12
3810     -8 10.1 6.1
3811     -8.2 10.1 6.1
3812     -8.2 15.3 6.1
3813     -8 15.3 6.1
3814    
3815     wall_mat polygon trans2.15.end_wall.2
3816     0
3817     0
3818     12
3819     -8 15.3 6.1
3820     -8.2 15.3 6.1
3821     -8.2 15.3 9.3
3822     -8 15.3 9.3
3823    
3824     wall_mat polygon trans2.15.end_wall.3
3825     0
3826     0
3827     12
3828     -8 15.3 9.3
3829     -8.2 15.3 9.3
3830     -8.2 10.1 9.3
3831     -8 10.1 9.3
3832    
3833     wall_mat polygon trans2.15.end_wall.4
3834     0
3835     0
3836     12
3837     -8 10.1 9.3
3838     -8.2 10.1 9.3
3839     -8.2 10.1 6.1
3840     -8 10.1 6.1
3841    
3842     wall_mat polygon trans2.15.end_wall.5
3843     0
3844     0
3845     12
3846     -8 10.1 6.1
3847     -8.2 10.1 6.1
3848     -8.2 11.2 7.2
3849     -8 11.2 7.2
3850    
3851     wall_mat polygon trans2.15.end_wall.6
3852     0
3853     0
3854     12
3855     -8 11.2 7.2
3856     -8.2 11.2 7.2
3857     -8.2 11.2 8.2
3858     -8 11.2 8.2
3859    
3860     wall_mat polygon trans2.15.end_wall.7
3861     0
3862     0
3863     12
3864     -8 11.2 8.2
3865     -8.2 11.2 8.2
3866     -8.2 14.2 8.2
3867     -8 14.2 8.2
3868    
3869     wall_mat polygon trans2.15.end_wall.8
3870     0
3871     0
3872     12
3873     -8 14.2 8.2
3874     -8.2 14.2 8.2
3875     -8.2 14.2 7.2
3876     -8 14.2 7.2
3877    
3878     wall_mat polygon trans2.15.end_wall.9
3879     0
3880     0
3881     12
3882     -8 14.2 7.2
3883     -8.2 14.2 7.2
3884     -8.2 11.2 7.2
3885     -8 11.2 7.2
3886     # RCSid $Id: gymbal.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
3887     # Test of cylinders, tubes, and BRTDfunc material
3888    
3889     void BRTDfunc brtd_mat
3890     16 .1 .1 .1+if(Rdot-.8,0,.7) .1+if(RdotP-.8,.7,0) .1 .1 0 0 0 . -i 1 -t 0 10.2 6.2
3891     0
3892     9 0.01 0.01 0.01 0.01 0.1 0.01 0.05 0.05 0.05
3893    
3894     brtd_mat cylinder trans2.15.cyl1
3895     0
3896     0
3897     7
3898     -4.2 12.7 7.7
3899     -3.8 12.7 7.7
3900     0.5
3901    
3902     brtd_mat tube trans2.15.tube2
3903     0
3904     0
3905     7
3906     -4 12.5 7.7
3907     -4 12.9 7.7
3908     0.45
3909    
3910     brtd_mat cylinder trans2.15.cyl3
3911     0
3912     0
3913     7
3914     -4 12.7 7.5
3915     -4 12.7 7.9
3916     0.4
3917     # RCSid $Id: illum_trans2.rad,v 1.1 2018/11/17 22:09:12 greg Exp $
3918     # A trans2 window to turn into an llum with mkillum
3919     #@mkillum l- f=trans2_ill c=a d=100 s=128
3920    
3921     void trans2 trans2_mat
3922     10 0 0 1 . -i 1 -t 0 10.2 6.2
3923     0
3924     8 0.9 0.9 0.9 0.05 0.1 0.02 0.8 0.9
3925    
3926     trans2_mat polygon trans2.15.tfunc_window
3927     0
3928     0
3929     12
3930     -8.1 11.2 7.2
3931     -8.1 14.2 7.2
3932     -8.1 14.2 8.2
3933     -8.1 11.2 8.2