restore [locate_data_file OCC3-1.brep] a
restore [locate_data_file OCC3-2.brep] b

bop b a
bopcommon result

set square 600