restore [locate_data_file case_6_shell.brep] a
restore [locate_data_file case_4_edge3.brep] b
bcut result b a
checkprops result -l 729.781
checksection result
set nbsh_v 6
set nbsh_e 3