box b -20 -20 -20 40 40 20
ellipse w 0 0 0 10 5
mkedge w w
wire w w
mkplane w w
prism s w 2 0 30
tscale b 0 0 0 SCALE1
tscale s 0 0 0 SCALE1
explode s E
bfuseblend result s b 1*SCALE1

checkprops result -s 783698
