0027341: Incorrect exact HLR results
[occt.git] / tests / bugs / modalg_6 / bug26310_3
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