puts "========"
puts "OCC26621"
puts "========"
puts ""
###########################################
# Boolean Cut does not work on two solids
###########################################

smallview

restore [locate_data_file OCC26621-body.brep] body
restore [locate_data_file OCC26621-cutter.brep] cutter

bopargcheck body
bopargcheck cutter
bcut result body cutter
donly result
fit

checknbshapes result -vertex 186 -edge 360 -wire 174 -face 174 -shell 1 -solid 1 -compsolid 0 -compound 1 -shape 897

checkview -screenshot -2d -path ${imagedir}/${test_image}.png