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
31 set log1 [bopargcheck res1 #F]
32 set log2 [bopargcheck res2 #F]
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"
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"
42 checknbshapes res1 -wire 6 -face 6 -shell 1 -solid 1 -t
43 checknbshapes res2 -wire 6 -face 6 -shell 1 -solid 1 -t
49 xwd ${imagedir}/${casename}_1.png
52 xwd ${imagedir}/${casename}_2.png