5 #################################################
6 # Very slow boolean cut operations on cylinders
7 #################################################
9 restore [locate_data_file OCC26310-b1.brep] b1
10 restore [locate_data_file OCC26310-b2.brep] b2
20 set log1 [bopargcheck res1 #F]
21 set log2 [bopargcheck res2 #F]
23 if { [string first "Faulties for FIRST shape found : 2" $log1] >= 0 } {
24 puts "ERROR in bopargcheck res1"
27 if { [string first "Shapes with Continuity C0 : YES Cases(2) Total shapes(2)" $log1] >= 0 } {
28 puts "ERROR. res1 with continuity C0."
31 if { [string first "Faulties for FIRST shape found : 2" $log2] >= 0 } {
32 puts "ERROR in bopargcheck res2"
35 if { [string first "Shapes with Continuity C0 : YES Cases(2) Total shapes(2)" $log2] >= 0 } {
36 puts "ERROR. res2 with continuity C0."
42 xwd ${imagedir}/${casename}_1.png
45 xwd ${imagedir}/${casename}_2.png