5 #################################################
6 # Result of general fuse of shell and edge
7 # produces a shape with too large tolerance
8 #################################################
12 restore [locate_data_file bug29183_shapes.brep] ss
19 regexp {Tolerance MAX=([-0-9.+eE]+)} [tolerance r] full toler
21 if {$toler > $MaxTol} {
22 puts "Error: Tolerance after fusing is too large"
25 checknbshapes r -m "Fusing result" -edge 18 -face 7
30 checkview -screenshot -2d -path ${imagedir}/${test_image}_1.png