pcylinder b1 4 8
pcone b2 2 1 9
ttranslate b2 0 0 -1

bop b1 b2
bopfuse result

set square 315.243
