
puts "================"
puts "OCC3"
puts "================"
puts ""

restore [locate_data_file OCC3-1.brep] a 
restore [locate_data_file OCC3-2.brep] b
checkshape a
checkshape b

bfuse result b a
checkshape result

set square 11400
set 2dviewer 0

