annotate scene demo/angleCalc~.pd @ 120:e64cca8a1b70

Mach calc added. Noise converted to quadrupole source. Therefore the lift dipole noise would cross over with drag dipole noise with identical directivity.
author Rod Selfridge <r.selfridge@qmul.ac.uk>
date Tue, 04 Aug 2015 08:00:09 +0100
parents 61d267c71a18
children fc6aff2a2493
rev   line source
r@115 1 #N canvas 741 141 677 520 10;
r@115 2 #X obj 463 76 hsl 100 20 -90 90 0 0 empty empty empty -2 -8 0 10 -262144
r@120 3 -1 -1 0 1;
r@115 4 #X text 462 57 Elevation Angle;
r@115 5 #X floatatom 152 121 8 0 0 0 - - -;
r@115 6 #X floatatom 499 102 5 0 0 0 - - -;
r@115 7 #X obj 175 95 hsl 100 20 -180 180 0 0 empty empty empty -2 -8 0 10
r@120 8 -262144 -1 -1 0 1;
r@115 9 #X text 179 77 Azimuth Angle;
r@115 10 #X obj 250 122 inlet~;
r@115 11 #X obj 414 102 inlet~;
r@115 12 #X obj 250 144 /~ 360;
r@115 13 #X obj 414 125 /~ 360;
r@115 14 #X obj 415 237 cos~;
r@115 15 #X obj 313 320 *~;
r@115 16 #X obj 313 345 arccos~;
r@115 17 #X obj 313 374 outlet~;
r@115 18 #X obj 215 121 sig~;
r@115 19 #X obj 460 102 sig~;
r@115 20 #X obj 368 313 loadbang;
r@115 21 #X obj 368 334 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@115 22 1;
r@115 23 #X obj 368 352 metro 10;
r@115 24 #X obj 368 373 snapshot~;
r@115 25 #X floatatom 368 393 8 0 0 0 - - -;
r@115 26 #X obj 88 112 loadbang;
r@115 27 #X obj 88 133 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@115 28 1;
r@115 29 #X obj 88 151 metro 10;
r@115 30 #X obj 88 172 snapshot~;
r@115 31 #X floatatom 49 193 5 0 0 0 - - -;
r@115 32 #X obj 88 198 > 0;
r@115 33 #X floatatom 92 236 5 0 0 0 - - -;
r@115 34 #X obj 249 210 spigot~;
r@115 35 #X obj 225 270 -~;
r@115 36 #X obj 240 247 r~ MY_MACH;
r@115 37 #X obj 327 232 r~ MY_MACH;
r@115 38 #X obj 116 291 loadbang;
r@115 39 #X obj 116 312 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@115 40 1;
r@115 41 #X obj 116 330 metro 10;
r@115 42 #X obj 116 351 snapshot~;
r@115 43 #X floatatom 116 371 5 0 0 0 - - -;
r@115 44 #X obj 470 303 loadbang;
r@115 45 #X obj 470 324 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@115 46 1;
r@115 47 #X obj 470 342 metro 10;
r@115 48 #X obj 470 363 snapshot~;
r@115 49 #X floatatom 470 383 8 0 0 0 - - -;
r@115 50 #X obj 250 180 cos~;
r@115 51 #X obj 313 267 +~;
r@115 52 #X connect 0 0 3 0;
r@115 53 #X connect 0 0 15 0;
r@115 54 #X connect 4 0 2 0;
r@115 55 #X connect 4 0 14 0;
r@120 56 #X connect 6 0 8 0;
r@115 57 #X connect 7 0 9 0;
r@115 58 #X connect 8 0 24 0;
r@115 59 #X connect 8 0 42 0;
r@115 60 #X connect 9 0 10 0;
r@115 61 #X connect 10 0 11 1;
r@115 62 #X connect 11 0 12 0;
r@115 63 #X connect 11 0 35 0;
r@115 64 #X connect 12 0 13 0;
r@115 65 #X connect 12 0 19 0;
r@115 66 #X connect 14 0 8 0;
r@115 67 #X connect 16 0 17 0;
r@115 68 #X connect 17 0 18 0;
r@115 69 #X connect 18 0 19 0;
r@115 70 #X connect 19 0 20 0;
r@115 71 #X connect 21 0 22 0;
r@115 72 #X connect 22 0 23 0;
r@115 73 #X connect 23 0 24 0;
r@115 74 #X connect 24 0 25 0;
r@115 75 #X connect 24 0 26 0;
r@115 76 #X connect 26 0 27 0;
r@115 77 #X connect 26 0 28 1;
r@115 78 #X connect 28 0 29 0;
r@115 79 #X connect 28 1 43 0;
r@115 80 #X connect 29 0 11 0;
r@115 81 #X connect 30 0 29 1;
r@115 82 #X connect 31 0 43 1;
r@115 83 #X connect 31 0 40 0;
r@115 84 #X connect 32 0 33 0;
r@115 85 #X connect 33 0 34 0;
r@115 86 #X connect 34 0 35 0;
r@115 87 #X connect 35 0 36 0;
r@115 88 #X connect 37 0 38 0;
r@115 89 #X connect 38 0 39 0;
r@115 90 #X connect 39 0 40 0;
r@115 91 #X connect 40 0 41 0;
r@115 92 #X connect 42 0 28 0;
r@115 93 #X connect 43 0 11 0;