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 compare -nocase $log1 "Shape(s) seem(s) to be valid for BOP.\n"] } {
24 puts "ERROR. res1 is not valid for BOP"
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"
34 xwd ${imagedir}/${casename}_1.png
37 xwd ${imagedir}/${casename}_2.png