1 puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_"
3 puts "================"
5 puts "================"
8 restore [locate_data_file OCC31.brep] sh
15 chamf res1 sh sh_2_1 sh_2 7 7
16 puts [checkshape res1]
22 chamf res2 res1 res1_5_4 res1_5 7 7
23 puts [checkshape res2]
29 chamf result res2 res2_4_1 res2_4 7 7
30 puts [checkshape result]