puts "TODO OCC23068 ALL: An exception was caught"
puts "TODO OCC23068 ALL: \\*\\* Exception \\*\\*"
puts "TODO OCC23068 ALL: TEST INCOMPLETE"
psphere s 15 90
trotate s 0 0 0 0 0 1 90

OFFSETSHAPE 1 {s_3} $calcul $type

set volume 0
