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