view June/thisFreq.pd @ 41:52511c74c3f1

Numerous improvements based on physics equation, inc intensity and azimuth angle calculations

#N canvas 810 373 1223 757 10;
#X text 46 -77 Mass Density of Air;
#X text 237 301 Frequency (Hz);
#X obj 327 -119 inlet~;
#X obj 99 345 throw~ l;
#X obj 164 345 throw~ r;
#X obj 139 243 osc~;
#X obj 168 -76 *~ 1.225;
#X obj 168 -1 /~ 1.81e-05;
#X obj 138 102 *~ 0.198;
#X obj 168 -46 *~ 1;
#X obj 138 162 /~ 1;
#X obj 247 249 snapshot~;
#X obj 247 224 metro 100;
#X obj 247 202 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X floatatom 247 276 10 0 0 0 - - -;
#X obj 99 18 sig~ 19.7;
#X obj 153 42 /~;
#X obj 99 42 sig~ 1;
#X obj 138 71 -~;
#X obj 138 131 *~;
#X obj 138 205 clip~ 0 20000;
#X obj 329 -83 inlet;
#X obj 327 275 outlet;
#X obj 247 176 loadbang;
#X text 290 37 Mass Density of Air \, squared;
#X text 550 20 Speed of Sound to power 2;
#N canvas 759 125 286 289 pow6 0;
#X obj 47 67 *~;
#X obj 76 67 *~;
#X obj 76 35 inlet~;
#X obj 47 163 outlet~;
#X obj 136 184 snapshot~;
#X obj 136 159 metro 100;
#X obj 136 137 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X floatatom 136 211 10 0 0 0 - - -;
#X obj 216 210 outlet;
#X obj 136 111 loadbang;
#X obj 106 67 *~;
#X obj 47 93 *~;
#X obj 47 118 *~;
#X connect 0 0 11 0;
#X connect 1 0 11 1;
#X connect 2 0 0 0;
#X connect 2 0 0 1;
#X connect 2 0 1 1;
#X connect 2 0 10 0;
#X connect 2 0 10 1;
#X connect 2 0 1 0;
#X connect 4 0 7 0;
#X connect 4 0 8 0;
#X connect 5 0 4 0;
#X connect 6 0 5 0;
#X connect 9 0 6 0;
#X connect 10 0 12 1;
#X connect 11 0 12 0;
#X connect 12 0 4 0;
#X connect 12 0 3 0;
#X restore 413 -78 pd pow6;
#X text 9 -8 Reynolds Number;
#X text 17 174 Strouhal Number;
#X obj 376 -65 *~;
#X obj 413 -40 *~;
#X obj 413 -6 *~ 1;
#X obj 413 22 *~ 1.50063;
#X obj 491 -29 inlet;
#X obj 491 -4 *;
#X obj 491 21 * 118033;
#X obj 413 57 /~ 1;
#X obj 501 43 inlet;
#X obj 501 112 cos;
#X obj 501 67 / 360;
#X obj 501 89 * 6.28319;
#X obj 413 155 *~ 0.27;
#X obj 139 285 *~;
#X obj 441 260 snapshot~;
#X obj 441 235 metro 100;
#X obj 441 213 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X floatatom 441 287 10 0 0 0 - - -;
#X obj 521 286 outlet;
#X obj 441 187 loadbang;
#X floatatom 501 161 5 0 0 0 - - -;
#X obj 501 136 *;
#X text 546 46 Azimuth;
#X text 490 -49 Distance;
#X obj 336 200 *~ 1e-05;
#X obj 413 130 *~ 1;
#X connect 2 0 6 0;
#X connect 2 0 19 1;
#X connect 2 0 26 0;
#X connect 5 0 42 0;
#X connect 6 0 9 0;
#X connect 7 0 16 1;
#X connect 8 0 19 0;
#X connect 9 0 7 0;
#X connect 10 0 20 0;
#X connect 10 0 29 0;
#X connect 10 0 29 1;
#X connect 11 0 14 0;
#X connect 11 0 22 0;
#X connect 12 0 11 0;
#X connect 13 0 12 0;
#X connect 15 0 16 0;
#X connect 16 0 18 1;
#X connect 17 0 18 0;
#X connect 18 0 8 0;
#X connect 19 0 10 0;
#X connect 20 0 5 0;
#X connect 20 0 11 0;
#X connect 21 0 9 1;
#X connect 21 0 10 1;
#X connect 21 0 31 1;
#X connect 23 0 13 0;
#X connect 26 0 30 0;
#X connect 29 0 30 1;
#X connect 30 0 31 0;
#X connect 31 0 32 0;
#X connect 32 0 36 0;
#X connect 33 0 34 0;
#X connect 33 0 34 1;
#X connect 34 0 35 0;
#X connect 35 0 36 1;
#X connect 36 0 54 0;
#X connect 37 0 39 0;
#X connect 38 0 50 0;
#X connect 38 0 50 1;
#X connect 39 0 40 0;
#X connect 40 0 38 0;
#X connect 41 0 53 0;
#X connect 42 0 3 0;
#X connect 42 0 4 0;
#X connect 43 0 46 0;
#X connect 43 0 47 0;
#X connect 44 0 43 0;
#X connect 45 0 44 0;
#X connect 48 0 45 0;
#X connect 50 0 49 0;
#X connect 50 0 54 1;
#X connect 53 0 42 1;
#X connect 53 0 43 0;
#X connect 54 0 41 0;