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

set square 61626.2

set 2dviewer 1


