#F1----------------------------------------------
polyline p 0 0 7  0 0 0  10 0 0  10 0 7
#beziercurve bc 4  10 0 7  7 0 7  3 0 7  0 0 7
bsplinecurve bc 2 3  0 3 1 1 2 3 \
10 0 7 1  7 0 7 1  3 0 8 1  0 0 7 1
mkedge bc bc
wire p p bc
mkplane p p
revol p p 0 0 0 0 0 1 360
box bx -4 -4 4 8 8 10
bfuse f p bx
nexplode f f
depouille result f 0 0 1 f_2 2 0 0 14 0 0 1

checkprops result -s 1276.03