beziercurve w1 5 0 0 0 20 0 0 20 5 0 25 10 0 10 20 0 mkedge w1 w1 polyline w2 10 20 0 0 10 0 0 0 0 wire w w1 w2 mkplane w w prism s w -2 7 10 OFFSETSHAPE -1 {s_4 s_5} $calcul $type set volume 678.359