2 if {[array get env os_type] != ""} {
7 [string compare $os "Mandriva2010"] == 0
9 puts "TODO OCC23068 $os: An exception was caught"
10 puts "TODO OCC23068 $os: \\*\\* Exception \\*\\*"
11 puts "TODO OCC23068 $os: TEST INCOMPLETE"
13 puts "TODO OCC23068 $os: Faulty shapes in variables faulty_1 to faulty_2"
14 puts "TODO OCC23068 $os: Error : The volume of the resulting shape is"
17 ellipse w1 0 0 0 15 10
19 trotate w1 0 0 0 1 0 0 90
20 polyline w2 0 0 10 0 0 -10 25 0 -10 15 0 0
23 revol s w 0 0 0 0 0 1 90
25 OFFSETSHAPE 1 {} $calcul $type