f1aa2b62 |
1 | pload QAcommands |
744511c8 |
2 | puts "TODO ?OCC12345 ALL: Error : The square of result shape is" |
3 | puts "TODO ?OCC12345 ALL: Error : The command is not valid. The square is" |
f1aa2b62 |
4 | puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" |
744511c8 |
5 | puts "TODO ?OCC12345 ALL: Faulty : Resulting shape is empty COMPOUND" |
f1aa2b62 |
6 | |
7 | puts "========" |
8 | puts "OCC825" |
9 | puts "========" |
10 | puts "" |
11 | ###################################### |
12 | ## BRepAlgoAPI_Cut fails on sphere and b-spline face |
13 | ###################################### |
14 | ## |
15 | ## Note: test for old topology |
16 | ## |
17 | ################################ |
18 | |
19 | if { [ catch { set info_result [OCC825 a1 a2 a3 a4 a5] } ] } { |
20 | puts "Faulty : an exception was caught" |
21 | } else { |
352ffd73 |
22 | checkshape a1 |
23 | checkshape a3 |
f1aa2b62 |
24 | |
25 | bcut result a3 a1 |
26 | |
27 | set ExplodeList [explode result] |
28 | if {[llength ${ExplodeList}] < 1} { |
29 | puts "Faulty : Resulting shape is empty COMPOUND" |
30 | } |
31 | } |
32 | |
33 | set square 0 |
34 | set 2dviewer 0 |