1 puts "============================================"
2 puts "OCC31441: UnifySameDomain corrupts the shape"
3 puts "============================================"
6 brestore [locate_data_file bug31441.brep] a
12 checknbshapes result -solid 1 -shell 2 -face 46 -wire 48 -edge 128 -vertex 84
14 set tolres [checkmaxtol result]
16 if { ${tolres} > 2.e-7} {
17 puts "Error: bad tolerance of result"
20 checkprops result -v 1.10788