puts "TODO OCC23068 ALL: Error : The offset is not valid"
psphere s 15 -90 60 270

OFFSETSHAPE -1 {s_4} $calcul $type

set volume 0