Mercurial > hg > cavity-tone
diff HoweIntensityMonoTest.pd @ 0:bb1881a77862
Basic blog patch of cavity tone added.
author | Rod Selfridge <r.selfridge@qmul.ac.uk> |
---|---|
date | Fri, 07 Apr 2017 22:46:44 +0100 |
parents | |
children | 88c2acdaa49a |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/HoweIntensityMonoTest.pd Fri Apr 07 22:46:44 2017 +0100 @@ -0,0 +1,275 @@ +#N canvas 131 72 1261 756 10; +#X obj 117 145 sig~ 0.12; +#X text 117 128 Alpha; +#X obj 124 391 sig~ 1.02; +#X text 124 374 C2; +#X obj 47 316 *~; +#X obj 47 188 /~ 4; +#X obj 47 208 sqrt~; +#X obj 117 186 *~; +#X obj 117 228 /~; +#X obj 227 192 /~ 343; +#X obj 359 126 r~ MY_MACH; +#X obj 359 149 *~; +#X obj 374 212 *~; +#X obj 374 252 /~; +#X obj 395 310 /~; +#X obj 374 330 pow~; +#X obj 359 351 *~; +#X obj 395 272 sig~ 5; +#X obj 410 291 sig~ 3; +#X obj 497 144 cos~; +#X obj 512 164 r~ MY_MACH; +#X obj 497 185 *~; +#X obj 497 207 +~ 1; +#X obj 497 232 *~; +#X obj 513 295 *~; +#X obj 513 335 /~; +#X obj 513 360 *~; +#X obj 513 424 +~; +#X obj 528 380 sig~ 0.12; +#X text 540 361 Alpha; +#X obj 528 403 *~; +#X obj 534 483 /~; +#X obj 513 503 pow~; +#X obj 534 445 sig~ 3; +#X obj 549 464 sig~ 2; +#X obj 497 529 *~; +#X obj 139 452 *~; +#X obj 139 495 sin~; +#X obj 124 516 *~; +#X obj 284 468 exp~; +#X obj 367 468 exp~; +#X obj 284 491 +~; +#X obj 284 514 /~ 2; +#X obj 698 121 +~; +#X obj 683 166 *~; +#X obj 40 401 *~; +#X obj 40 443 *~; +#X obj 352 514 /~ 2; +#X obj 352 491 -~; +#X obj 683 306 *~; +#X obj 767 309 *~; +#X obj 875 191 *~; +#X obj 890 234 *~; +#X obj 905 277 *~; +#X obj 890 298 +~; +#X obj 875 320 /~; +#X obj 875 347 *~; +#X obj 1042 180 *~; +#X obj 1057 223 *~; +#X obj 1072 266 *~; +#X obj 1057 287 +~; +#X obj 1042 309 /~; +#X obj 690 416 /~; +#X obj 705 478 +~; +#X obj 690 502 *~; +#X obj 368 448 *~ -1; +#X obj 497 99 r~ thisEle; +#X obj 389 232 r~ windSpeed; +#X obj 132 165 r~ thisLen; +#X obj 47 275 r~ thisLen; +#X obj 62 296 r~ thisWid; +#X obj 154 432 r~ thisDep; +#X obj 528 315 r~ windSpeed; +#X obj 698 80 r~ thisDep; +#X obj 155 272 s~ \$0-sigma; +#X obj 389 191 r~ \$0-sigma; +#X obj 528 274 r~ \$0-sigma; +#X obj 276 191 s~ \$0-omega; +#X obj 374 169 r~ \$0-omega; +#X obj 513 252 r~ \$0-omega; +#X obj 227 214 s~ \$0-Ko; +#X obj 139 412 r~ \$0-Ko; +#X obj 40 375 r~ \$0-Ko; +#X obj 47 146 r~ \$0-A; +#X obj 47 337 s~ \$0-A; +#X obj 683 59 r~ \$0-Ko; +#X obj 55 422 r~ \$0-A; +#X obj 47 228 s~ \$0-l; +#X obj 713 100 r~ \$0-l; +#X obj 40 487 s~ \$0-comp1; +#X obj 284 448 r~ \$0-comp1; +#X obj 368 429 r~ \$0-comp1; +#X obj 284 538 s~ \$0-cosh; +#X obj 697 286 r~ \$0-cosh; +#X obj 352 538 s~ \$0-sinh; +#X obj 782 289 r~ \$0-sinh; +#X obj 683 330 s~ \$0-thisX; +#X obj 1057 199 r~ \$0-thisX; +#X obj 875 149 r~ \$0-thisX; +#X obj 890 210 r~ \$0-thisX; +#X obj 767 331 s~ \$0-thisY; +#X obj 1072 243 r~ \$0-thisY; +#X obj 1042 138 r~ \$0-thisY; +#X obj 359 373 s~ \$0-num1; +#X obj 690 376 r~ \$0-num1; +#X obj 124 539 s~ \$0-num2; +#X obj 890 170 r~ \$0-num2; +#X obj 1057 159 r~ \$0-num2; +#X obj 905 254 r~ \$0-thisY; +#X obj 875 370 s~ \$0-block1; +#X obj 705 437 r~ \$0-block1; +#X obj 1043 354 s~ \$0-block2; +#X obj 720 457 r~ \$0-block2; +#X obj 497 552 s~ \$0-demon1; +#X obj 705 395 r~ \$0-demon1; +#X obj 690 573 outlet~; +#X obj 1043 332 *~; +#X obj 690 542 /~; +#X obj 705 522 r~ thisDist; +#X obj 683 260 cos~; +#X obj 767 265 sin~; +#X obj 47 167 *~ 3.14159; +#X obj 227 166 *~ 6.28319; +#X obj 139 473 /~ 6.28319; +#X obj 683 188 /~ 6.28319; +#X obj 40 465 /~ 6.28319; +#X obj 132 206 sig~ 4.44288; +#N canvas 630 236 287 220 MonopolePeak 0; +#X obj 152 158 outlet~; +#X obj 167 44 inlet~; +#X obj 182 65 inlet~; +#X obj 167 87 +~; +#X obj 167 112 *~ 4; +#X obj 152 23 sig~ 343; +#X obj 152 133 /~; +#X connect 1 0 3 0; +#X connect 2 0 3 1; +#X connect 3 0 4 0; +#X connect 4 0 6 1; +#X connect 5 0 6 0; +#X connect 6 0 0 0; +#X restore 227 117 pd MonopolePeak; +#X obj 227 91 r~ \$0-l; +#X obj 314 93 r~ thisDep; +#X obj 293 141 outlet~; +#X obj 171 84 inlet~; +#X obj 155 249 r~ effectShearThick2; +#X connect 0 0 7 0; +#X connect 2 0 38 0; +#X connect 4 0 84 0; +#X connect 5 0 6 0; +#X connect 6 0 87 0; +#X connect 7 0 8 0; +#X connect 9 0 80 0; +#X connect 10 0 11 1; +#X connect 10 0 11 0; +#X connect 11 0 16 0; +#X connect 12 0 13 0; +#X connect 13 0 15 0; +#X connect 14 0 15 1; +#X connect 15 0 16 1; +#X connect 16 0 103 0; +#X connect 17 0 14 0; +#X connect 18 0 14 1; +#X connect 19 0 21 0; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 22 0 23 0; +#X connect 22 0 23 1; +#X connect 23 0 35 0; +#X connect 24 0 25 0; +#X connect 25 0 26 0; +#X connect 25 0 26 1; +#X connect 26 0 27 0; +#X connect 27 0 32 0; +#X connect 28 0 30 0; +#X connect 28 0 30 1; +#X connect 30 0 27 1; +#X connect 31 0 32 1; +#X connect 32 0 35 1; +#X connect 33 0 31 0; +#X connect 34 0 31 1; +#X connect 35 0 113 0; +#X connect 36 0 123 0; +#X connect 37 0 38 1; +#X connect 38 0 105 0; +#X connect 39 0 41 0; +#X connect 39 0 48 0; +#X connect 40 0 41 1; +#X connect 40 0 48 1; +#X connect 41 0 42 0; +#X connect 42 0 92 0; +#X connect 43 0 44 1; +#X connect 44 0 124 0; +#X connect 45 0 46 0; +#X connect 46 0 125 0; +#X connect 47 0 94 0; +#X connect 48 0 47 0; +#X connect 49 0 96 0; +#X connect 50 0 100 0; +#X connect 51 0 55 0; +#X connect 52 0 54 0; +#X connect 53 0 54 1; +#X connect 54 0 55 1; +#X connect 55 0 56 0; +#X connect 55 0 56 1; +#X connect 56 0 109 0; +#X connect 57 0 61 0; +#X connect 58 0 60 0; +#X connect 59 0 60 1; +#X connect 60 0 61 1; +#X connect 61 0 116 0; +#X connect 61 0 116 1; +#X connect 62 0 64 0; +#X connect 63 0 64 1; +#X connect 64 0 117 0; +#X connect 65 0 40 0; +#X connect 66 0 19 0; +#X connect 67 0 13 1; +#X connect 68 0 7 1; +#X connect 69 0 4 0; +#X connect 70 0 4 1; +#X connect 71 0 36 1; +#X connect 72 0 25 1; +#X connect 73 0 43 0; +#X connect 75 0 12 1; +#X connect 76 0 24 1; +#X connect 78 0 12 0; +#X connect 79 0 24 0; +#X connect 81 0 36 0; +#X connect 82 0 45 0; +#X connect 82 0 45 1; +#X connect 83 0 121 0; +#X connect 85 0 44 0; +#X connect 86 0 46 1; +#X connect 88 0 43 1; +#X connect 90 0 39 0; +#X connect 91 0 65 0; +#X connect 93 0 49 1; +#X connect 95 0 50 1; +#X connect 97 0 58 0; +#X connect 97 0 58 1; +#X connect 98 0 51 0; +#X connect 99 0 52 0; +#X connect 99 0 52 1; +#X connect 101 0 59 0; +#X connect 101 0 59 1; +#X connect 102 0 57 0; +#X connect 104 0 62 0; +#X connect 106 0 51 1; +#X connect 107 0 57 1; +#X connect 108 0 53 0; +#X connect 108 0 53 1; +#X connect 110 0 63 0; +#X connect 112 0 63 1; +#X connect 114 0 62 1; +#X connect 116 0 111 0; +#X connect 117 0 115 0; +#X connect 118 0 117 1; +#X connect 119 0 49 0; +#X connect 120 0 50 0; +#X connect 121 0 5 0; +#X connect 122 0 9 0; +#X connect 122 0 77 0; +#X connect 123 0 37 0; +#X connect 124 0 119 0; +#X connect 124 0 120 0; +#X connect 125 0 89 0; +#X connect 126 0 8 1; +#X connect 127 0 130 0; +#X connect 127 0 122 0; +#X connect 128 0 127 0; +#X connect 129 0 127 1; +#X connect 132 0 74 0;