puts "================================"
puts "COMMON of OCC118-2.brep and  OCC118-1.brep"
puts "================================"

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

bop b a
bopcommon result

set square 844.929