restore [locate_data_file case_9_wire.brep] a
restore [locate_data_file case_9_edge4.brep] b
bop a b
bopfuse result
set length 1127.57
set nbsh_v 7
set nbsh_e 7