0027341: Incorrect exact HLR results
[occt.git] / tests / bugs / modalg_6 / bug26352
CommitLineData
c7283baa 1puts "========"
2puts "OCC26352"
3puts "========"
4puts ""
5#############################################################################
6# Wrong intersection points found
7#############################################################################
8
9restore [locate_data_file bug26316_shape1.brep] b1
10restore [locate_data_file bug26316_shape2.brep] b2
11
12explode b1 f
13explode b2 f
14
15set log1 [bopcurves b1_10 b2_3]
16set log2 [bopcurves b1_10 b2_10]
17set log3 [bopcurves b1_11 b2_1]
18set log4 [bopcurves b1_11 b2_7]
19
20set search_str "has no 3d points"
21
22if { [regexp ${search_str} ${log1}] != 1 } {
23 puts "Error : Wrong intersection point found (1)"
24} else {
25 puts "OK : Good result obtained by intersection algorithm (1)"
26}
27
28if { [regexp ${search_str} ${log2}] != 1 } {
29 puts "Error : Wrong intersection point found (2)"
30} else {
31 puts "OK : Good result obtained by intersection algorithm (2)"
32}
33
34if { [regexp ${search_str} ${log3}] != 1 } {
35 puts "Error : Wrong intersection point found (3)"
36} else {
37 puts "OK : Good result obtained by intersection algorithm (3)"
38}
39
40if { [regexp ${search_str} ${log4}] != 1 } {
41 puts "Error : Wrong intersection point found (4)"
42} else {
43 puts "OK : Good result obtained by intersection algorithm (4)"
44}