puts "================"
puts "OCC151"
puts "SAM1141"
puts "================"
puts ""

restore [locate_data_file OCC3-1.brep] sh1 
restore [locate_data_file OCC3-2.brep] sh2

puts [checkshape sh1]
puts [checkshape sh2]

bfuse result sh1 sh2
puts [checkshape result]

set check_square 1
set square 11400
set 2dviewer 0