5 #########################################################################
6 # Ray tracing with reflections is poor on rotated presentation
7 #########################################################################
9 #source samples/tcl/cad.tc
24 box h1 3 -1 2.5 2 9 0.5
39 # make box for inner cylindrical cut
44 blend bc4 bc3 1 bc3_20
45 blend bc5 bc4 1 bc3_23
46 blend bc6 bc5 1.99 bc3_21
47 blend bc7 bc6 1.99 bc3_22
49 # make inner cylindrical cut
51 revol r bc7_1 -1 0 6 1 0 0 100
54 # make outer cylindrical cut
61 trotate res 0 0 0 0 0 1 90
65 #vaspects res -setFaceBoundaryDraw 1 -setFaceBoundaryColor WHITE
68 vrenderparams -rayTrace -reflections
69 vlocation res -rotate 0 0 0 0 0 1 180