Mercurial > hg > weather-synthesis-prototyping
comparison June/freqCalcCylD6.pd @ 117:3f2588a64b25
merged
author | Roderick Selfridge <r.selfridge@qmul.ac.uk> |
---|---|
date | Sat, 01 Aug 2015 05:48:03 +0100 |
parents | c135ff021f93 |
children |
comparison
equal
deleted
inserted
replaced
116:195db2866d0a | 117:3f2588a64b25 |
---|---|
1 #N canvas 123 74 1263 724 10; | |
2 #X text 808 -23 Mass Density of Air; | |
3 #X text 117 292 Frequency (Hz); | |
4 #X obj 885 425 throw~ l; | |
5 #X obj 912 406 throw~ r; | |
6 #X obj 900 279 osc~; | |
7 #X obj 930 -22 *~ 1.225; | |
8 #X obj 930 53 /~ 1.81e-05; | |
9 #X obj 930 8 *~ 1; | |
10 #X obj 900 228 /~ 1; | |
11 #X floatatom 211 272 10 0 0 0 - - -; | |
12 #X obj 915 96 /~; | |
13 #X obj 900 204 *~; | |
14 #X obj 900 253 clip~ 0 20000; | |
15 #X obj 222 -81 inlet; | |
16 #X text 771 46 Reynolds Number; | |
17 #X text 784 220 Strouhal Number; | |
18 #X obj 383 -83 inlet; | |
19 #X obj 900 309 *~; | |
20 #X text 960 33 Viscosity; | |
21 #X obj 664 230 *~ 2; | |
22 #X obj 664 257 osc~; | |
23 #X obj 664 279 *~; | |
24 #X obj 885 338 +~; | |
25 #X obj 222 -57 s \$0-diameter; | |
26 #X obj 991 -23 r \$0-diameter; | |
27 #X obj 980 177 r \$0-diameter; | |
28 #X obj 139 -19 s~ \$0-windSpeed; | |
29 #X obj 328 50 r~ \$0-windSpeed; | |
30 #X obj 979 146 r~ \$0-windSpeed; | |
31 #X obj 930 -50 r~ \$0-windSpeed; | |
32 #X obj 835 203 s~ \$0_str; | |
33 #X obj 318 29 r~ \$0_str; | |
34 #X obj 697 257 r~ \$0_dragDiGain; | |
35 #X obj 815 279 s~ \$0-myFreq; | |
36 #X obj 664 209 r~ \$0-myFreq; | |
37 #X obj 938 279 r~ \$0_liftDiGain; | |
38 #X obj 139 -61 sig~; | |
39 #X obj 139 -40 vd~ varwind; | |
40 #X obj 139 -85 inlet; | |
41 #X obj 1359 8 r~ \$0-myFreq; | |
42 #X obj 1325 -42 noise~; | |
43 #X obj 1402 192 throw~ l; | |
44 #X obj 1429 171 throw~ r; | |
45 #X obj 1402 99 *~; | |
46 #X obj 133 94 snapshot~; | |
47 #X obj 133 69 metro 100; | |
48 #X obj 133 47 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 | |
49 1; | |
50 #X floatatom 133 120 10 0 0 0 - - -; | |
51 #X obj 133 21 loadbang; | |
52 #X obj 59 69 r~ \$0-myRey; | |
53 #X obj 943 77 s~ \$0-myRey; | |
54 #X obj 1540 9 snapshot~; | |
55 #X floatatom 1540 35 10 0 0 0 - - -; | |
56 #X obj 1540 -64 loadbang; | |
57 #X obj 1540 -39 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 | |
58 1 1; | |
59 #X obj 1451 -93 r~ \$0-myRey; | |
60 #X obj 1367 360 r~ \$0-myFreq; | |
61 #X obj 1333 289 noise~; | |
62 #X obj 1410 549 throw~ l; | |
63 #X obj 1437 526 throw~ r; | |
64 #X obj 1410 457 *~; | |
65 #X obj 1548 369 snapshot~; | |
66 #X floatatom 1548 395 10 0 0 0 - - -; | |
67 #X obj 1548 296 loadbang; | |
68 #X obj 1548 321 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 | |
69 1 1; | |
70 #X obj 1459 267 r~ \$0-myRey; | |
71 #X obj 1367 386 *~ 2; | |
72 #X text 118 140 Reynolds Number; | |
73 #X obj 1325 51 vcf~ 1000 10; | |
74 #X obj 1333 411 vcf~ 1000 10; | |
75 #X obj 885 381 fcpan; | |
76 #X obj 1402 148 fcpan; | |
77 #X obj 1410 501 fcpan; | |
78 #X obj 1417 72 *~ 1; | |
79 #X obj 1425 432 *~ 1; | |
80 #X obj 1459 342 clip~ 2 400; | |
81 #X obj 1451 -18 clip~ 2 400; | |
82 #X obj 1459 291 *~ -0.003; | |
83 #X obj 1451 -69 *~ -0.003; | |
84 #X obj 1451 -44 +~ 20; | |
85 #X obj 1459 316 +~ 20; | |
86 #X obj 1540 -16 metro 10; | |
87 #X obj 1548 344 metro 10; | |
88 #X obj 383 -63 s \$0_dist; | |
89 #X obj 616 -90 inlet; | |
90 #X obj 616 -21 s \$0_thisPan; | |
91 #X obj 912 352 r \$0_thisPan; | |
92 #X obj 1429 124 r \$0_thisPan; | |
93 #X obj 1437 479 r \$0_thisPan; | |
94 #X floatatom 561 -21 8 0 0 0 - - -; | |
95 #X obj 616 -66 max 0.1; | |
96 #X obj 616 -43 min 0.9; | |
97 #X text 1461 445 Drag Dipole spectrum calculation; | |
98 #X text 1456 89 Lift Dipole spectrum calculation; | |
99 #X text 651 92 Calculates the frequency; | |
100 #X text 651 105 based on the physics of; | |
101 #X text 652 118 the object and environment; | |
102 #X obj 325 309 r~ \$0-windSpeed; | |
103 #X obj 314 286 r~ \$0_str; | |
104 #X obj 1425 409 r~ \$0_dragNoiseGain; | |
105 #X obj 1417 30 r~ \$0_liftNoiseGain; | |
106 #X obj 881 57 sig~ 1; | |
107 #X obj 915 122 sqrt~; | |
108 #X obj 915 147 *~ 1.0356; | |
109 #X obj 841 138 sig~ 0.2684; | |
110 #X obj 900 177 -~; | |
111 #X obj 134 416 snapshot~; | |
112 #X obj 134 391 metro 100; | |
113 #X obj 134 369 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 | |
114 1; | |
115 #X floatatom 134 442 10 0 0 0 - - -; | |
116 #X obj 134 343 loadbang; | |
117 #X obj 70 392 r~ \$0_str; | |
118 #N canvas 515 100 622 660 noiseGain 0; | |
119 #X text -21205 129 Mass Density of Air \, squared; | |
120 #X text -20857 164 Speed of Sound to power 2; | |
121 #X obj -21070 29 *~; | |
122 #X obj -21022 70 *~; | |
123 #X obj -21022 104 *~ 1; | |
124 #X obj -21022 132 *~ 1.50063; | |
125 #X obj -20859 118 *; | |
126 #X obj -20859 141 * 118033; | |
127 #X obj -21022 193 /~ 1; | |
128 #X obj -21021 422 *~ 0.27; | |
129 #X text -20859 71 Distance; | |
130 #X obj -20890 352 cos; | |
131 #X obj -20890 307 / 360; | |
132 #X floatatom -20863 403 8 0 0 0 - - -; | |
133 #X obj -20890 376 *; | |
134 #X obj -20911 435 *~ 0.27; | |
135 #X obj -20890 329 * 6.28319; | |
136 #X obj -21000 282 + 90; | |
137 #X text -20895 510 Calculates Drag Dipole gain; | |
138 #X text -21175 486 Calculates Lift Dipole gain; | |
139 #N canvas 759 125 286 289 pow8 0; | |
140 #X obj 47 67 *~; | |
141 #X obj 76 67 *~; | |
142 #X obj 76 35 inlet~; | |
143 #X obj 47 170 outlet~; | |
144 #X obj 136 173 snapshot~; | |
145 #X obj 136 148 metro 100; | |
146 #X obj 136 126 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 | |
147 1; | |
148 #X floatatom 136 200 10 0 0 0 - - -; | |
149 #X obj 136 100 loadbang; | |
150 #X obj 106 67 *~; | |
151 #X obj 47 93 *~; | |
152 #X obj 47 118 *~; | |
153 #X obj 136 67 *~; | |
154 #X obj 47 144 *~; | |
155 #X connect 0 0 10 0; | |
156 #X connect 1 0 10 1; | |
157 #X connect 2 0 0 0; | |
158 #X connect 2 0 0 1; | |
159 #X connect 2 0 1 1; | |
160 #X connect 2 0 9 0; | |
161 #X connect 2 0 9 1; | |
162 #X connect 2 0 1 0; | |
163 #X connect 2 0 12 0; | |
164 #X connect 2 0 12 1; | |
165 #X connect 4 0 7 0; | |
166 #X connect 5 0 4 0; | |
167 #X connect 6 0 5 0; | |
168 #X connect 8 0 6 0; | |
169 #X connect 9 0 11 1; | |
170 #X connect 10 0 11 0; | |
171 #X connect 11 0 13 0; | |
172 #X connect 12 0 13 1; | |
173 #X connect 13 0 3 0; | |
174 #X connect 13 0 4 0; | |
175 #X restore -21022 32 pd pow8; | |
176 #X obj -21005 222 s~ \$0-c; | |
177 #X obj -20948 385 r~ \$0-c; | |
178 #X obj -21070 7 inlet~; | |
179 #X obj -21022 7 inlet~; | |
180 #X obj -20989 55 inlet; | |
181 #X obj -20942 229 inlet; | |
182 #X obj -20873 229 inlet; | |
183 #X obj -20859 92 inlet; | |
184 #X obj -21021 465 outlet~; | |
185 #X obj -20911 485 outlet~; | |
186 #X text -20947 211 Azimuth; | |
187 #X text -20871 210 Elevation; | |
188 #X text -20961 26 Gain proportional to windspeed to power 8 for spectrum | |
189 ; | |
190 #X text -20981 74 Diameter; | |
191 #N canvas 1567 153 479 552 angleCalc 0; | |
192 #X obj 307 116 hsl 100 20 -90 90 0 0 empty empty empty -2 -8 0 10 -262144 | |
193 -1 -1 0 1; | |
194 #X text 287 77 Elevation Angle; | |
195 #X obj 236 118 / 360; | |
196 #X obj 236 140 * 6.28319; | |
197 #X obj 164 80 / 360; | |
198 #X obj 164 102 * 6.28319; | |
199 #X floatatom 49 106 5 0 0 0 - - -; | |
200 #X floatatom 304 140 5 0 0 0 - - -; | |
201 #X obj 278 443 * 360; | |
202 #X floatatom 325 494 5 0 0 0 - - -; | |
203 #X obj 278 467 / 6.28319; | |
204 #X obj 236 235 *; | |
205 #X obj 236 267 swap 1; | |
206 #X obj 236 300 -; | |
207 #X obj 236 329 sqrt; | |
208 #X obj 278 360 /; | |
209 #X obj 278 388 atan; | |
210 #X obj 278 414 * 2; | |
211 #X text 318 296 Arccos of angle; | |
212 #X obj 293 236 + 1; | |
213 #X obj 164 126 cos; | |
214 #X obj 236 171 cos; | |
215 #X obj 236 205 *; | |
216 #X obj 164 149 t f b; | |
217 #X obj 162 174 delay 9; | |
218 #X obj 278 494 outlet; | |
219 #X obj 236 90 inlet; | |
220 #X obj 164 57 inlet; | |
221 #X obj 52 80 hsl 100 20 -90 90 0 0 empty empty empty -2 -8 0 10 -262144 | |
222 -1 -1 0 1; | |
223 #X text 56 42 Azimuth Angle; | |
224 #X connect 0 0 7 0; | |
225 #X connect 2 0 3 0; | |
226 #X connect 3 0 21 0; | |
227 #X connect 4 0 5 0; | |
228 #X connect 5 0 20 0; | |
229 #X connect 8 0 10 0; | |
230 #X connect 10 0 9 0; | |
231 #X connect 10 0 25 0; | |
232 #X connect 11 0 12 0; | |
233 #X connect 12 0 13 0; | |
234 #X connect 12 1 13 1; | |
235 #X connect 13 0 14 0; | |
236 #X connect 14 0 15 0; | |
237 #X connect 15 0 16 0; | |
238 #X connect 16 0 17 0; | |
239 #X connect 17 0 8 0; | |
240 #X connect 19 0 15 1; | |
241 #X connect 20 0 23 0; | |
242 #X connect 21 0 22 0; | |
243 #X connect 22 0 11 0; | |
244 #X connect 22 0 11 1; | |
245 #X connect 22 0 19 0; | |
246 #X connect 23 0 22 1; | |
247 #X connect 23 1 24 0; | |
248 #X connect 24 0 22 0; | |
249 #X connect 26 0 2 0; | |
250 #X connect 26 0 0 0; | |
251 #X connect 27 0 4 0; | |
252 #X connect 27 0 28 0; | |
253 #X connect 28 0 6 0; | |
254 #X restore -20942 252 pd angleCalc; | |
255 #X obj -20951 117 inlet; | |
256 #X obj -20951 142 *; | |
257 #X obj -21022 167 *~ 1; | |
258 #X text -20953 99 Length; | |
259 #X obj -21000 305 / 360; | |
260 #X obj -21000 351 cos; | |
261 #X obj -21000 375 *; | |
262 #X obj -21000 328 * 6.28319; | |
263 #X obj -21021 397 *~ 1; | |
264 #X obj -20911 411 *~ 1; | |
265 #X text -20848 459 Need for scienctific reasoning here!; | |
266 #X text -21239 441 Need for scienctific reasoning here!; | |
267 #X obj -21021 444 *~ 0.02; | |
268 #X obj -20911 460 *~ 0.002; | |
269 #X connect 2 0 3 1; | |
270 #X connect 3 0 4 0; | |
271 #X connect 4 0 5 0; | |
272 #X connect 5 0 38 0; | |
273 #X connect 6 0 7 0; | |
274 #X connect 7 0 8 1; | |
275 #X connect 8 0 21 0; | |
276 #X connect 8 0 44 0; | |
277 #X connect 9 0 48 0; | |
278 #X connect 11 0 14 0; | |
279 #X connect 11 0 14 1; | |
280 #X connect 12 0 16 0; | |
281 #X connect 14 0 13 0; | |
282 #X connect 14 0 45 1; | |
283 #X connect 15 0 49 0; | |
284 #X connect 16 0 11 0; | |
285 #X connect 17 0 40 0; | |
286 #X connect 20 0 3 0; | |
287 #X connect 22 0 45 0; | |
288 #X connect 23 0 2 0; | |
289 #X connect 23 0 2 1; | |
290 #X connect 24 0 20 0; | |
291 #X connect 25 0 4 1; | |
292 #X connect 26 0 35 0; | |
293 #X connect 27 0 35 1; | |
294 #X connect 28 0 6 0; | |
295 #X connect 28 0 6 1; | |
296 #X connect 35 0 17 0; | |
297 #X connect 35 0 12 0; | |
298 #X connect 36 0 37 0; | |
299 #X connect 36 0 37 1; | |
300 #X connect 37 0 38 1; | |
301 #X connect 38 0 8 0; | |
302 #X connect 40 0 43 0; | |
303 #X connect 41 0 42 0; | |
304 #X connect 41 0 42 1; | |
305 #X connect 42 0 44 1; | |
306 #X connect 43 0 41 0; | |
307 #X connect 44 0 9 0; | |
308 #X connect 45 0 15 0; | |
309 #X connect 48 0 29 0; | |
310 #X connect 49 0 30 0; | |
311 #X restore 314 438 pd noiseGain; | |
312 #X obj 337 330 r \$0-diameter; | |
313 #X obj 383 414 r \$0_dist; | |
314 #X obj 371 392 r \$0_azim; | |
315 #X obj 360 371 r \$0_elev; | |
316 #X obj 314 483 s~ \$0_liftNoiseGain; | |
317 #X obj 383 461 s~ \$0_dragNoiseGain; | |
318 #N canvas 576 101 702 650 freqGain 0; | |
319 #X text 36 127 Mass Density of Air \, squared; | |
320 #X text 508 93 Speed of Sound to power 2; | |
321 #N canvas 759 125 286 289 pow6 0; | |
322 #X obj 47 67 *~; | |
323 #X obj 76 67 *~; | |
324 #X obj 76 35 inlet~; | |
325 #X obj 47 163 outlet~; | |
326 #X obj 136 184 snapshot~; | |
327 #X obj 136 159 metro 100; | |
328 #X obj 136 137 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 | |
329 1; | |
330 #X floatatom 136 211 10 0 0 0 - - -; | |
331 #X obj 216 210 outlet; | |
332 #X obj 136 111 loadbang; | |
333 #X obj 106 67 *~; | |
334 #X obj 47 93 *~; | |
335 #X obj 47 118 *~; | |
336 #X connect 0 0 11 0; | |
337 #X connect 1 0 11 1; | |
338 #X connect 2 0 0 0; | |
339 #X connect 2 0 0 1; | |
340 #X connect 2 0 1 1; | |
341 #X connect 2 0 10 0; | |
342 #X connect 2 0 10 1; | |
343 #X connect 2 0 1 0; | |
344 #X connect 4 0 7 0; | |
345 #X connect 4 0 8 0; | |
346 #X connect 5 0 4 0; | |
347 #X connect 6 0 5 0; | |
348 #X connect 9 0 6 0; | |
349 #X connect 10 0 12 1; | |
350 #X connect 11 0 12 0; | |
351 #X connect 12 0 4 0; | |
352 #X connect 12 0 3 0; | |
353 #X restore 219 30 pd pow6; | |
354 #X obj 173 32 *~; | |
355 #X obj 219 68 *~; | |
356 #X obj 219 102 *~ 1; | |
357 #X obj 219 130 *~ 1.50063; | |
358 #X obj 506 45 *; | |
359 #X obj 506 70 * 118033; | |
360 #X obj 219 240 /~ 1; | |
361 #X obj 219 506 *~ 0.27; | |
362 #X text 380 261 Azimuth; | |
363 #X text 497 1 Distance; | |
364 #X obj 419 420 cos; | |
365 #X obj 419 375 / 360; | |
366 #X floatatom 446 466 8 0 0 0 - - -; | |
367 #X obj 419 444 *; | |
368 #X obj 398 491 *~ 0.27; | |
369 #X obj 236 269 s~ \$0-a; | |
370 #X obj 357 441 r~ \$0-a; | |
371 #X obj 419 397 * 6.28319; | |
372 #X floatatom 471 46 5 0 0 0 - - -; | |
373 #N canvas 131 175 477 312 angleCalc 0; | |
374 #X obj 297 33 hsl 100 20 -90 90 0 0 empty empty empty -2 -8 0 10 -262144 | |
375 -1 -1 0 1; | |
376 #X text 233 6 Elevation Angle; | |
377 #X obj 242 59 / 360; | |
378 #X obj 242 81 * 6.28319; | |
379 #X obj 170 21 / 360; | |
380 #X obj 170 43 * 6.28319; | |
381 #X floatatom 50 22 5 0 0 0 - - -; | |
382 #X floatatom 294 57 5 0 0 0 - - -; | |
383 #X floatatom 204 196 5 0 0 0 - - -; | |
384 #X obj 170 67 cos; | |
385 #X obj 242 112 cos; | |
386 #X obj 242 146 *; | |
387 #X obj 170 90 t f b; | |
388 #X obj 168 115 delay 9; | |
389 #X obj 242 197 outlet; | |
390 #X obj 242 31 inlet; | |
391 #X obj 170 -6 inlet; | |
392 #X obj 53 -4 hsl 100 20 -90 90 0 0 empty empty empty -2 -8 0 10 -262144 | |
393 -1 -1 0 1; | |
394 #X text 136 -30 Azimuth Angle; | |
395 #X obj 242 172 arccos; | |
396 #X connect 0 0 7 0; | |
397 #X connect 0 0 2 0; | |
398 #X connect 2 0 3 0; | |
399 #X connect 3 0 10 0; | |
400 #X connect 4 0 5 0; | |
401 #X connect 5 0 9 0; | |
402 #X connect 9 0 12 0; | |
403 #X connect 10 0 11 0; | |
404 #X connect 11 0 19 0; | |
405 #X connect 12 0 11 1; | |
406 #X connect 12 1 13 0; | |
407 #X connect 13 0 11 0; | |
408 #X connect 15 0 2 0; | |
409 #X connect 16 0 4 0; | |
410 #X connect 17 0 6 0; | |
411 #X connect 17 0 4 0; | |
412 #X connect 19 0 14 0; | |
413 #X connect 19 0 8 0; | |
414 #X restore 365 297 pd angleCalc; | |
415 #X text 451 260 Elevation; | |
416 #X text 476 498 Calculates Drag Dipole gain; | |
417 #X text 48 445 Calculates Lift Dipole gain; | |
418 #X obj 398 516 *~ 0.1; | |
419 #X obj 173 8 inlet~; | |
420 #X obj 219 7 inlet~; | |
421 #X text 256 54 Diameter; | |
422 #X obj 250 69 inlet; | |
423 #X obj 506 20 inlet; | |
424 #X obj 365 276 inlet; | |
425 #X obj 434 275 inlet; | |
426 #X obj 219 530 outlet~; | |
427 #X obj 398 541 outlet~; | |
428 #X obj 297 125 inlet; | |
429 #X obj 297 149 *; | |
430 #X obj 219 193 *~ 1; | |
431 #X text 292 106 Length; | |
432 #X obj 240 388 / 360; | |
433 #X obj 240 434 cos; | |
434 #X obj 240 458 *; | |
435 #X obj 240 411 * 6.28319; | |
436 #X obj 398 467 *~ 1; | |
437 #X obj 219 481 *~ 1; | |
438 #X obj 305 247 arccos; | |
439 #X obj 305 223 r sigMac; | |
440 #X obj 240 362 +; | |
441 #X obj 305 269 t f b; | |
442 #X obj 240 323 delay 9; | |
443 #X text 309 203 Replicates Doppler effect; | |
444 #X connect 2 0 4 0; | |
445 #X connect 3 0 4 1; | |
446 #X connect 4 0 5 0; | |
447 #X connect 5 0 6 0; | |
448 #X connect 6 0 38 0; | |
449 #X connect 7 0 8 0; | |
450 #X connect 8 0 9 1; | |
451 #X connect 9 0 18 0; | |
452 #X connect 9 0 45 0; | |
453 #X connect 10 0 34 0; | |
454 #X connect 13 0 16 0; | |
455 #X connect 13 0 16 1; | |
456 #X connect 14 0 20 0; | |
457 #X connect 16 0 15 0; | |
458 #X connect 16 0 44 1; | |
459 #X connect 17 0 26 0; | |
460 #X connect 19 0 44 0; | |
461 #X connect 20 0 13 0; | |
462 #X connect 22 0 14 0; | |
463 #X connect 22 0 48 0; | |
464 #X connect 26 0 35 0; | |
465 #X connect 27 0 3 0; | |
466 #X connect 27 0 3 1; | |
467 #X connect 28 0 2 0; | |
468 #X connect 30 0 5 1; | |
469 #X connect 31 0 7 1; | |
470 #X connect 31 0 7 0; | |
471 #X connect 31 0 21 0; | |
472 #X connect 32 0 22 0; | |
473 #X connect 33 0 22 1; | |
474 #X connect 36 0 37 0; | |
475 #X connect 36 0 37 1; | |
476 #X connect 37 0 38 1; | |
477 #X connect 38 0 9 0; | |
478 #X connect 40 0 43 0; | |
479 #X connect 41 0 42 0; | |
480 #X connect 41 0 42 1; | |
481 #X connect 42 0 45 1; | |
482 #X connect 43 0 41 0; | |
483 #X connect 44 0 17 0; | |
484 #X connect 45 0 10 0; | |
485 #X connect 46 0 49 0; | |
486 #X connect 47 0 46 0; | |
487 #X connect 48 0 40 0; | |
488 #X connect 49 0 48 1; | |
489 #X connect 49 1 50 0; | |
490 #X connect 50 0 48 0; | |
491 #X restore 318 180 pd freqGain; | |
492 #X obj 452 -83 inlet; | |
493 #X obj 452 -63 s \$0_elev; | |
494 #X obj 339 71 r \$0-diameter; | |
495 #X obj 520 -85 inlet; | |
496 #X obj 520 -63 s \$0_azim; | |
497 #X obj 381 159 r \$0_dist; | |
498 #X obj 360 116 r \$0_azim; | |
499 #X obj 370 137 r \$0_elev; | |
500 #X obj 381 204 s~ \$0_dragDiGain; | |
501 #X obj 318 224 s~ \$0_liftDiGain; | |
502 #X floatatom 383 -36 5 0 0 0 - - -; | |
503 #X floatatom 453 -37 5 0 0 0 - - -; | |
504 #X floatatom 521 -41 5 0 0 0 - - -; | |
505 #X obj 82 272 outlet; | |
506 #X obj 1325 5 hip~; | |
507 #X obj 126 245 snapshot~; | |
508 #X obj 126 198 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 | |
509 1; | |
510 #X obj 126 172 loadbang; | |
511 #X obj 126 220 metro 10; | |
512 #X obj 1333 386 hip~; | |
513 #X obj 47 222 r~ \$0-myFreq; | |
514 #X obj 126 272 s \$0_contFreq; | |
515 #X obj 1346 -18 r \$0_contFreq; | |
516 #X obj 1354 310 r \$0_contFreq; | |
517 #X obj 1354 333 * 2; | |
518 #X text 122 463 Strouhal Number; | |
519 #X text 308 241 Calculates the gain of the dipole source; | |
520 #X text 305 502 Calculates the gain of the source; | |
521 #X text 512 -104 Azimuth; | |
522 #X text 621 -108 Pan; | |
523 #X text 446 -102 Elevation; | |
524 #X text 379 -102 Distance; | |
525 #X text 217 -102 Diameter; | |
526 #X text 132 -103 Wind Speed; | |
527 #X obj 314 -82 inlet; | |
528 #X floatatom 315 -38 5 0 0 0 - - -; | |
529 #X text 310 -101 Length; | |
530 #X obj 314 -60 s \$0_leng; | |
531 #X obj 348 351 r \$0_leng; | |
532 #X obj 349 94 r \$0_leng; | |
533 #X connect 4 0 17 0; | |
534 #X connect 5 0 7 0; | |
535 #X connect 6 0 10 1; | |
536 #X connect 6 0 50 0; | |
537 #X connect 7 0 6 0; | |
538 #X connect 8 0 12 0; | |
539 #X connect 10 0 102 0; | |
540 #X connect 11 0 8 0; | |
541 #X connect 12 0 4 0; | |
542 #X connect 12 0 33 0; | |
543 #X connect 13 0 23 0; | |
544 #X connect 16 0 83 0; | |
545 #X connect 16 0 130 0; | |
546 #X connect 17 0 22 1; | |
547 #X connect 19 0 20 0; | |
548 #X connect 20 0 21 0; | |
549 #X connect 21 0 22 0; | |
550 #X connect 22 0 70 0; | |
551 #X connect 24 0 7 1; | |
552 #X connect 25 0 8 1; | |
553 #X connect 27 0 119 1; | |
554 #X connect 28 0 11 1; | |
555 #X connect 29 0 5 0; | |
556 #X connect 31 0 119 0; | |
557 #X connect 32 0 21 1; | |
558 #X connect 34 0 19 0; | |
559 #X connect 35 0 17 1; | |
560 #X connect 36 0 37 0; | |
561 #X connect 37 0 26 0; | |
562 #X connect 38 0 36 0; | |
563 #X connect 39 0 68 1; | |
564 #X connect 40 0 134 0; | |
565 #X connect 43 0 71 0; | |
566 #X connect 44 0 47 0; | |
567 #X connect 45 0 44 0; | |
568 #X connect 46 0 45 0; | |
569 #X connect 48 0 46 0; | |
570 #X connect 49 0 44 0; | |
571 #X connect 51 0 52 0; | |
572 #X connect 51 0 68 2; | |
573 #X connect 53 0 54 0; | |
574 #X connect 54 0 81 0; | |
575 #X connect 55 0 78 0; | |
576 #X connect 56 0 66 0; | |
577 #X connect 57 0 139 0; | |
578 #X connect 60 0 72 0; | |
579 #X connect 61 0 62 0; | |
580 #X connect 61 0 69 2; | |
581 #X connect 63 0 64 0; | |
582 #X connect 64 0 82 0; | |
583 #X connect 65 0 77 0; | |
584 #X connect 66 0 69 1; | |
585 #X connect 68 0 43 0; | |
586 #X connect 69 0 60 0; | |
587 #X connect 70 0 2 0; | |
588 #X connect 70 1 3 0; | |
589 #X connect 71 0 41 0; | |
590 #X connect 71 1 42 0; | |
591 #X connect 72 0 58 0; | |
592 #X connect 72 1 59 0; | |
593 #X connect 73 0 43 1; | |
594 #X connect 74 0 60 1; | |
595 #X connect 75 0 61 0; | |
596 #X connect 76 0 51 0; | |
597 #X connect 77 0 80 0; | |
598 #X connect 78 0 79 0; | |
599 #X connect 79 0 76 0; | |
600 #X connect 80 0 75 0; | |
601 #X connect 81 0 51 0; | |
602 #X connect 82 0 61 0; | |
603 #X connect 84 0 90 0; | |
604 #X connect 86 0 70 1; | |
605 #X connect 87 0 71 1; | |
606 #X connect 88 0 72 1; | |
607 #X connect 90 0 91 0; | |
608 #X connect 91 0 85 0; | |
609 #X connect 91 0 89 0; | |
610 #X connect 97 0 112 1; | |
611 #X connect 98 0 112 0; | |
612 #X connect 99 0 74 0; | |
613 #X connect 100 0 73 0; | |
614 #X connect 101 0 10 0; | |
615 #X connect 102 0 103 0; | |
616 #X connect 103 0 105 1; | |
617 #X connect 104 0 105 0; | |
618 #X connect 105 0 30 0; | |
619 #X connect 105 0 11 0; | |
620 #X connect 106 0 109 0; | |
621 #X connect 107 0 106 0; | |
622 #X connect 108 0 107 0; | |
623 #X connect 110 0 108 0; | |
624 #X connect 111 0 106 0; | |
625 #X connect 112 0 117 0; | |
626 #X connect 112 1 118 0; | |
627 #X connect 113 0 112 2; | |
628 #X connect 114 0 112 6; | |
629 #X connect 115 0 112 5; | |
630 #X connect 116 0 112 4; | |
631 #X connect 119 0 129 0; | |
632 #X connect 119 1 128 0; | |
633 #X connect 120 0 121 0; | |
634 #X connect 120 0 131 0; | |
635 #X connect 122 0 119 2; | |
636 #X connect 123 0 124 0; | |
637 #X connect 123 0 132 0; | |
638 #X connect 125 0 119 6; | |
639 #X connect 126 0 119 4; | |
640 #X connect 127 0 119 5; | |
641 #X connect 134 0 68 0; | |
642 #X connect 135 0 141 0; | |
643 #X connect 135 0 133 0; | |
644 #X connect 135 0 9 0; | |
645 #X connect 136 0 138 0; | |
646 #X connect 137 0 136 0; | |
647 #X connect 138 0 135 0; | |
648 #X connect 139 0 69 0; | |
649 #X connect 140 0 135 0; | |
650 #X connect 142 0 134 1; | |
651 #X connect 143 0 144 0; | |
652 #X connect 144 0 139 1; | |
653 #X connect 154 0 155 0; | |
654 #X connect 154 0 157 0; | |
655 #X connect 158 0 112 3; | |
656 #X connect 159 0 119 3; |