box b1 0 0 0 1 1 1
dset a30 atan2(1,2)*180/pi
dset r sqrt(5)
box b2 0 0.25 0 1.3 3/r/2 1
trotate b2 0 0.25 0 0 0 1 a30

bop b1 b2
bopcut result

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