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

puts "============"
puts "OCC30174"
puts "============"
puts ""
###########################################################################################################
# ShapeUpgrade_UnifySameDomain does not unify cylindrical faces
###########################################################################################################

restore [locate_data_file bug30174_cylinder.brep] a
unifysamedom result a

checkshape result

checknbshapes result -vertex 2 -edge 3 -wire 3 -face 3 -shell 1 -solid 1

set tolres [checkmaxtol result]

if { ${tolres} > 2.e-5} {
   puts "Error: bad tolerance of result"
}
Commit	Line	Data
9619ef4c	1	puts "============"
	2	puts "OCC30174"
	3	puts "============"
	4	puts ""
	5	###########################################################################################################
	6	# ShapeUpgrade_UnifySameDomain does not unify cylindrical faces
	7	###########################################################################################################
	8
	9	restore [locate_data_file bug30174_cylinder.brep] a
	10	unifysamedom result a
	11
	12	checkshape result
	13
	14	checknbshapes result -vertex 2 -edge 3 -wire 3 -face 3 -shell 1 -solid 1
	15
	16	set tolres [checkmaxtol result]
	17
	18	if { ${tolres} > 2.e-5} {
	19	puts "Error: bad tolerance of result"
	20	}