restore [locate_data_file case_9_wire.brep] a
restore [locate_data_file case_9_edge1.brep] b
bop a b
bopcut result
checkprops result -l 902.162
checksection result
set nbsh_v 5
set nbsh_e 4