puts "============"
puts "OCC13209"
puts "============"
puts ""
#######################################################################
# Exception is raised while performing boolean operations
#######################################################################

restore [locate_data_file OCC13209_s1.brep] b1
restore [locate_data_file OCC13209_s2.brep] b2

bop b1 b2
bopfuse result

checkprops result -s 17308.3 
checkshape result
checknbshapes result -vertex 13 -edge 25 -wire 13 -face 12 -shell 1 -solid 1 -compsolid 0 -compound 1 -shape 66
checkview -display result -2d -path ${imagedir}/${test_image}.png