restore case_4_face.brep a
restore case_4_wire1.brep b
bcommon result b a
set length 1245.29
set nbsh_v 10
set nbsh_e 5