pcylinder b1 1 2
box b2 0 -0.5 0 2 1 1
trotate b2 0 0 0 0 0 1 30

bop b1 b2
bopcut result

checkprops result -s 20.5344
checkview -display result -2d -otherwise { b1 b2 } -s -path ${imagedir}/${test_image}.png