
puts "========================"
puts "BUC60704"
puts "BUC60709"
puts "========================"

restore [locate_data_file buc60704a.brep] p 
checkshape p
restore [locate_data_file buc60704b.brep] s
checkshape s

bfuse result p s

set square 39.0889
set 2dviewer 0
