puts "================================="
puts "FUSE of OCC213-1.brep and  OCC213-2.brep"
puts "Case is duplicate of chl 918 A6, bug OCC213 "
puts "================================="

restore OCC213-1.brep a
restore OCC213-2.brep b

bop a b
bopfuse result


set square 4835.45