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

bop b1 b2
bopcommon result

set square 87.403