89d8607f |
1 | puts "================" |
2 | puts "OCC24137" |
3 | puts "================" |
4 | puts "" |
5 | ####################################################################### |
6 | # math_FunctionSetRoot returns too rough solution |
7 | ####################################################################### |
8 | |
9 | pload QAcommands |
10 | |
11 | vertex v 6.65634 -0.201746 2.51477 |
12 | restore [locate_data_file bug24137_face.brep] f |
13 | |
14 | OCC24137 f v 508.326 77.6999 |
15 | distmini d v result |
16 | |
17 | regexp {([-0-9.+eE]+)$} [dump d_val] full dist |
18 | set good_dist 0 |
19 | set toler 2.0e-06 |
20 | if { [expr abs( ${dist} - ${good_dist} )] > ${toler} } { |
21 | puts "Faulty : the distanse is ${dist}. It is bad value" |
22 | } |