view June/tenSource.pd @ 59:e4fb7284906e

Angle to observer calculated

#N canvas 392 112 1218 733 10;
#X obj 670 10 inlet;
#X obj 670 31 i;
#X obj 670 53 - 1;
#X obj 670 76 * 10;
#X obj 670 100 s \$0_thisGroup;
#X obj -159 109 freqCalcWoo;
#X obj -159 58 r \$0_thisGroup;
#X obj -33 136 *;
#X obj -18 111 r deltaThick;
#X obj -33 47 r \$0_thisGroup;
#X obj -33 90 +;
#X obj -48 22 r hiltThick;
#X obj -48 161 -;
#X floatatom -37 187 8 0 0 0 - - -;
#X obj 628 39 t b;
#X msg 99 69 0;
#X msg 155 68 1;
#X msg 211 70 2;
#X msg 264 71 3;
#X msg 316 70 4;
#X msg 367 70 5;
#X msg 417 70 6;
#X msg 467 69 7;
#X msg 517 70 8;
#X msg 566 70 9;
#X obj 367 90 s \$0_s5;
#X obj 316 91 s \$0_s4;
#X obj 264 92 s \$0_s3;
#X obj 211 91 s \$0_s2;
#X obj 155 90 s \$0_s1;
#X obj 99 91 s \$0_s0;
#X obj 417 90 s \$0_s6;
#X obj 467 90 s \$0_s7;
#X obj 517 90 s \$0_s8;
#X obj 566 90 s \$0_s9;
#X obj -18 68 r \$0_s0;
#X obj -96 86 r \$0_s0;
#X obj -158 284 r \$0_thisGroup;
#X obj -44 368 *;
#X obj -29 343 r deltaThick;
#X obj -44 279 r \$0_thisGroup;
#X obj -44 322 +;
#X obj -59 254 r hiltThick;
#X obj -59 393 -;
#X floatatom -36 421 8 0 0 0 - - -;
#X obj -95 312 r \$0_s1;
#X obj -29 300 r \$0_s1;
#X obj -165 510 r \$0_thisGroup;
#X obj -51 594 *;
#X obj -36 569 r deltaThick;
#X obj -51 505 r \$0_thisGroup;
#X obj -51 548 +;
#X obj -66 480 r hiltThick;
#X obj -66 619 -;
#X floatatom -43 647 8 0 0 0 - - -;
#X obj -102 538 r \$0_s2;
#X obj -36 526 r \$0_s2;
#X obj 77 187 r \$0_thisGroup;
#X obj 191 271 *;
#X obj 206 246 r deltaThick;
#X obj 191 182 r \$0_thisGroup;
#X obj 191 225 +;
#X obj 176 157 r hiltThick;
#X obj 176 296 -;
#X floatatom 199 324 8 0 0 0 - - -;
#X obj 140 215 r \$0_s3;
#X obj 206 203 r \$0_s3;
#X obj 70 508 r \$0_thisGroup;
#X obj 184 592 *;
#X obj 199 567 r deltaThick;
#X obj 184 503 r \$0_thisGroup;
#X obj 184 546 +;
#X obj 169 478 r hiltThick;
#X obj 169 617 -;
#X floatatom 192 645 8 0 0 0 - - -;
#X obj 199 524 r \$0_s4;
#X obj 133 536 r \$0_s4;
#X obj 313 171 r \$0_thisGroup;
#X obj 427 255 *;
#X obj 442 230 r deltaThick;
#X obj 427 166 r \$0_thisGroup;
#X obj 427 209 +;
#X obj 412 141 r hiltThick;
#X obj 412 280 -;
#X floatatom 435 308 8 0 0 0 - - -;
#X obj 376 199 r \$0_s5;
#X obj 442 187 r \$0_s5;
#X obj 293 507 r \$0_thisGroup;
#X obj 407 591 *;
#X obj 422 566 r deltaThick;
#X obj 407 502 r \$0_thisGroup;
#X obj 407 545 +;
#X obj 392 477 r hiltThick;
#X obj 392 616 -;
#X floatatom 415 644 8 0 0 0 - - -;
#X obj 356 535 r \$0_s6;
#X obj 422 523 r \$0_s6;
#X obj 537 171 r \$0_thisGroup;
#X obj 651 255 *;
#X obj 666 230 r deltaThick;
#X obj 651 166 r \$0_thisGroup;
#X obj 651 209 +;
#X obj 636 141 r hiltThick;
#X obj 636 280 -;
#X floatatom 659 308 8 0 0 0 - - -;
#X obj 600 199 r \$0_s7;
#X obj 666 187 r \$0_s7;
#X obj 531 485 r \$0_thisGroup;
#X obj 645 569 *;
#X obj 660 544 r deltaThick;
#X obj 645 480 r \$0_thisGroup;
#X obj 645 523 +;
#X obj 630 455 r hiltThick;
#X obj 630 594 -;
#X floatatom 653 622 8 0 0 0 - - -;
#X obj 594 513 r \$0_s8;
#X obj 660 501 r \$0_s8;
#X obj 772 295 r \$0_thisGroup;
#X obj 886 379 *;
#X obj 901 354 r deltaThick;
#X obj 886 290 r \$0_thisGroup;
#X obj 886 333 +;
#X obj 871 265 r hiltThick;
#X obj 871 404 -;
#X floatatom 894 432 8 0 0 0 - - -;
#X obj 835 323 r \$0_s9;
#X obj 901 311 r \$0_s9;
#X obj 780 16 inlet;
#X obj 872 15 inlet;
#X obj 872 39 s \$0_obAngle;
#X obj -114 214 r \$0_obAngle;
#X obj -129 190 r \$0_obDist;
#X obj 780 40 s \$0_obDist;
#X obj -113 443 r \$0_obAngle;
#X obj -128 417 r \$0_obDist;
#X obj -120 669 r \$0_obAngle;
#X obj -135 646 r \$0_obDist;
#X obj 122 345 r \$0_obAngle;
#X obj 107 320 r \$0_obDist;
#X obj 115 668 r \$0_obAngle;
#X obj 100 642 r \$0_obDist;
#X obj 338 665 r \$0_obAngle;
#X obj 323 641 r \$0_obDist;
#X obj 358 331 r \$0_obAngle;
#X obj 343 305 r \$0_obDist;
#X obj 582 331 r \$0_obAngle;
#X obj 567 305 r \$0_obDist;
#X obj 576 645 r \$0_obAngle;
#X obj 561 619 r \$0_obDist;
#X obj 817 455 r \$0_obAngle;
#X obj 802 429 r \$0_obDist;
#X obj -159 239 woSoFreq;
#X obj -158 465 woSoFreq;
#X obj -165 691 woSoFreq;
#X obj 77 368 woSoFreq;
#X obj 70 689 woSoFreq;
#X obj 313 352 woSoFreq;
#X obj 293 688 woSoFreq;
#X obj 537 352 woSoFreq;
#X obj 531 666 woSoFreq;
#X obj 772 476 woSoFreq;
#N canvas 712 40 900 832 obsPosition 1;
#X obj 21 16 inlet;
#X obj 648 96 r obsDistance;
#X obj 747 95 r obsAngle;
#X obj 21 41 s \$0_sourceTopSpeed;
#X obj 144 15 inlet;
#X obj 144 40 s \$0_sourceActSpeed;
#X obj 267 17 inlet;
#X obj 507 20 r bladeLen;
#X obj 522 124 r armLength;
#X obj 267 40 s \$0_sourceNo;
#X obj 418 20 r NoOfSources;
#X obj 507 149 +;
#X obj 507 59 /;
#X obj 507 103 *;
#X obj 522 80 r \$0_sourceNo;
#X floatatom 443 177 8 0 0 0 - - -;
#X floatatom 372 41 5 0 0 0 - - -;
#X obj 688 204 / 360;
#X obj 688 226 * 6.28319;
#X floatatom 708 283 8 0 0 0 - - -;
#X obj -80 19 inlet;
#X obj -80 43 s \$0_sourceCirc;
#X obj -37 108 /;
#X text 10 107 Total Time;
#X obj 688 154 r \$0_down;
#X obj 639 154 r \$0_up;
#X obj 688 311 *;
#X floatatom 705 340 8 0 0 0 - - -;
#X floatatom -289 222 8 0 0 0 - - -;
#X obj 688 251 cos;
#X obj 574 414 hsl 128 15 0 1 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X obj -230 191 r \$0_sourceCirc;
#X obj -231 222 * 0.75;
#X obj 40 221 * 0.25;
#X floatatom 62 246 8 0 0 0 - - -;
#X floatatom -215 244 8 0 0 0 - - -;
#X obj -161 242 r \$0_sourceTopSpeed;
#X obj -231 269 /;
#X msg -246 375 1 \$1;
#X obj -246 352 f;
#X floatatom -279 375 5 0 0 0 - - -;
#X obj -246 397 line 0;
#X obj -202 353 r setUp;
#X obj -282 326 r GO;
#X msg -202 375 0;
#X obj -231 293 * 1000;
#X obj -48 460 line 0;
#X obj -48 382 delay \$1;
#X obj -46 324 f;
#X obj -46 281 r GO;
#X obj -46 350 t f b;
#X obj -48 409 i;
#X msg -48 431 1 \$1;
#X obj 30 403 r setUp;
#X msg 30 425 0;
#X obj 55 328 r \$0_sourceTopSpeed;
#X obj 40 354 /;
#X obj 40 378 * 1000;
#X obj -246 447 *;
#X obj -194 416 r sweepAngle;
#X obj -243 512 hsl 100 25 0 360 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X obj -194 439 * -0.75;
#X obj -246 471 +;
#X obj -196 469 * -1;
#X floatatom -147 657 8 0 0 0 - - -;
#X obj 40 199 r \$0_sourceCirc;
#X obj -216 327 s \$0_thisDe;
#X obj -31 303 r \$0_thisDe;
#X obj -48 498 *;
#X obj 9 465 r sweepAngle;
#X obj 9 488 * 0.25;
#X obj -45 525 hsl 100 25 0 360 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 1375 1;
#X obj -160 607 spigot;
#X obj -106 606 spigot;
#X msg -73 578 0;
#X msg -43 578 1;
#X msg -157 579 0;
#X msg -127 579 1;
#X obj -127 541 r setUp;
#X obj -96 409 s \$0_d;
#X obj -173 553 r \$0_d;
#X obj -43 557 r \$0_d;
#X connect 0 0 3 0;
#X connect 0 0 22 1;
#X connect 4 0 5 0;
#X connect 6 0 9 0;
#X connect 6 0 16 0;
#X connect 7 0 12 0;
#X connect 8 0 11 1;
#X connect 10 0 12 1;
#X connect 11 0 15 0;
#X connect 11 0 26 1;
#X connect 12 0 13 0;
#X connect 13 0 11 0;
#X connect 14 0 13 1;
#X connect 17 0 18 0;
#X connect 18 0 29 0;
#X connect 20 0 21 0;
#X connect 20 0 22 0;
#X connect 26 0 27 0;
#X connect 29 0 19 0;
#X connect 29 0 26 0;
#X connect 29 0 30 0;
#X connect 31 0 28 0;
#X connect 31 0 32 0;
#X connect 32 0 35 0;
#X connect 32 0 37 0;
#X connect 33 0 34 0;
#X connect 33 0 56 0;
#X connect 36 0 37 1;
#X connect 37 0 45 0;
#X connect 38 0 41 0;
#X connect 39 0 38 0;
#X connect 39 0 40 0;
#X connect 41 0 58 0;
#X connect 42 0 44 0;
#X connect 43 0 39 0;
#X connect 44 0 41 0;
#X connect 45 0 39 1;
#X connect 45 0 66 0;
#X connect 46 0 68 0;
#X connect 47 0 51 0;
#X connect 47 0 79 0;
#X connect 48 0 50 0;
#X connect 49 0 48 0;
#X connect 50 0 47 1;
#X connect 50 1 47 0;
#X connect 51 0 52 0;
#X connect 52 0 46 0;
#X connect 53 0 54 0;
#X connect 54 0 46 0;
#X connect 55 0 56 1;
#X connect 56 0 57 0;
#X connect 57 0 51 1;
#X connect 58 0 62 0;
#X connect 59 0 61 0;
#X connect 60 0 72 0;
#X connect 61 0 58 1;
#X connect 61 0 63 0;
#X connect 62 0 60 0;
#X connect 63 0 62 1;
#X connect 65 0 33 0;
#X connect 67 0 48 1;
#X connect 68 0 71 0;
#X connect 69 0 70 0;
#X connect 70 0 68 1;
#X connect 71 0 73 0;
#X connect 72 0 64 0;
#X connect 73 0 64 0;
#X connect 74 0 73 1;
#X connect 75 0 73 1;
#X connect 76 0 72 1;
#X connect 77 0 72 1;
#X connect 78 0 74 0;
#X connect 78 0 77 0;
#X connect 80 0 76 0;
#X connect 81 0 75 0;
#X restore -134 148 pd obsPosition;
#X obj -158 336 freqCalcWoo;
#X obj -165 562 freqCalcWoo;
#X obj 77 239 freqCalcWoo;
#X obj 70 560 freqCalcWoo;
#X obj 313 223 freqCalcWoo;
#X obj 293 559 freqCalcWoo;
#X obj 537 223 freqCalcWoo;
#X obj 531 537 freqCalcWoo;
#X obj 772 347 freqCalcWoo;
#X connect 0 0 1 0;
#X connect 0 0 14 0;
#X connect 1 0 2 0;
#X connect 2 0 3 0;
#X connect 3 0 4 0;
#X connect 5 0 161 0;
#X connect 5 1 151 0;
#X connect 5 2 161 1;
#X connect 5 3 161 2;
#X connect 6 0 5 0;
#X connect 7 0 12 1;
#X connect 8 0 7 1;
#X connect 9 0 10 0;
#X connect 10 0 7 0;
#X connect 10 0 161 3;
#X connect 11 0 12 0;
#X connect 12 0 13 0;
#X connect 12 0 151 1;
#X connect 14 0 15 0;
#X connect 14 0 16 0;
#X connect 14 0 17 0;
#X connect 14 0 18 0;
#X connect 14 0 19 0;
#X connect 14 0 20 0;
#X connect 14 0 21 0;
#X connect 14 0 22 0;
#X connect 14 0 23 0;
#X connect 14 0 24 0;
#X connect 15 0 30 0;
#X connect 16 0 29 0;
#X connect 17 0 28 0;
#X connect 18 0 27 0;
#X connect 19 0 26 0;
#X connect 20 0 25 0;
#X connect 21 0 31 0;
#X connect 22 0 32 0;
#X connect 23 0 33 0;
#X connect 24 0 34 0;
#X connect 35 0 10 1;
#X connect 36 0 5 1;
#X connect 37 0 162 0;
#X connect 38 0 43 1;
#X connect 39 0 38 1;
#X connect 40 0 41 0;
#X connect 41 0 38 0;
#X connect 42 0 43 0;
#X connect 43 0 44 0;
#X connect 43 0 152 1;
#X connect 45 0 162 1;
#X connect 46 0 41 1;
#X connect 47 0 163 0;
#X connect 48 0 53 1;
#X connect 49 0 48 1;
#X connect 50 0 51 0;
#X connect 51 0 48 0;
#X connect 52 0 53 0;
#X connect 53 0 54 0;
#X connect 53 0 153 1;
#X connect 55 0 163 1;
#X connect 56 0 51 1;
#X connect 57 0 164 0;
#X connect 58 0 63 1;
#X connect 59 0 58 1;
#X connect 60 0 61 0;
#X connect 61 0 58 0;
#X connect 62 0 63 0;
#X connect 63 0 64 0;
#X connect 63 0 154 1;
#X connect 65 0 164 1;
#X connect 66 0 61 1;
#X connect 67 0 165 0;
#X connect 68 0 73 1;
#X connect 69 0 68 1;
#X connect 70 0 71 0;
#X connect 71 0 68 0;
#X connect 72 0 73 0;
#X connect 73 0 74 0;
#X connect 73 0 155 1;
#X connect 75 0 71 1;
#X connect 76 0 165 1;
#X connect 77 0 166 0;
#X connect 78 0 83 1;
#X connect 79 0 78 1;
#X connect 80 0 81 0;
#X connect 81 0 78 0;
#X connect 82 0 83 0;
#X connect 83 0 84 0;
#X connect 83 0 156 1;
#X connect 85 0 166 1;
#X connect 86 0 81 1;
#X connect 87 0 167 0;
#X connect 88 0 93 1;
#X connect 89 0 88 1;
#X connect 90 0 91 0;
#X connect 91 0 88 0;
#X connect 92 0 93 0;
#X connect 93 0 94 0;
#X connect 93 0 157 1;
#X connect 95 0 167 1;
#X connect 96 0 91 1;
#X connect 97 0 168 0;
#X connect 98 0 103 1;
#X connect 99 0 98 1;
#X connect 100 0 101 0;
#X connect 101 0 98 0;
#X connect 102 0 103 0;
#X connect 103 0 104 0;
#X connect 103 0 158 1;
#X connect 105 0 168 1;
#X connect 106 0 101 1;
#X connect 107 0 169 0;
#X connect 108 0 113 1;
#X connect 109 0 108 1;
#X connect 110 0 111 0;
#X connect 111 0 108 0;
#X connect 112 0 113 0;
#X connect 113 0 114 0;
#X connect 113 0 159 1;
#X connect 115 0 169 1;
#X connect 116 0 111 1;
#X connect 117 0 170 0;
#X connect 118 0 123 1;
#X connect 119 0 118 1;
#X connect 120 0 121 0;
#X connect 121 0 118 0;
#X connect 122 0 123 0;
#X connect 123 0 124 0;
#X connect 123 0 160 1;
#X connect 125 0 170 1;
#X connect 126 0 121 1;
#X connect 127 0 132 0;
#X connect 128 0 129 0;
#X connect 130 0 151 3;
#X connect 131 0 151 2;
#X connect 133 0 152 3;
#X connect 134 0 152 2;
#X connect 135 0 153 3;
#X connect 136 0 153 2;
#X connect 137 0 154 3;
#X connect 138 0 154 2;
#X connect 139 0 155 3;
#X connect 140 0 155 2;
#X connect 141 0 157 3;
#X connect 142 0 157 2;
#X connect 143 0 156 3;
#X connect 144 0 156 2;
#X connect 145 0 158 3;
#X connect 146 0 158 2;
#X connect 147 0 159 3;
#X connect 148 0 159 2;
#X connect 149 0 160 3;
#X connect 150 0 160 2;
#X connect 162 0 152 0;
#X connect 163 0 153 0;
#X connect 164 0 154 0;
#X connect 165 0 155 0;
#X connect 166 0 156 0;
#X connect 167 0 157 0;
#X connect 168 0 158 0;
#X connect 169 0 159 0;
#X connect 170 0 160 0;