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

puts "============"
puts "OCC24766"
puts "============"
puts ""
#################################################
# Wrong result for distmini between a TopoDS_Shell and a TopoDS_Edge on version 6.6.0.
#################################################

restore [locate_data_file bug24766_shell_for_points.brep] s1
restore [locate_data_file bug24766_edge_to_line.brep] e1

set dist_list [distmini d s1 e1]

regexp {([-0-9.+eE]+)} [dump d_val] full dist

set expected_dist 2.09628394812595e-15
set tol_abs_dist 1.0e-12
set tol_rel_dist 0.001

checkreal "Minimal distantion" ${dist} ${expected_dist} ${tol_abs_dist} ${tol_rel_dist}
Commit	Line	Data
0e4e1240	1	puts "============"
	2	puts "OCC24766"
	3	puts "============"
	4	puts ""
	5	#################################################
	6	# Wrong result for distmini between a TopoDS_Shell and a TopoDS_Edge on version 6.6.0.
	7	#################################################
	8
	9	restore [locate_data_file bug24766_shell_for_points.brep] s1
	10	restore [locate_data_file bug24766_edge_to_line.brep] e1
	11
	12	set dist_list [distmini d s1 e1]
	13
	14	regexp {([-0-9.+eE]+)} [dump d_val] full dist
	15
	16	set expected_dist 2.09628394812595e-15
	17	set tol_abs_dist 1.0e-12
	18	set tol_rel_dist 0.001
	19
	20	checkreal "Minimal distantion" ${dist} ${expected_dist} ${tol_abs_dist} ${tol_rel_dist}