0025950: Bad performance of intersection algorithm.
[occt.git] / tests / lowalgos / intss / bug25950
1 puts "========="
2 puts "0025950: Bad performance of intersection algorithm."
3 puts "========="
4 puts ""
5
6 cpulimit 200
7
8 puts "TODO 0025950 ALL: Error: 0 vertices are expected but 2 are found."
9 puts "TODO 0025950 ALL: Error : The length of result shape is 18.8605"
10
11 set aGoodNbCurves 3
12
13 foreach a [directory res*] {unset $a}
14
15 restore [locate_data_file bug25950_b1.brep] b1
16 restore [locate_data_file bug25950_b2.brep] b2
17
18 mksurface s1 b1
19 mksurface s2 b2
20
21 don s1 s2
22 clpoles s1
23 clpoles s2
24 clknots
25
26 dchrono z reset
27 dchrono z start
28
29 intersect res s1 s2 
30
31 dchrono z stop counter Bug25950IntSS
32 dchrono z show 
33
34 smallview +Y+Z
35 fit
36 checkview -screenshot -2d -path ${imagedir}/${test_image}_2d.png
37
38 set che [whatis res]
39 set ind [string first "3d curve" $che]
40 if {${ind} >= 0} {
41   #Only variable "res" exists
42   renamevar res res_1
43 }
44
45 bclearobjects
46 bcleartools
47 compound IntEdges
48
49 set CurvesList {}
50
51 set ic 1
52 set AllowRepeat 1
53 while { $AllowRepeat != 0 } {
54   set che [whatis res_$ic]
55   set ind [string first "3d curve" $che]
56   if {${ind} < 0} {
57     set AllowRepeat 0
58   } else {
59     lappend CurvesList res_$ic
60     mkedge ee res_$ic
61     baddobjects ee
62     incr ic
63   }
64 }
65
66 set ic [expr $ic - 1]
67
68 if { $ic != $aGoodNbCurves } {
69   puts "Error: $aGoodNbCurves curves is expected but $ic ones are found"
70 } else {
71   CheckIntersectionResult s1 s2 $CurvesList 100 7.0e-5 2.0e-4
72   CheckOverlapIntCurves $CurvesList
73   if {$ic > 1} {
74     bfillds
75     bbuild result    
76   } elseif {$ic > 0} {
77     mkedge result res_1
78   }
79   
80   # Check gaps between intersection curves
81   checksection result -r 0
82   checkmaxtol result -min_tol 2.0e-7
83
84   checknbshapes result -edge 3 -vertex 4
85   checkprops result -l 37.721
86 }
87
88 checkview -display result -2d -path ${imagedir}/${test_image}_3d.png