restore case_4_solid.brep a
restore case_4_wire1.brep b
bcut result b a
set length empty
set nbsh_v 0
set nbsh_e 0