1 # Test performance of intersection of several NURBS surfaces
3 if { [regexp {Debug mode} [dversion]] } {
12 0 0 0 1 2 0 0 1 3 0 15 1 5 0 15 1 7 0 0 1 10 0 0 1 \
13 0 2 0 1 1 3 0 1 4 2 15 1 6 3 15 1 8 2 0 1 10 3 0 1 \
14 0 4 0 1 3 4 0 1 4 3 15 1 5 3 15 1 7 4 0 1 10 5 0 1 \
15 0 6 0 1 3 6 0 1 4 6 15 1 5 6 15 1 8 5 0 1 10 7 0 1 \
16 0 8 0 1 2 8 0 1 4 8 15 1 6 8 15 1 7 7 0 1 10 8 0 1 \
17 0 10 0 1 2 10 0 1 4 10 15 1 6 10 15 1 7 10 0 1 10 10 0 1
22 0 0 10 1 2 0 5 1 3 0 4 1 5 0 6 1 7 0 10 1 10 0 5 1 \
23 0 2 5 1 1 3 7 1 4 2 7 1 6 3 4 1 8 2 4 4 10 3 7 1 \
24 0 4 8 1 3 4 10 1 4 3 6 1 5 3 8 1 7 4 7 4 10 5 5 1 \
25 0 6 8 1 3 6 10 1 4 6 6 1 5 6 4 1 8 5 7 4 10 7 10 1 \
26 0 8 6 1 2 8 5 1 4 8 8 1 6 8 8 1 7 7 3 4 10 8 5 1 \
27 0 10 8 1 2 10 10 1 4 10 6 1 6 10 5 1 7 10 3 1 10 10 10 1
30 2 7 0 3 1 1 2 1 3 1 4 1 5 1 6 3 \
32 -20 20 10 1 20 20 10 1 20 -20 10 1 -20 -20 10 1 -10 10 10 1 10 10 10 1 10 -10 10 1 -10 -10 10 1 \
33 -10 10 5 1 15 15 5 1 10 -10 5 1 -15 -15 5 1 -5 5 5 1 5 5 5 1 5 -5 5 1 -5 -5 5 1 \
34 -15 15 -5 1 10 10 -5 1 15 -15 -5 1 -10 -10 -5 1 -5 5 -5 1 5 5 -5 1 5 -5 -5 1 -5 -5 -5 1 \
35 -20 20 -10 1 20 20 -10 1 20 -20 -10 1 -20 -20 -10 1 -10 10 -10 1 10 10 -10 1 10 -10 -10 1 -10 -10 -10 1
38 4 5 0 5 2 1 4 1 5 1 6 5 \
39 4 5 0 5 1 1 4 1 6 1 7 5 \
40 10 20 -20 1 9 19 -19 1 8 18 -18 1 7 17 -17 1 7 17 17 1 8 18 18 1 9 19 19 1 10 20 20 1 \
41 10 -20 20 1 9 -19 19 1 8 -18 18 1 7 -17 17 1 7 -17 -17 1 8 -18 -18 1 9 -19 -19 1 10 -20 -20 1 \
42 10 10 -10 1 9 9 -9 1 8 8 -8 1 7 7 -7 1 7 7 7 1 8 8 8 1 9 9 9 1 10 10 10 1 \
43 10 -10 10 1 9 -9 9 1 8 -8 8 1 7 -7 7 1 7 -7 -7 1 8 -8 -8 1 9 -9 -9 1 10 -10 -10 1 \
44 -10 20 -20 1 -9 19 -19 1 -8 18 -18 1 -7 17 -17 1 -7 17 17 1 -8 18 18 1 -9 19 19 1 -10 20 20 1 \
45 -10 -20 20 1 -9 -19 19 1 -8 -18 18 1 -7 -17 17 1 -7 -17 -17 1 -8 -18 -18 1 -9 -19 -19 1 -10 -20 -20 1 \
46 -10 10 -10 1 -9 9 -9 1 -8 8 -8 1 -7 7 -7 1 -7 7 7 1 -8 8 8 1 -9 9 9 1 -10 10 10 1 \
47 -10 -10 10 1 -9 -9 9 1 -8 -8 8 1 -7 -7 7 1 -7 -7 -7 1 -8 -8 -8 1 -9 -9 -9 1 -10 -10 -10 1
51 5 5 0 6 2 1 3 1 6 1 7 6 \
54 0 20 10 1 10 20 20 1 \
59 0 70 -5 1 10 70 -3 1 \
65 5 5 0 6 2 1 3 1 6 1 7 6 \
66 0 0 0 1 2 0 0 1 5 0 -1 1 10 0 5 2 \
67 0 10 2 1 3 10 0 1 8 10 5 1 10 10 3 1 \
68 0 20 10 1 4 20 4 1 7 20 4 1 10 20 20 1 \
69 0 30 0 1 2 30 0 1 8 30 0 1 10 30 0 1 \
70 0 40 -1 1 4 40 5 1 9 40 1 1 10 40 5 1 \
71 0 50 5 1 4 50 10 1 6 50 10 1 10 50 5 1 \
72 0 60 4 1 3 60 -3 1 7 60 -4 1 10 60 4 1 \
73 0 70 -5 1 3 70 0 1 5 70 0 1 10 70 -3 1 \
74 0 80 7 1 3 80 1 1 7 80 3 1 10 80 0 1
77 5 5 0 6 1 1 4 1 5 1 8 6 \
78 5 5 0 6 2 1 3 1 6 1 7 6 \
79 0 0 0 1 2 0 0 1 5 0 -1 1 10 0 5 1 12 0 1 1 15 0 -3 1 16 0 -3 1 19 0 -4 1 24 0 0 1 \
80 0 10 2 1 3 10 0 1 8 10 5 1 10 10 3 1 12 10 2 1 15 10 0 1 20 10 5 1 21 10 3 1 24 10 0 1 \
81 0 20 10 1 4 20 4 1 7 20 4 1 10 20 20 1 12 20 10 1 16 20 4 1 19 20 4 1 20 20 10 1 24 20 0 1 \
82 0 30 0 1 2 30 0 1 8 30 0 1 10 30 0 1 12 30 0 1 14 30 0 1 20 30 0 1 22 30 0 1 24 30 0 1 \
83 0 40 -1 1 4 40 5 1 9 40 1 1 10 40 5 1 12 40 -1 1 16 40 5 1 21 40 1 1 22 40 5 1 24 40 0 1 \
84 0 50 5 1 4 50 10 1 6 50 10 1 10 50 5 1 12 50 5 1 16 50 10 1 18 50 10 1 20 50 5 1 24 50 0 1 \
85 0 60 4 1 3 60 -3 1 7 60 -4 1 10 60 4 1 12 60 4 1 15 60 -3 1 19 60 -4 1 20 60 4 1 24 60 0 1 \
86 0 70 -5 1 3 70 0 1 5 70 0 1 10 70 -3 1 12 70 -5 1 15 70 0 1 17 70 0 1 20 70 -3 1 24 70 0 1 \
87 0 80 7 1 3 80 1 1 7 80 3 1 10 80 0 1 12 80 7 1 15 80 1 1 19 80 3 1 21 80 0 1 24 80 0 1
90 5 5 0 6 1 1 4 1 5 1 8 6 \
91 5 5 0 6 2 1 3 1 6 1 7 6 \
92 0 0 -8 1 2 0 -7 1 5 0 -9 1 10 0 -8 1 12 0 -9 1 15 0 -7 1 16 0 -8 1 19 0 -8 1 24 0 -8 1 \
93 0 10 -8 1 3 10 -7 1 8 10 -9 1 10 10 -8 1 12 10 -9 1 15 10 -7 1 20 10 -8 1 21 10 -8 1 24 10 -8 1 \
94 0 20 8 1 4 20 7 1 7 20 9 1 10 20 8 1 12 20 9 1 16 20 7 1 19 20 8 1 20 20 8 1 24 20 8 1 \
95 0 30 8 1 2 30 7 1 8 30 9 1 10 30 8 1 12 30 9 1 14 30 7 1 20 30 8 1 22 30 8 1 24 30 8 1 \
96 0 40 -8 1 4 40 -7 1 9 40 -9 1 10 40 -8 1 12 40 -9 1 16 40 -7 1 21 40 -8 1 22 40 -8 1 24 40 -8 1 \
97 0 50 -8 1 4 50 -7 1 6 50 -9 1 10 50 -8 1 12 50 -9 1 16 50 -7 1 18 50 -8 1 20 50 -8 1 24 50 -8 1 \
98 0 60 8 1 3 60 7 1 7 60 9 1 10 60 8 1 12 60 9 1 15 60 7 1 19 60 8 1 20 60 8 1 24 60 8 1 \
99 0 70 8 1 3 70 7 1 5 70 9 1 10 70 8 1 12 70 9 1 15 70 7 1 17 70 8 1 20 70 8 1 24 70 8 1 \
100 0 80 8 1 3 80 7 1 7 80 9 1 10 80 8 1 12 80 9 1 15 80 7 1 19 80 8 1 21 80 8 1 24 80 8 1
103 3 4 0 4 1 1 2 1 3 4 \
104 3 4 0 4 1 1 2 1 3 4 \
105 0 0 0 1 2 0 0 1 3 0 15 1 5 0 15 1 7 0 0 1 10 0 0 1 \
106 0 2 0 1 1 3 0 2 4 2 15 2 6 3 15 2 8 2 0 2 10 3 0 1 \
107 0 4 0 1 3 4 0 2 4 3 15 3 5 3 15 3 7 4 0 2 10 5 0 1 \
108 0 6 0 1 3 6 0 2 4 6 15 3 5 6 15 3 8 5 0 2 10 7 0 1 \
109 0 8 0 1 2 8 0 2 4 8 15 2 6 8 15 2 7 7 0 2 10 8 0 1 \
110 0 10 0 1 2 10 0 1 4 10 15 1 6 10 15 1 7 10 0 1 10 10 0 1
113 3 4 0 4 1 1 2 1 3 4 \
114 3 4 0 4 1 1 2 1 3 4 \
115 0 0 10 1 2 0 5 1 3 0 4 1 5 0 6 1 7 0 10 1 10 0 5 1 \
116 0 2 5 1 1 3 7 4 4 2 7 4 6 3 4 4 8 2 4 4 10 3 7 1 \
117 0 4 8 1 3 4 10 4 4 3 6 2 5 3 8 2 7 4 7 4 10 5 5 1 \
118 0 6 8 1 3 6 10 4 4 6 6 2 5 6 4 2 8 5 7 4 10 7 10 1 \
119 0 8 6 1 2 8 5 4 4 8 8 4 6 8 8 4 7 7 3 4 10 8 5 1 \
120 0 10 8 1 2 10 10 1 4 10 6 1 6 10 5 1 7 10 3 1 10 10 10 1
123 2 7 0 3 1 1 2 1 3 1 4 1 5 1 6 3 \
125 -20 20 10 1 20 20 10 1 20 -20 10 2 -20 -20 10 2 -10 10 10 3 10 10 10 4 10 -10 10 4 -10 -10 10 2 \
126 -10 10 5 1 15 15 5 2 10 -10 5 3 -15 -15 5 1 -5 5 5 1 5 5 5 3 5 -5 5 4 -5 -5 5 3 \
127 -15 15 -5 3 10 10 -5 1 15 -15 -5 2 -10 -10 -5 2 -5 5 -5 3 5 5 -5 3 5 -5 -5 1 -5 -5 -5 4 \
128 -20 20 -10 2 20 20 -10 4 20 -20 -10 3 -20 -20 -10 3 -10 10 -10 2 10 10 -10 2 10 -10 -10 1 -10 -10 -10 1
131 4 5 0 5 2 1 4 1 5 1 6 5 \
132 4 5 0 5 1 1 4 1 6 1 7 5 \
133 10 20 -20 1 9 19 -19 1 8 18 -18 2 7 17 -17 2 7 17 17 1 8 18 18 1 9 19 19 4 10 20 20 1 \
134 10 -20 20 2 9 -19 19 2 8 -18 18 1 7 -17 17 2 7 -17 -17 4 8 -18 -18 3 9 -19 -19 3 10 -20 -20 2 \
135 10 10 -10 3 9 9 -9 4 8 8 -8 1 7 7 -7 2 7 7 7 4 8 8 8 1 9 9 9 2 10 10 10 3 \
136 10 -10 10 4 9 -9 9 2 8 -8 8 3 7 -7 7 2 7 -7 -7 1 8 -8 -8 1 9 -9 -9 1 10 -10 -10 4 \
137 -10 20 -20 4 -9 19 -19 3 -8 18 -18 3 -7 17 -17 2 -7 17 17 1 -8 18 18 2 -9 19 19 4 -10 20 20 4 \
138 -10 -20 20 3 -9 -19 19 2 -8 -18 18 3 -7 -17 17 1 -7 -17 -17 4 -8 -18 -18 2 -9 -19 -19 3 -10 -20 -20 3 \
139 -10 10 -10 2 -9 9 -9 1 -8 8 -8 3 -7 7 -7 1 -7 7 7 1 -8 8 8 1 -9 9 9 2 -10 10 10 2 \
140 -10 -10 10 1 -9 -9 9 1 -8 -8 8 2 -7 -7 7 1 -7 -7 -7 4 -8 -8 -8 1 -9 -9 -9 1 -10 -10 -10 1
144 5 5 0 6 2 1 3 1 6 1 7 6 \
147 0 20 10 1 10 20 20 4 \
149 0 40 -1 1 10 40 5 2 \
152 0 70 -5 5 10 70 -3 2 \
157 5 5 0 6 2 1 3 1 6 1 7 6 \
158 0 0 0 1 2 0 0 1 5 0 -1 1 10 0 5 2 \
159 0 10 2 3 3 10 0 1 8 10 5 3 10 10 3 1 \
160 0 20 10 1 4 20 4 3 7 20 4 2 10 20 20 4 \
161 0 30 0 2 2 30 0 1 8 30 0 1 10 30 0 2 \
162 0 40 -1 1 4 40 5 2 9 40 1 3 10 40 5 2 \
163 0 50 5 1 4 50 10 5 6 50 10 5 10 50 5 1 \
164 0 60 4 3 3 60 -3 1 7 60 -4 1 10 60 4 1 \
165 0 70 -5 5 3 70 0 1 5 70 0 1 10 70 -3 2 \
166 0 80 7 1 3 80 1 2 7 80 3 1 10 80 0 1
169 5 5 0 6 1 1 4 1 5 1 8 6 \
170 5 5 0 6 2 1 3 1 6 1 7 6 \
171 0 0 0 1 2 0 0 1 5 0 -1 1 10 0 5 2 12 0 1 1 15 0 -3 2 16 0 -3 1 19 0 -4 1 24 0 0 1 \
172 0 10 2 3 3 10 0 1 8 10 5 3 10 10 3 1 12 10 2 3 15 10 0 1 20 10 5 3 21 10 3 1 24 10 0 2 \
173 0 20 10 1 4 20 4 3 7 20 4 2 10 20 20 4 12 20 10 1 16 20 4 3 19 20 4 2 20 20 10 4 24 20 0 1 \
174 0 30 0 2 2 30 0 1 8 30 0 1 10 30 0 2 12 30 0 2 14 30 0 1 20 30 0 1 22 30 0 2 24 30 0 3 \
175 0 40 -1 1 4 40 5 2 9 40 1 3 10 40 5 2 12 40 -1 1 16 40 5 2 21 40 1 3 22 40 5 2 24 40 0 1 \
176 0 50 5 1 4 50 10 5 6 50 10 5 10 50 5 1 12 50 5 1 16 50 10 5 18 50 10 5 20 50 5 1 24 50 0 2 \
177 0 60 4 3 3 60 -3 1 7 60 -4 1 10 60 4 1 12 60 4 3 15 60 -3 1 19 60 -4 1 20 60 4 1 24 60 0 1 \
178 0 70 -5 5 3 70 0 1 5 70 0 1 10 70 -3 2 12 70 -5 5 15 70 0 1 17 70 0 1 20 70 -3 2 24 70 0 3 \
179 0 80 7 1 3 80 1 2 7 80 3 1 10 80 0 1 12 80 7 1 15 80 1 2 19 80 3 1 21 80 0 1 24 80 0 1
182 5 5 0 6 1 1 4 1 5 1 8 6 \
183 5 5 0 6 2 1 3 1 6 1 7 6 \
184 0 0 -8 1 2 0 -7 1 5 0 -9 1 10 0 -8 2 12 0 -9 1 15 0 -7 2 16 0 -8 1 19 0 -8 1 24 0 -8 1 \
185 0 10 -8 3 3 10 -7 1 8 10 -9 3 10 10 -8 1 12 10 -9 3 15 10 -7 1 20 10 -8 3 21 10 -8 1 24 10 -8 2 \
186 0 20 8 1 4 20 7 3 7 20 9 2 10 20 8 4 12 20 9 1 16 20 7 3 19 20 8 2 20 20 8 4 24 20 8 1 \
187 0 30 8 2 2 30 7 1 8 30 9 1 10 30 8 2 12 30 9 2 14 30 7 1 20 30 8 1 22 30 8 2 24 30 8 3 \
188 0 40 -8 1 4 40 -7 2 9 40 -9 3 10 40 -8 2 12 40 -9 1 16 40 -7 2 21 40 -8 3 22 40 -8 2 24 40 -8 1 \
189 0 50 -8 1 4 50 -7 5 6 50 -9 5 10 50 -8 1 12 50 -9 1 16 50 -7 5 18 50 -8 5 20 50 -8 1 24 50 -8 2 \
190 0 60 8 3 3 60 7 1 7 60 9 1 10 60 8 1 12 60 9 3 15 60 7 1 19 60 8 1 20 60 8 1 24 60 8 1 \
191 0 70 8 5 3 70 7 1 5 70 9 1 10 70 8 2 12 70 9 5 15 70 7 1 17 70 8 1 20 70 8 2 24 70 8 3 \
192 0 80 8 1 3 80 7 2 7 80 9 1 10 80 8 1 12 80 9 1 15 80 7 2 19 80 8 1 21 80 8 1 24 80 8 1
194 # intersect all surfaces
195 set surfaces [list surf1 surf2 rsurf1 surf3 rsurf2 surf4 rsurf3 surf5 rsurf4 surf6 rsurf5 surf7 rsurf6 surf8 rsurf7 rsurf8]
198 foreach s1 $surfaces {
200 # lappend shapes f_$s1
201 foreach s2 $surfaces {
204 # if { [regexp {a 3d curve} [whatis r]] } {
206 # lappend shapes e_$i
213 #eval vdisplay $shapes; vfit