5 #######################################################################
6 # Wrong intersection point
7 #######################################################################
9 restore [locate_data_file bug24065_f.brep] f
10 restore [locate_data_file bug24065_e.brep] e
15 checkmaxtol f -min_tol ${CMP_TOL}
22 set CMP_DIST 1.86835288e-8
23 set distmax [projponf f i_2]
24 regexp {proj dist = ([-0-9.+eE]+)} ${distmax} full MaxDist
25 if { [expr abs(${MaxDist} - ${CMP_DIST})] > ${CMP_TOL} } {
26 puts "Error: Wrong intersection point"