2 puts "0029843: Modeling Algorithms - Boolean FUSE produces incorrect result"
6 restore [locate_data_file bug29843.brep] s
22 foreach i { 0 1 2 3 4 5} {
24 if {![regexp "OK" [bopcheck r_$i]]} {
25 puts "Error: r_$i is self-intersecting shape"
29 checkprops r_0 -s 9.84429 -v 0.639311
30 checknbshapes r_0 -wire 7 -face 5 -shell 1 -solid 1 -t
32 checkprops r_1 -s 2121.39 -v 612.41
33 checknbshapes r_1 -wire 38 -face 32 -shell 2 -solid 1 -t
35 checkprops r_2 -s 2113.85 -v 611.569
36 checknbshapes r_2 -wire 32 -face 26 -shell 2 -solid 1 -t
38 checkprops r_3 -s 15.9893 -v 0.215264
39 checknbshapes r_3 -wire 11 -face 9 -shell 2 -solid 2 -t
41 checkprops r_4 -l 24.9725
44 checkprops r_5 -s 2139.68 -v 612.402
45 checknbshapes r_5 -wire 44 -face 36 -shell 5 -solid 4 -t
47 checkview -display r_0 -2d -path ${imagedir}/${test_image}.png