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 | |
261b7d9e |
12 | bclearobjects |
13 | bcleartools |
14 | baddobjects b2 |
15 | baddtools b1 |
16 | bfillds |
7365fad6 |
17 | |
261b7d9e |
18 | |
19 | # SECTION |
20 | bbop rr 4 |
21 | |
22 | # CUT 1-2 |
23 | bbop res1 2 |
24 | |
25 | # CUT 2-1 |
26 | bbop res2 3 |
7365fad6 |
27 | |
28 | checkshape res1 |
29 | checkshape res2 |
30 | |
31 | set log1 [bopargcheck res1 #F] |
32 | set log2 [bopargcheck res2 #F] |
33 | |
261b7d9e |
34 | if { [string compare -nocase $log1 "Shape(s) seem(s) to be valid for BOP.\n"] } { |
35 | puts "ERROR. res1 is not valid for BOP" |
7365fad6 |
36 | } |
37 | |
261b7d9e |
38 | if { [string compare -nocase $log2 "Shape(s) seem(s) to be valid for BOP.\n"] } { |
39 | puts "ERROR. res2 is not valid for BOP" |
7365fad6 |
40 | } |
41 | |
261b7d9e |
42 | checknbshapes res1 -wire 6 -face 6 -shell 1 -solid 1 -t |
43 | checknbshapes res2 -wire 6 -face 6 -shell 1 -solid 1 -t |
7365fad6 |
44 | |
45 | smallview |
46 | donly res1 |
47 | fit |
48 | xwd ${imagedir}/${casename}_1.png |
261b7d9e |
49 | donly rr |
7365fad6 |
50 | fit |
261b7d9e |
51 | donly res2 |
7365fad6 |
52 | xwd ${imagedir}/${casename}_2.png |