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

puts "============"
puts "OCC25004"
puts "============"
puts ""
##########################################################################################################
# Extrema_ExtCC::Extrema curve/curve incorrect result
##########################################################################################################

pload QAcommands

set info [OCC25004]
regexp {F += +([-0-9.+eE]+)} $info full aF
regexp {NbExtrema += +([-0-9.+eE]+)} $info full aNb

set expected_F 0.39788735772
set expected_aNb 3
set tol_abs_dist 1.0e-12
set tol_rel_dist 0.1

checkreal "value F" ${aF} ${expected_F} ${tol_abs_dist} ${tol_rel_dist}
checkreal "Nbextrema" ${aNb} ${expected_aNb} ${tol_abs_dist} ${tol_rel_dist}
Commit	Line	Data
5493d334	1	puts "============"
	2	puts "OCC25004"
	3	puts "============"
	4	puts ""
	5	##########################################################################################################
	6	# Extrema_ExtCC::Extrema curve/curve incorrect result
	7	##########################################################################################################
	8
	9	pload QAcommands
	10
	11	set info [OCC25004]
	12	regexp {F += +([-0-9.+eE]+)} $info full aF
	13	regexp {NbExtrema += +([-0-9.+eE]+)} $info full aNb
	14
	15	set expected_F 0.39788735772
	16	set expected_aNb 3
	17	set tol_abs_dist 1.0e-12
	18	set tol_rel_dist 0.1
	19
	20	checkreal "value F" ${aF} ${expected_F} ${tol_abs_dist} ${tol_rel_dist}
	21	checkreal "Nbextrema" ${aNb} ${expected_aNb} ${tol_abs_dist} ${tol_rel_dist}
	22