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