restore case_2_shell_r.brep a
restore case_2_wire2.brep b
bcut result b a
set length 3176.78
set nbsh_v 22
set nbsh_e 22