annotate scene demo/freqCalcCyl2_D5Mach.pd @ 306:c57f401165ca tip

New Decision tree added
author Rod Selfridge <r.selfridge@qmul.ac.uk>
date Sat, 13 Jan 2018 14:47:35 +0000
parents e64cca8a1b70
children
rev   line source
r@120 1 #N canvas -12 23 1440 823 10;
r@118 2 #X text 921 115 Mass Density of Air;
r@118 3 #X text 145 324 Frequency (Hz);
r@118 4 #X obj 1028 486 throw~ l;
r@118 5 #X obj 1055 463 throw~ r;
r@118 6 #X obj 1043 337 osc~;
r@118 7 #X obj 1043 116 *~ 1.225;
r@118 8 #X obj 1043 191 /~ 1.81e-05;
r@118 9 #X obj 1043 146 *~ 1;
r@118 10 #X obj 1043 309 /~ 1;
r@118 11 #X floatatom 241 302 10 0 0 0 - - -;
r@118 12 #X obj 1043 285 *~;
r@118 13 #X obj 252 -51 inlet;
r@118 14 #X text 1076 235 Reynolds Number;
r@118 15 #X text 928 299 Strouhal Number;
r@118 16 #X obj 417 -53 inlet;
r@118 17 #X obj 1043 367 *~;
r@118 18 #X text 1073 171 Viscosity;
r@118 19 #X obj 838 286 *~ 2;
r@118 20 #X obj 838 313 osc~;
r@118 21 #X obj 838 335 *~;
r@118 22 #X obj 1028 396 +~;
r@118 23 #X obj 259 -28 s \$0-diameter;
r@118 24 #X obj 1104 115 r \$0-diameter;
r@118 25 #X obj 1111 290 r \$0-diameter;
r@118 26 #X obj 169 11 s~ \$0-windSpeed;
r@118 27 #X obj 341 50 r~ \$0-windSpeed;
r@118 28 #X obj 1110 267 r~ \$0-windSpeed;
r@118 29 #X obj 1043 88 r~ \$0-windSpeed;
r@118 30 #X obj 964 336 s~ \$0-myFreq;
r@118 31 #X obj 838 261 r~ \$0-myFreq;
r@118 32 #X obj 169 -31 sig~;
r@118 33 #X obj 169 -9 vd~ varwind;
r@118 34 #X obj 169 -55 inlet;
r@118 35 #X obj 1241 50 r~ \$0-myFreq;
r@118 36 #X obj 1207 0 noise~;
r@118 37 #X obj 1284 161 *~;
r@118 38 #X obj 163 124 snapshot~;
r@118 39 #X obj 163 99 metro 100;
r@118 40 #X obj 163 77 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@118 41 1;
r@118 42 #X floatatom 163 150 10 0 0 0 - - -;
r@118 43 #X obj 163 51 loadbang;
r@118 44 #X obj 77 99 r~ \$0-myRey;
r@118 45 #X obj 1056 215 s~ \$0-myRey;
r@118 46 #X obj 1422 51 snapshot~;
r@118 47 #X floatatom 1422 77 10 0 0 0 - - -;
r@118 48 #X obj 1422 -22 loadbang;
r@118 49 #X obj 1422 3 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@118 50 1;
r@118 51 #X obj 1333 -51 r~ \$0-myRey;
r@118 52 #X obj 1249 402 r~ \$0-myFreq;
r@118 53 #X obj 1215 331 noise~;
r@118 54 #X obj 1292 499 *~;
r@118 55 #X obj 1430 411 snapshot~;
r@118 56 #X floatatom 1430 437 10 0 0 0 - - -;
r@118 57 #X obj 1430 338 loadbang;
r@118 58 #X obj 1430 363 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
r@118 59 1 1;
r@118 60 #X obj 1341 309 r~ \$0-myRey;
r@118 61 #X obj 1249 428 *~ 2;
r@118 62 #X text 148 172 Reynolds Number;
r@118 63 #X obj 1207 93 vcf~ 1000 10;
r@118 64 #X obj 1215 453 vcf~ 1000 10;
r@118 65 #X obj 1028 439 fcpan;
r@118 66 #X obj 1299 134 *~ 1;
r@118 67 #X obj 1307 474 *~ 1;
r@118 68 #X obj 1341 384 clip~ 2 400;
r@118 69 #X obj 1333 24 clip~ 2 400;
r@118 70 #X obj 1341 333 *~ -0.003;
r@118 71 #X obj 1333 -27 *~ -0.003;
r@118 72 #X obj 1422 26 metro 10;
r@118 73 #X obj 1430 386 metro 10;
r@118 74 #X obj 665 -57 inlet;
r@118 75 #X floatatom 610 12 8 0 0 0 - - -;
r@118 76 #X obj 665 -33 max 0.1;
r@118 77 #X obj 665 -10 min 0.9;
r@118 78 #X text 1343 487 Drag Dipole spectrum calculation;
r@118 79 #X text 1338 151 Lift Dipole spectrum calculation;
r@118 80 #X text 853 200 Calculates the frequency;
r@118 81 #X text 853 212 based on the physics of;
r@118 82 #X text 853 225 the object and environment;
r@118 83 #X obj 345 332 r~ \$0-windSpeed;
r@118 84 #X obj 164 446 snapshot~;
r@118 85 #X obj 164 421 metro 100;
r@118 86 #X obj 164 399 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@118 87 1;
r@118 88 #X floatatom 164 472 10 0 0 0 - - -;
r@118 89 #X obj 164 373 loadbang;
r@120 90 #N canvas 665 72 843 731 noiseGain 1;
r@118 91 #X text -21205 129 Mass Density of Air \, squared;
r@118 92 #X text -20765 142 Speed of Sound to power 2;
r@118 93 #X obj -21070 29 *~;
r@118 94 #X obj -21022 70 *~;
r@118 95 #X obj -21022 104 *~ 1;
r@118 96 #X obj -21022 132 *~ 1.50063;
r@118 97 #X obj -20767 96 *;
r@118 98 #X obj -20767 119 * 118033;
r@118 99 #X obj -21022 259 /~ 1;
r@120 100 #X obj -21022 599 *~ 0.27;
r@118 101 #X text -20767 49 Distance;
r@118 102 #X obj -20916 518 *~ 0.27;
r@118 103 #X text -20937 606 Calculates Drag Dipole gain;
r@118 104 #X text -21198 525 Calculates Lift Dipole gain;
r@118 105 #N canvas 759 125 286 289 pow8 0;
r@118 106 #X obj 47 67 *~;
r@118 107 #X obj 76 67 *~;
r@118 108 #X obj 76 35 inlet~;
r@118 109 #X obj 47 170 outlet~;
r@118 110 #X obj 136 173 snapshot~;
r@118 111 #X obj 136 148 metro 100;
r@118 112 #X obj 136 126 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@118 113 1;
r@118 114 #X floatatom 136 200 10 0 0 0 - - -;
r@118 115 #X obj 136 100 loadbang;
r@118 116 #X obj 106 67 *~;
r@118 117 #X obj 47 93 *~;
r@118 118 #X obj 47 118 *~;
r@118 119 #X obj 136 67 *~;
r@118 120 #X obj 47 144 *~;
r@118 121 #X connect 0 0 10 0;
r@118 122 #X connect 1 0 10 1;
r@118 123 #X connect 2 0 0 0;
r@118 124 #X connect 2 0 0 1;
r@118 125 #X connect 2 0 1 1;
r@118 126 #X connect 2 0 9 0;
r@118 127 #X connect 2 0 9 1;
r@118 128 #X connect 2 0 1 0;
r@118 129 #X connect 2 0 12 0;
r@118 130 #X connect 2 0 12 1;
r@118 131 #X connect 4 0 7 0;
r@118 132 #X connect 5 0 4 0;
r@118 133 #X connect 6 0 5 0;
r@118 134 #X connect 8 0 6 0;
r@118 135 #X connect 9 0 11 1;
r@118 136 #X connect 10 0 11 0;
r@118 137 #X connect 11 0 13 0;
r@118 138 #X connect 12 0 13 1;
r@118 139 #X connect 13 0 3 0;
r@118 140 #X connect 13 0 4 0;
r@118 141 #X restore -21022 32 pd pow8;
r@118 142 #X obj -21070 7 inlet~;
r@118 143 #X obj -21022 7 inlet~;
r@118 144 #X obj -20989 55 inlet;
r@118 145 #X obj -20767 70 inlet;
r@120 146 #X obj -21022 642 outlet~;
r@118 147 #X obj -20916 568 outlet~;
r@118 148 #X text -20961 26 Gain proportional to windspeed to power 8 for spectrum
r@118 149 ;
r@118 150 #X text -20981 74 Diameter;
r@118 151 #X obj -20991 163 inlet;
r@118 152 #X obj -20991 187 *;
r@118 153 #X obj -21022 209 *~ 1;
r@118 154 #X text -20950 162 Length;
r@118 155 #X obj -21005 288 s~ \$0-nGain;
r@118 156 #X obj -20886 471 r~ \$0-nGain;
r@118 157 #X text -20917 291 Azimuth;
r@118 158 #X text -20856 253 Elevation;
r@118 159 #X obj -20916 308 inlet;
r@118 160 #X obj -20859 269 inlet;
r@120 161 #X obj -20916 354 angleCalc~;
r@118 162 #X obj -20916 331 sig~;
r@118 163 #X obj -20859 331 sig~;
r@118 164 #X obj -20859 311 spigot;
r@118 165 #X text -20757 275 End Source;
r@118 166 #X text -20756 294 Mid Source;
r@118 167 #X obj -21007 419 +~ 90;
r@118 168 #X obj -21007 440 /~ 360;
r@118 169 #X obj -21007 462 cos~;
r@120 170 #X obj -21022 574 *~;
r@118 171 #X obj -21007 486 *~;
r@118 172 #X obj -20916 426 /~ 360;
r@118 173 #X obj -20916 447 cos~;
r@118 174 #X obj -20916 471 *~;
r@118 175 #X obj -20916 494 *~;
r@118 176 #X obj -20807 358 loadbang;
r@118 177 #X obj -20807 379 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
r@118 178 1 1;
r@118 179 #X obj -20807 397 metro 10;
r@118 180 #X obj -20807 418 snapshot~;
r@118 181 #X floatatom -20807 438 5 0 0 0 - - -;
r@118 182 #X obj -21107 416 loadbang;
r@118 183 #X obj -21107 437 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
r@118 184 1 1;
r@118 185 #X obj -21107 455 metro 10;
r@118 186 #X obj -21107 476 snapshot~;
r@120 187 #X floatatom -21107 496 8 0 0 0 - - -;
r@118 188 #X obj -20771 448 loadbang;
r@118 189 #X obj -20771 469 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
r@118 190 1 1;
r@118 191 #X obj -20771 487 metro 10;
r@118 192 #X obj -20771 508 snapshot~;
r@120 193 #X floatatom -20771 528 8 0 0 0 - - -;
r@118 194 #X msg -20825 335 0;
r@118 195 #X obj -20788 316 t f b;
r@118 196 #X msg -20788 296 0;
r@118 197 #X msg -20788 276 1;
r@120 198 #X obj -20963 418 +~ 90;
r@120 199 #X obj -20963 439 /~ 360;
r@120 200 #X obj -20963 461 sin~;
r@120 201 #X obj -20873 426 /~ 360;
r@120 202 #X obj -20873 447 sin~;
r@120 203 #X text -21009 374 Quadrupole;
r@120 204 #X obj -21022 621 *~ 0.002;
r@120 205 #X obj -20916 543 *~ 0.0002;
r@118 206 #X connect 2 0 3 1;
r@118 207 #X connect 3 0 4 0;
r@118 208 #X connect 4 0 5 0;
r@118 209 #X connect 5 0 25 0;
r@118 210 #X connect 6 0 7 0;
r@118 211 #X connect 7 0 8 1;
r@120 212 #X connect 8 0 27 0;
r@120 213 #X connect 8 0 42 0;
r@120 214 #X connect 9 0 73 0;
r@120 215 #X connect 11 0 74 0;
r@118 216 #X connect 14 0 3 0;
r@118 217 #X connect 15 0 2 0;
r@118 218 #X connect 15 0 2 1;
r@118 219 #X connect 16 0 14 0;
r@118 220 #X connect 17 0 4 1;
r@118 221 #X connect 18 0 6 0;
r@118 222 #X connect 18 0 6 1;
r@118 223 #X connect 23 0 24 0;
r@118 224 #X connect 23 0 24 1;
r@118 225 #X connect 24 0 25 1;
r@118 226 #X connect 25 0 8 0;
r@120 227 #X connect 28 0 47 1;
r@120 228 #X connect 31 0 34 0;
r@120 229 #X connect 32 0 36 0;
r@120 230 #X connect 33 0 39 0;
r@120 231 #X connect 33 0 44 0;
r@120 232 #X connect 33 0 51 0;
r@120 233 #X connect 33 0 67 0;
r@120 234 #X connect 33 0 70 0;
r@120 235 #X connect 34 0 33 0;
r@120 236 #X connect 35 0 33 1;
r@118 237 #X connect 36 0 35 0;
r@120 238 #X connect 39 0 40 0;
r@120 239 #X connect 40 0 41 0;
r@120 240 #X connect 41 0 43 0;
r@120 241 #X connect 42 0 9 0;
r@120 242 #X connect 43 0 42 1;
r@120 243 #X connect 43 0 56 0;
r@120 244 #X connect 44 0 45 0;
r@120 245 #X connect 45 0 46 0;
r@118 246 #X connect 46 0 47 0;
r@120 247 #X connect 46 0 61 0;
r@120 248 #X connect 47 0 11 0;
r@118 249 #X connect 48 0 49 0;
r@120 250 #X connect 49 0 50 0;
r@118 251 #X connect 50 0 51 0;
r@118 252 #X connect 51 0 52 0;
r@118 253 #X connect 53 0 54 0;
r@120 254 #X connect 54 0 55 0;
r@118 255 #X connect 55 0 56 0;
r@118 256 #X connect 56 0 57 0;
r@118 257 #X connect 58 0 59 0;
r@120 258 #X connect 59 0 60 0;
r@118 259 #X connect 60 0 61 0;
r@118 260 #X connect 61 0 62 0;
r@120 261 #X connect 63 0 35 0;
r@120 262 #X connect 64 0 36 1;
r@120 263 #X connect 64 1 63 0;
r@120 264 #X connect 65 0 64 0;
r@120 265 #X connect 66 0 36 1;
r@120 266 #X connect 67 0 68 0;
r@120 267 #X connect 68 0 69 0;
r@120 268 #X connect 69 0 43 1;
r@120 269 #X connect 70 0 71 0;
r@120 270 #X connect 71 0 46 1;
r@120 271 #X connect 73 0 19 0;
r@120 272 #X connect 74 0 20 0;
r@118 273 #X restore 334 467 pd noiseGain;
r@118 274 #X obj 368 377 r \$0-diameter;
r@120 275 #N canvas 299 77 1040 691 freqGain 0;
r@118 276 #X text 36 127 Mass Density of Air \, squared;
r@118 277 #X text 411 123 Speed of Sound to power 2;
r@118 278 #N canvas 759 125 286 289 pow6 0;
r@118 279 #X obj 47 67 *~;
r@118 280 #X obj 76 67 *~;
r@118 281 #X obj 76 35 inlet~;
r@118 282 #X obj 47 163 outlet~;
r@118 283 #X obj 136 184 snapshot~;
r@118 284 #X obj 136 159 metro 100;
r@118 285 #X obj 136 137 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@118 286 1;
r@118 287 #X floatatom 136 211 10 0 0 0 - - -;
r@118 288 #X obj 216 210 outlet;
r@118 289 #X obj 136 111 loadbang;
r@118 290 #X obj 106 67 *~;
r@118 291 #X obj 47 93 *~;
r@118 292 #X obj 47 118 *~;
r@118 293 #X connect 0 0 11 0;
r@118 294 #X connect 1 0 11 1;
r@118 295 #X connect 2 0 0 0;
r@118 296 #X connect 2 0 0 1;
r@118 297 #X connect 2 0 1 1;
r@118 298 #X connect 2 0 10 0;
r@118 299 #X connect 2 0 10 1;
r@118 300 #X connect 2 0 1 0;
r@118 301 #X connect 4 0 7 0;
r@118 302 #X connect 4 0 8 0;
r@118 303 #X connect 5 0 4 0;
r@118 304 #X connect 6 0 5 0;
r@118 305 #X connect 9 0 6 0;
r@118 306 #X connect 10 0 12 1;
r@118 307 #X connect 11 0 12 0;
r@118 308 #X connect 12 0 4 0;
r@118 309 #X connect 12 0 3 0;
r@118 310 #X restore 219 30 pd pow6;
r@118 311 #X obj 173 32 *~;
r@118 312 #X obj 219 68 *~;
r@118 313 #X obj 219 102 *~ 1;
r@118 314 #X obj 219 130 *~ 1.50063;
r@118 315 #X obj 404 71 *;
r@118 316 #X obj 404 96 * 118033;
r@118 317 #X obj 219 224 /~ 1;
r@118 318 #X obj 219 497 *~ 0.27;
r@118 319 #X text 424 30 Distance;
r@118 320 #X obj 319 473 *~ 0.27;
r@118 321 #X floatatom 369 72 5 0 0 0 - - -;
r@118 322 #X text 304 556 Calculates Drag Dipole gain;
r@118 323 #X text 48 504 Calculates Lift Dipole gain;
r@118 324 #X obj 319 498 *~ 0.1;
r@118 325 #X obj 173 8 inlet~;
r@118 326 #X obj 219 7 inlet~;
r@118 327 #X text 256 54 Diameter;
r@118 328 #X obj 250 69 inlet;
r@118 329 #X obj 404 46 inlet;
r@118 330 #X obj 219 524 outlet~;
r@118 331 #X obj 319 523 outlet~;
r@118 332 #X obj 250 156 inlet;
r@118 333 #X obj 250 180 *;
r@118 334 #X text 288 151 Length;
r@118 335 #X obj 219 202 *~ 1;
r@118 336 #X text 397 195 Add in MACH deflection;
r@118 337 #X obj 236 253 s~ \$0-aGain;
r@118 338 #X obj 347 424 r~ \$0-aGain;
r@118 339 #X text 257 278 Azimuth;
r@118 340 #X text 318 240 Elevation;
r@118 341 #X obj 258 295 inlet;
r@118 342 #X obj 315 256 inlet;
r@118 343 #X obj 258 318 sig~;
r@118 344 #X obj 315 318 sig~;
r@118 345 #X obj 315 298 spigot;
r@118 346 #X text 414 265 End Source;
r@118 347 #X text 415 284 Mid Source;
r@118 348 #X obj 432 343 loadbang;
r@118 349 #X obj 432 364 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@118 350 1;
r@118 351 #X obj 432 382 metro 10;
r@118 352 #X msg 349 322 0;
r@118 353 #X obj 386 303 t f b;
r@118 354 #X msg 386 283 0;
r@118 355 #X msg 386 263 1;
r@118 356 #X obj 234 382 +~ 90;
r@118 357 #X obj 234 403 /~ 360;
r@118 358 #X obj 234 425 cos~;
r@118 359 #X obj 234 449 *~;
r@118 360 #X obj 219 472 *~;
r@118 361 #X obj 319 377 /~ 360;
r@118 362 #X obj 319 400 cos~;
r@118 363 #X obj 319 424 *~;
r@118 364 #X obj 319 449 *~;
r@118 365 #X obj 432 403 snapshot~;
r@118 366 #X floatatom 432 423 5 0 0 0 - - -;
r@118 367 #X obj 466 450 loadbang;
r@118 368 #X obj 466 471 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@118 369 1;
r@118 370 #X obj 466 489 metro 10;
r@118 371 #X obj 466 510 snapshot~;
r@118 372 #X floatatom 466 530 5 0 0 0 - - -;
r@118 373 #X obj 149 366 loadbang;
r@118 374 #X obj 149 387 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@118 375 1;
r@118 376 #X obj 149 405 metro 10;
r@118 377 #X obj 149 426 snapshot~;
r@118 378 #X floatatom 149 446 5 0 0 0 - - -;
r@118 379 #X obj 651 38 inlet;
r@118 380 #X obj 750 40 inlet;
r@118 381 #X obj 846 43 inlet;
r@118 382 #X floatatom 651 85 5 0 0 0 - - -;
r@118 383 #X floatatom 750 86 5 0 0 0 - - -;
r@118 384 #X floatatom 847 87 5 0 0 0 - - -;
r@118 385 #X text 647 19 X Rotation;
r@118 386 #X text 744 21 Y Rotation;
r@118 387 #X text 841 24 Z Rotation;
r@118 388 #X obj 656 61 s \$0-this_rotaX;
r@118 389 #X obj 757 62 s \$0-thisrotaY;
r@118 390 #X obj 854 66 s \$0-thisrotaZ;
r@120 391 #X obj 258 337 angleCalc~;
r@118 392 #X connect 2 0 4 0;
r@118 393 #X connect 3 0 4 1;
r@118 394 #X connect 4 0 5 0;
r@118 395 #X connect 5 0 6 0;
r@118 396 #X connect 6 0 27 0;
r@118 397 #X connect 7 0 8 0;
r@118 398 #X connect 8 0 9 1;
r@118 399 #X connect 9 0 29 0;
r@120 400 #X connect 9 0 51 0;
r@118 401 #X connect 10 0 22 0;
r@118 402 #X connect 12 0 16 0;
r@118 403 #X connect 16 0 23 0;
r@118 404 #X connect 17 0 3 0;
r@118 405 #X connect 17 0 3 1;
r@118 406 #X connect 18 0 2 0;
r@118 407 #X connect 20 0 5 1;
r@118 408 #X connect 21 0 7 1;
r@118 409 #X connect 21 0 7 0;
r@118 410 #X connect 21 0 13 0;
r@118 411 #X connect 24 0 25 0;
r@118 412 #X connect 24 0 25 1;
r@118 413 #X connect 25 0 27 1;
r@118 414 #X connect 27 0 9 0;
r@120 415 #X connect 30 0 55 1;
r@120 416 #X connect 33 0 35 0;
r@120 417 #X connect 34 0 37 0;
r@120 418 #X connect 35 0 80 0;
r@120 419 #X connect 36 0 80 1;
r@120 420 #X connect 37 0 36 0;
r@120 421 #X connect 40 0 41 0;
r@118 422 #X connect 41 0 42 0;
r@120 423 #X connect 42 0 56 0;
r@120 424 #X connect 43 0 36 0;
r@120 425 #X connect 44 0 37 1;
r@120 426 #X connect 44 1 43 0;
r@120 427 #X connect 45 0 44 0;
r@120 428 #X connect 46 0 37 1;
r@120 429 #X connect 47 0 48 0;
r@118 430 #X connect 48 0 49 0;
r@118 431 #X connect 49 0 50 0;
r@120 432 #X connect 49 0 50 1;
r@118 433 #X connect 50 0 51 1;
r@120 434 #X connect 50 0 66 0;
r@120 435 #X connect 51 0 10 0;
r@120 436 #X connect 52 0 53 0;
r@118 437 #X connect 53 0 54 0;
r@120 438 #X connect 53 0 54 1;
r@118 439 #X connect 54 0 55 0;
r@120 440 #X connect 54 0 61 0;
r@120 441 #X connect 55 0 12 0;
r@120 442 #X connect 56 0 57 0;
r@120 443 #X connect 58 0 59 0;
r@118 444 #X connect 59 0 60 0;
r@118 445 #X connect 60 0 61 0;
r@118 446 #X connect 61 0 62 0;
r@120 447 #X connect 63 0 64 0;
r@118 448 #X connect 64 0 65 0;
r@118 449 #X connect 65 0 66 0;
r@118 450 #X connect 66 0 67 0;
r@120 451 #X connect 68 0 71 0;
r@120 452 #X connect 68 0 77 0;
r@118 453 #X connect 69 0 72 0;
r@118 454 #X connect 69 0 78 0;
r@118 455 #X connect 70 0 73 0;
r@118 456 #X connect 70 0 79 0;
r@120 457 #X connect 80 0 47 0;
r@120 458 #X connect 80 0 52 0;
r@120 459 #X connect 80 0 56 0;
r@118 460 #X restore 331 172 pd freqGain;
r@118 461 #X obj 489 -54 inlet;
r@118 462 #X obj 362 89 r \$0-diameter;
r@118 463 #X obj 563 -55 inlet;
r@118 464 #X floatatom 417 -6 5 0 0 0 - - -;
r@118 465 #X floatatom 489 -8 5 0 0 0 - - -;
r@118 466 #X floatatom 564 -11 5 0 0 0 - - -;
r@118 467 #X obj 112 302 outlet;
r@118 468 #X obj 1207 47 hip~;
r@118 469 #X obj 156 275 snapshot~;
r@118 470 #X obj 156 228 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@118 471 1;
r@118 472 #X obj 156 202 loadbang;
r@118 473 #X obj 156 250 metro 10;
r@118 474 #X obj 1215 428 hip~;
r@118 475 #X obj 77 252 r~ \$0-myFreq;
r@118 476 #X obj 1236 375 * 2;
r@118 477 #X text 163 501 Strouhal Number;
r@118 478 #X text 321 233 Calculates the gain of the dipole source;
r@118 479 #X text 325 531 Calculates the gain of the source;
r@118 480 #X text 555 -74 Azimuth;
r@118 481 #X text 670 -75 Pan;
r@118 482 #X text 483 -73 Elevation;
r@118 483 #X text 413 -72 Distance;
r@118 484 #X text 247 -72 Diameter;
r@118 485 #X text 162 -73 Wind Speed;
r@118 486 #X obj 344 -54 inlet;
r@118 487 #X floatatom 344 -10 5 0 0 0 - - -;
r@118 488 #X text 340 -73 Length;
r@118 489 #X obj 1043 256 newStrou;
r@118 490 #X floatatom 112 -15 5 0 0 0 - - -;
r@118 491 #X floatatom 252 -7 5 0 0 0 - - -;
r@118 492 #X obj 1333 -2 +~ 30;
r@118 493 #X obj 1341 358 +~ 30;
r@118 494 #X obj 1284 249 throw~ l;
r@118 495 #X obj 1311 227 throw~ r;
r@118 496 #X obj 1284 205 fcpan;
r@118 497 #X obj 1292 587 throw~ l;
r@118 498 #X obj 1319 565 throw~ r;
r@118 499 #X obj 1292 541 fcpan;
r@118 500 #X obj 354 -31 s \$0-leng;
r@118 501 #X obj 422 -30 s \$0-dist;
r@118 502 #X obj 496 -32 s \$0-elev;
r@118 503 #X obj 571 -32 s \$0-azim;
r@118 504 #X obj 331 29 r~ \$0-str;
r@118 505 #X obj 352 69 r \$0-leng;
r@118 506 #X obj 373 109 r \$0-azim;
r@118 507 #X obj 383 130 r \$0-elev;
r@118 508 #X obj 394 151 r \$0-dist;
r@118 509 #X obj 394 196 s~ \$0-dragDiGain;
r@118 510 #X obj 331 216 s~ \$0-liftDiGain;
r@118 511 #X obj 334 309 r~ \$0-str;
r@118 512 #X obj 357 353 r \$0-leng;
r@118 513 #X obj 391 420 r \$0-elev;
r@118 514 #X obj 380 397 r \$0-azim;
r@118 515 #X obj 403 443 r \$0-dist;
r@118 516 #X obj 403 490 s~ \$0-dragNoiseGain;
r@118 517 #X obj 334 512 s~ \$0-liftNoiseGain;
r@118 518 #X obj 871 315 r~ \$0-dragDiGain;
r@118 519 #X obj 937 286 s~ \$0-str;
r@118 520 #X obj 1081 337 r~ \$0-liftDiGain;
r@118 521 #X obj 1055 410 r \$0-thisPan;
r@118 522 #X obj 665 12 s \$0-thisPan;
r@118 523 #X obj 1228 24 r \$0-contFreq;
r@118 524 #X obj 156 302 s \$0-contFreq;
r@118 525 #X obj 79 421 r~ \$0-str;
r@118 526 #X obj 1299 92 r~ \$0-liftNoiseGain;
r@118 527 #X obj 1311 186 r \$0-thisPan;
r@118 528 #X obj 1236 352 r \$0-contFreq;
r@118 529 #X obj 1307 451 r~ \$0-dragNoiseGain;
r@118 530 #X obj 1319 521 r \$0-thisPan;
r@118 531 #X obj 760 -48 inlet;
r@118 532 #X obj 832 -49 inlet;
r@118 533 #X obj 906 -50 inlet;
r@118 534 #X floatatom 760 -1 5 0 0 0 - - -;
r@118 535 #X floatatom 832 -3 5 0 0 0 - - -;
r@118 536 #X floatatom 907 -6 5 0 0 0 - - -;
r@118 537 #X obj 765 -25 s \$0-rotaX;
r@118 538 #X obj 839 -27 s \$0-rotaY;
r@118 539 #X obj 914 -27 s \$0-rotaZ;
r@118 540 #X text 756 -67 X Rotation;
r@118 541 #X text 826 -68 Y Rotation;
r@118 542 #X text 901 -69 Z Rotation;
r@118 543 #X connect 4 0 15 0;
r@118 544 #X connect 5 0 7 0;
r@118 545 #X connect 6 0 42 0;
r@118 546 #X connect 6 0 114 0;
r@118 547 #X connect 7 0 6 0;
r@118 548 #X connect 8 0 4 0;
r@118 549 #X connect 8 0 28 0;
r@118 550 #X connect 10 0 8 0;
r@118 551 #X connect 11 0 21 0;
r@118 552 #X connect 11 0 116 0;
r@118 553 #X connect 14 0 90 0;
r@118 554 #X connect 14 0 126 0;
r@118 555 #X connect 15 0 20 1;
r@118 556 #X connect 17 0 18 0;
r@118 557 #X connect 18 0 19 0;
r@118 558 #X connect 19 0 20 0;
r@118 559 #X connect 20 0 60 0;
r@118 560 #X connect 22 0 7 1;
r@118 561 #X connect 23 0 8 1;
r@118 562 #X connect 25 0 86 1;
r@118 563 #X connect 26 0 10 1;
r@118 564 #X connect 27 0 5 0;
r@118 565 #X connect 29 0 17 0;
r@118 566 #X connect 30 0 31 0;
r@118 567 #X connect 31 0 24 0;
r@118 568 #X connect 32 0 30 0;
r@118 569 #X connect 32 0 115 0;
r@118 570 #X connect 33 0 58 1;
r@118 571 #X connect 34 0 94 0;
r@118 572 #X connect 35 0 121 0;
r@118 573 #X connect 36 0 39 0;
r@118 574 #X connect 37 0 36 0;
r@118 575 #X connect 38 0 37 0;
r@118 576 #X connect 40 0 38 0;
r@118 577 #X connect 41 0 36 0;
r@118 578 #X connect 43 0 44 0;
r@118 579 #X connect 43 0 58 2;
r@118 580 #X connect 45 0 46 0;
r@118 581 #X connect 46 0 67 0;
r@118 582 #X connect 47 0 66 0;
r@118 583 #X connect 48 0 56 0;
r@118 584 #X connect 49 0 99 0;
r@118 585 #X connect 50 0 124 0;
r@118 586 #X connect 51 0 52 0;
r@118 587 #X connect 51 0 59 2;
r@118 588 #X connect 53 0 54 0;
r@118 589 #X connect 54 0 68 0;
r@118 590 #X connect 55 0 65 0;
r@118 591 #X connect 56 0 59 1;
r@118 592 #X connect 58 0 35 0;
r@118 593 #X connect 59 0 50 0;
r@118 594 #X connect 60 0 2 0;
r@118 595 #X connect 60 1 3 0;
r@118 596 #X connect 61 0 35 1;
r@118 597 #X connect 62 0 50 1;
r@118 598 #X connect 63 0 51 0;
r@118 599 #X connect 64 0 43 0;
r@118 600 #X connect 65 0 118 0;
r@118 601 #X connect 66 0 117 0;
r@118 602 #X connect 67 0 43 0;
r@118 603 #X connect 68 0 51 0;
r@118 604 #X connect 69 0 71 0;
r@118 605 #X connect 71 0 72 0;
r@118 606 #X connect 72 0 70 0;
r@118 607 #X connect 72 0 147 0;
r@118 608 #X connect 78 0 84 1;
r@118 609 #X connect 79 0 82 0;
r@118 610 #X connect 80 0 79 0;
r@118 611 #X connect 81 0 80 0;
r@118 612 #X connect 83 0 81 0;
r@118 613 #X connect 84 0 142 0;
r@118 614 #X connect 84 1 141 0;
r@118 615 #X connect 85 0 84 3;
r@118 616 #X connect 86 0 135 0;
r@118 617 #X connect 86 1 134 0;
r@118 618 #X connect 87 0 91 0;
r@118 619 #X connect 87 0 127 0;
r@118 620 #X connect 88 0 86 3;
r@118 621 #X connect 89 0 92 0;
r@118 622 #X connect 89 0 128 0;
r@118 623 #X connect 94 0 58 0;
r@118 624 #X connect 95 0 93 0;
r@118 625 #X connect 95 0 9 0;
r@118 626 #X connect 95 0 149 0;
r@118 627 #X connect 96 0 98 0;
r@118 628 #X connect 97 0 96 0;
r@118 629 #X connect 98 0 95 0;
r@118 630 #X connect 99 0 59 0;
r@118 631 #X connect 100 0 95 0;
r@118 632 #X connect 101 0 99 1;
r@118 633 #X connect 111 0 112 0;
r@118 634 #X connect 111 0 125 0;
r@118 635 #X connect 114 0 10 0;
r@118 636 #X connect 114 0 144 0;
r@118 637 #X connect 117 0 64 0;
r@118 638 #X connect 118 0 63 0;
r@118 639 #X connect 121 0 119 0;
r@118 640 #X connect 121 1 120 0;
r@118 641 #X connect 124 0 122 0;
r@118 642 #X connect 124 1 123 0;
r@118 643 #X connect 129 0 86 0;
r@118 644 #X connect 130 0 86 2;
r@118 645 #X connect 131 0 86 4;
r@118 646 #X connect 132 0 86 5;
r@118 647 #X connect 133 0 86 6;
r@118 648 #X connect 136 0 84 0;
r@118 649 #X connect 137 0 84 2;
r@118 650 #X connect 138 0 84 5;
r@118 651 #X connect 139 0 84 4;
r@118 652 #X connect 140 0 84 6;
r@118 653 #X connect 143 0 19 1;
r@118 654 #X connect 145 0 15 1;
r@118 655 #X connect 146 0 60 1;
r@118 656 #X connect 148 0 94 1;
r@118 657 #X connect 150 0 79 0;
r@118 658 #X connect 151 0 61 0;
r@118 659 #X connect 152 0 121 1;
r@118 660 #X connect 153 0 101 0;
r@118 661 #X connect 154 0 62 0;
r@118 662 #X connect 155 0 124 1;
r@118 663 #X connect 156 0 159 0;
r@118 664 #X connect 156 0 162 0;
r@118 665 #X connect 157 0 160 0;
r@118 666 #X connect 157 0 163 0;
r@118 667 #X connect 158 0 161 0;
r@118 668 #X connect 158 0 164 0;