1 puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_"
2 puts "TODO OCC12345 ALL: Error : The square of result shape is"
10 #################################
12 restore [locate_data_file OCC774.brep] a
17 if { [catch { bcut result a_2 a_1 } status] } {
18 puts "Faulty OCC774 (case 2)"