[occt.git] / tests / bugs / modalg_7 / bug31441

puts "============================================"
puts "OCC31441: UnifySameDomain corrupts the shape"
puts "============================================"
puts ""

brestore [locate_data_file bug31441.brep] a

unifysamedom result a

checkshape result

checknbshapes result -solid 1 -shell 2 -face 46 -wire 48 -edge 128 -vertex 84

set tolres [checkmaxtol result]

if { ${tolres} > 2.e-7} {
   puts "Error: bad tolerance of result"
}

checkprops result -v 1.10788
Commit	Line	Data
486ad712	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