restore case_7_shell.brep a
restore case_7_wire3.brep b
bcut result b a
set length 2033.56
set nbsh_v 9
set nbsh_e 6