pcylinder b1 4 8
pcone b2 4 2 4
ttranslate b2 0 0 8

bop b1 b2
bopcut result

set square 301.593
