cpulimit 1500

circle w -20 0 0 20
mkedge w w 0 pi*2/5
wire w w
polyline profile 0 0 0  10 0 0  5 0 5  0 0 0
mkplane profile profile
pipe s w profile

OFFSETSHAPE -1 {s_2} $calcul $type

set volume 407.179
