#D5---------------------------------------------- puts "TODO OCC22803 All:Faulty shapes in variables faulty_1 to faulty_4" plane pt 0 0 0 1 0 0 ptorus pt pt 15 15 profile pf o -8 -12 15 l 5 c 2 90 l 20 c 2 90 \ l 5 polyline pl 0 0 15 0 0 45 pipe p2 pl pf bfuse f pt p2 nexplode f f depouille result f 0 0 1 f_6 5 0 0 44 0 0 1 set square 13239.6