0031441: UnifySameDomain corrupts the shape
[occt.git] / tests / bugs / modalg_7 / bug31441
1 puts "============================================"
2 puts "OCC31441: UnifySameDomain corrupts the shape"
3 puts "============================================"
4 puts ""
5
6 brestore [locate_data_file bug31441.brep] a
7
8 unifysamedom result a
9
10 checkshape result
11
12 checknbshapes result -solid 1 -shell 2 -face 46 -wire 48 -edge 128 -vertex 84
13
14 set tolres [checkmaxtol result]
15
16 if { ${tolres} > 2.e-7} {
17    puts "Error: bad tolerance of result"
18 }
19
20 checkprops result -v 1.10788