1 puts "========================"
3 puts "========================"
5 #######################################################################
6 # The function 'distmini' produces wrong result.
7 #######################################################################
11 ###rename to bug22907_e.brep
12 restore [locate_data_file bug22907_e.brep] b2
13 vertex b1 -15.652187256227142 3.2012899919486513 9.9763479999999998
16 puts "Distance=[dval d_val]"
20 regexp {Vertex *: Min [-0-9.+eE]+ *Max *([-0-9.+eE]+)} [maxtolerance b1] full tol1
21 regexp {Edge *: Min [-0-9.+eE]+ *Max *([-0-9.+eE]+)} [maxtolerance b2] full tol2
22 regexp {Vertex *: Min [-0-9.+eE]+ *Max *([-0-9.+eE]+)} [maxtolerance b2] full tol3
24 set max_tolerance ${tol1}
25 if { ${tol2} > ${max_tolerance} } {
26 set max_tolerance ${tol2}
28 if { ${tol3} > ${max_tolerance} } {
29 set max_tolerance ${tol3}
31 puts "max_tolerance=${max_tolerance}"
33 if [expr abs( [dval d_val] - ${Good_Distance}) > ${max_tolerance}] {
41 if { ${status} == 1 } {
42 puts "Faulty ${BugNumber}"
44 puts "OK ${BugNumber}"
50 checkview -screenshot -3d -path ${imagedir}/${test_image}.png