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

bop b1 b2
boptuc result

checkprops result -s 54.5673