#K3----------------------------------------------
beziercurve cb 4  2 0 0  20 10 0  20 20 0  2 30 0 
polyline pl 2 30 0  2 0 0
mkedge ed cb
wire ww ed pl
mkplane ww ww
revol rv ww 0 0 0 0 1 0 -180
plane p 0 15 12 0 0 1
pcone p p 7 5 15
bfuse f rv p
nexplode f f
depouille result f 0 0 1 f_5 10 0 0 27 0 0 1

checkprops result -s 2510.01