0027341: Incorrect exact HLR results
[occt.git] / tests / bugs / modalg_6 / bug26356
1 puts "========"
2 puts "OCC26356"
3 puts "========"
4 puts ""
5 #############################################
6 # Wrong result done by projection algorithm
7 #############################################
8
9 restore [locate_data_file OCC26356-f.brep] b1
10 restore [locate_data_file OCC26356-w.brep] b2
11
12 explode b2 v
13
14 point p1 31350.009765625 7100 -2.17374844144233e-013
15 set bug_info_1 [projponf b1 p1 -min -g]
16 set bug_info_1 [string trim [string range $bug_info_1 [expr {[string first "=" $bug_info_1] + 1}] [expr {[string length $bug_info_1] - 1}]]]
17 set bug_info_1 [string trim [string range $bug_info_1 0 [expr {[string first " " $bug_info_1] - 1}]]]
18 set bug_info_2 [projponf b1 p1 -minmax -g]
19 set bug_info_2 [string trim [string range $bug_info_2 [expr {[string first "=" $bug_info_2] + 1}] [expr {[string length $bug_info_2] - 1}]]]
20 set bug_info_2 [string trim [string range $bug_info_2 0 [expr {[string first " " $bug_info_2] - 1}]]]
21
22 point p2 29200.099609375 7100 -2.17374753743702e-013
23 set bug_info_3 [projponf b1 p2 -min -g]
24 set bug_info_3 [string trim [string range $bug_info_3 [expr {[string first "=" $bug_info_3] + 1}] [expr {[string length $bug_info_3] - 1}]]]
25 set bug_info_3 [string trim [string range $bug_info_3 0 [expr {[string first " " $bug_info_3] - 1}]]]
26 set bug_info_4 [projponf b1 p2 -minmax -g]
27 set bug_info_4 [string trim [string range $bug_info_4 [expr {[string first "=" $bug_info_4] + 1}] [expr {[string length $bug_info_4] - 1}]]]
28 set bug_info_4 [string trim [string range $bug_info_4 0 [expr {[string first " " $bug_info_4] - 1}]]]
29
30 if {$bug_info_1 != $bug_info_2} {
31   puts "ERROR: OCC26356 is reproduced."
32   puts "For point #1: distance min is: ${bug_info_1}, distance minmax is: ${bug_info_2}."
33 }
34 if {$bug_info_3 != $bug_info_4} {
35   puts "ERROR: OCC26356 is reproduced."
36   puts "For point #2: distance min is: ${bug_info_3}, distance minmax is: ${bug_info_4}."
37 }