2 if {[array get env os_type] != ""} {
5 if {[string compare $os "Debian40"] == 0 || [string compare $os "Mandriva2008"] == 0} {
6 puts "TODO OCC22817 All: TEST INCOMPLETE"
8 puts "TODO OCC22817 All: Faulty shapes in variables faulty_1 to faulty_4"
11 ellipse w1 0 0 0 15 10
13 trotate w1 0 0 0 1 0 0 90
14 polyline w2 0 0 10 0 0 -10 25 0 -10 15 0 0
17 revol s w 0 0 0 0 0 1 270
20 blend result s 1*SCALE1 s_1 1*SCALE1 s_4 1*SCALE1 s_9