[occt.git] / tests / bugs / modalg_5 / bug25199

puts "============"
puts "OCC25199"
puts "============"
puts ""
###############################################################################################
# Bad tolerance edge generated by blend algorithm
###############################################################################################

decho off
test bugs modalg_3 bug615
decho on

explode result E

regexp {Tolerance +MAX=([-0-9.+eE]+)} [tolerance result_21] full MaxTol_1

puts "MaxTolerance = $MaxTol_1"

set MaxTol 0.001

if { $MaxTol_1 > $MaxTol } {
    puts "Faulty OCC25199:  Bad tolerance edge generated by blend algorithm"
} else {
    puts "OCC25199 OK:  Good tolerance edge generated by blend algorithm"
}
Commit	Line	Data
31cf9c5f	1	puts "============"
	2	puts "OCC25199"
	3	puts "============"
	4	puts ""
	5	###############################################################################################
	6	# Bad tolerance edge generated by blend algorithm
	7	###############################################################################################
	8
	9	decho off
	10	test bugs modalg_3 bug615
	11	decho on
	12
	13	explode result E
	14
	15	regexp {Tolerance +MAX=([-0-9.+eE]+)} [tolerance result_21] full MaxTol_1
	16
	17	puts "MaxTolerance = $MaxTol_1"
	18
	19	set MaxTol 0.001
	20
	21	if { $MaxTol_1 > $MaxTol } {
	22	puts "Faulty OCC25199: Bad tolerance edge generated by blend algorithm"
	23	} else {
	24	puts "OCC25199 OK: Good tolerance edge generated by blend algorithm"
	25	}
	26