restore case_2_shell_r.brep a
restore case_2_wire1.brep b
bcut result b a
#set length 3176.78
set length 2302.78
set nbsh_v 18
set nbsh_e 11