restore [locate_data_file case_9_wire.brep] a
restore [locate_data_file case_9_edge5.brep] b
bop a b
boptuc result
checkprops result -l 270.1
checksection result
set nbsh_v 2
set nbsh_e 1