5 #######################################################################
6 # split shape algorithm works incorrectly in some cases
7 #######################################################################
13 testreadstep [locate_data_file OCC23029-ProblemF.stp] a
14 restore [locate_data_file OCC23029-TempW.brep] t
18 splitshape result a a_1 t
29 set nb_compound_good 0
32 set CheckShape_status 0
34 set ll [ llength [explode result f2 ] ]
37 set CheckShape_status 1
42 if { ${CheckShape_status} != 0 } {
43 puts "Faulty ${BugNumber}"
45 puts "OK ${BugNumber}"