puts "========================"
puts "BUC60776"
puts "========================"
restore [locate_data_file buc60776a.brep] a
checkshape a
restore [locate_data_file buc60776b.brep] b
checkshape b
bfuse result a b

checkprops result -s 60771.3
checkshape result

set 2dviewer 1