1 puts "TODO OCC25915 ALL: Faulty OCC825"
2 puts "TODO OCC25915 ALL: Error : The command is not valid. The area is"
3 puts "TODO OCC25915 ALL: Faulty shapes in variables faulty_1 to faulty_"
11 ######################################
12 ## BRepAlgoAPI_Cut fails on sphere and b-spline face
13 ######################################
15 #####################################
17 if { [ catch { set info_result [OCC825 a1 a2 a3 res1 res2 0] } ] } {
20 if { [regexp {FAILED} $info_result] } {
24 set ExplodeList [explode res1]
25 if {[llength ${ExplodeList}] < 1} {
29 set ExplodeList [explode res2]
30 if {[llength ${ExplodeList}] < 1} {
35 checknbshapes res1 -face 2 -shell 1 -solid 1 -compsolid 0 -compound 1 -shape 15
40 checkprops result -s 0
42 checkview -display result -2d -path ${imagedir}/${test_image}.png