restore [locate_data_file case_2_shell_r.brep] a
restore [locate_data_file case_2_wire2.brep] b
bcommon result b a
set length empty
set nbsh_v 0
set nbsh_e 0
