0032450: Modeling Algorithms - change BRepLib_CheckCurveOnSurface & GeomLib_CheckCurv...
[occt.git] / tests / bugs / moddata_3 / bug25861
CommitLineData
9bf3177f 1puts "================"
2puts "OCC25861"
3puts "================"
4puts ""
5#######################################################################
6# Wrong result obtained by projection algorithm.
7#######################################################################
8
9pload QAcommands
10
11restore [locate_data_file bug25861_f3.brep] f3
12
13point p 6.9184976310066668 -24.127668568051799 8.6427835999999978
14
15set info [xprojponf p f3]
16
17if { [regexp {point px +([-0-9.+eE]+) +([-0-9.+eE]+) +([-0-9.+eE]+)} ${info} string x2 y2 z2] != 1 } {
18 puts "Error: Wrong result obtained by projection algorithm"
19} else {
20 puts "OK: Good result obtained by projection algorithm"
21
22 vertex v1 p
23 vertex v2 ${x2} ${y2} ${z2}
24
25 set CMP_TOL 1.0e-7
26 distmini res v1 v2
27 set distmin [dval res_val]
28 if { [expr abs(${distmin})] > ${CMP_TOL} } {
29 puts "Error: Wrong projection point"
30 } else {
31 puts "OK: Good projection point"
32 }
33
34}