box b 10 10 10 
copy b c
pcylinder s 2 4
ttranslate s 5 5 -2
bcut rr c s
explode rr so

bcommon result rr_1 c

checkprops result -s 625.133
checkview -display result -2d -s -otherwise { rr_1 c } -path ${imagedir}/${test_image}.png
