7365fad6 |
1 | puts "========" |
2 | puts "OCC26310" |
3 | puts "========" |
4 | puts "" |
5 | ################################################# |
6 | # Very slow boolean cut operations on cylinders |
7 | ################################################# |
8 | |
9 | restore [locate_data_file OCC26310-b1.brep] b1 |
10 | restore [locate_data_file OCC26310-b2.brep] b2 |
11 | |
12 | bop b1 b2 |
13 | |
14 | bopcut res1 |
15 | boptuc res2 |
16 | |
17 | checkshape res1 |
18 | checkshape res2 |
19 | |
20 | set log1 [bopargcheck res1 #F] |
21 | set log2 [bopargcheck res2 #F] |
22 | |
23 | if { [string compare -nocase $log1 "Shape(s) seem(s) to be valid for BOP.\n"] } { |
24 | puts "ERROR. res1 is not valid for BOP" |
25 | } |
26 | |
27 | if { [string compare -nocase $log2 "Shape(s) seem(s) to be valid for BOP.\n"] } { |
28 | puts "ERROR. res2 is not valid for BOP" |
29 | } |
30 | |
31 | smallview |
32 | donly res1 |
33 | fit |
34 | xwd ${imagedir}/${casename}_1.png |
35 | donly res2 |
36 | fit |
37 | xwd ${imagedir}/${casename}_2.png |