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

puts "===================================================================================================="
puts "OCC29504: ShapeUpgrade_UnifySameDomain produces invalid shape and ShapeFix_Shape is unable to fix it"
puts "===================================================================================================="
puts ""

restore [locate_data_file bug29504_cyl.brep] s
unifysamedom result s

checkshape result
checkshape s

checknbshapes result -face 1 -wire 1 -edge 4 -vertex 4

set tolres [checkmaxtol result]

if { ${tolres} > 1.000008e-07} {
   puts "Error: bad tolerance of result"
}

checkprops result -s 104.72
Commit	Line	Data
389b9d5c	1	puts "===================================================================================================="
	2	puts "OCC29504: ShapeUpgrade_UnifySameDomain produces invalid shape and ShapeFix_Shape is unable to fix it"
	3	puts "===================================================================================================="
	4	puts ""
	5
	6	restore [locate_data_file bug29504_cyl.brep] s
	7	unifysamedom result s
	8
	9	checkshape result
	10	checkshape s
	11
	12	checknbshapes result -face 1 -wire 1 -edge 4 -vertex 4
	13
	14	set tolres [checkmaxtol result]
	15
	16	if { ${tolres} > 1.000008e-07} {
	17	puts "Error: bad tolerance of result"
	18	}
	19
	20	checkprops result -s 104.72