Mercurial > hg > weather-synthesis-prototyping

annotate Propellor/waveguide_engineNew.pd @ 306:c57f401165ca tip

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
New Decision tree added
author Rod Selfridge <r.selfridge@qmul.ac.uk>
date Sat, 13 Jan 2018 14:47:35 +0000
parents 45bb69569481
children
rev   line source
r@302 1 #N canvas 292 23 674 799 10;
r@302 2 #X obj 364 62 hsl 128 12 0 1 0 1 \$0-speed empty engine-speed 6 6 1
r@302 3 8 -262144 -1 -1 9588 1;
r@302 4 #N canvas 0 22 733 539 fourstroke 0;
r@302 5 #X obj 51 336 outlet~;
r@302 6 #X obj 168 336 outlet~;
r@302 7 #X obj 287 338 outlet~;
r@302 8 #X obj 399 340 outlet~;
r@302 9 #X obj 97 95 -~ 0.75;
r@302 10 #X obj 215 87 -~ 0.5;
r@302 11 #X obj 334 87 -~ 0.25;
r@302 12 #X obj 50 285 sig~ 1;
r@302 13 #X obj 51 311 /~;
r@302 14 #X obj 98 286 +~ 1;
r@302 15 #X obj 98 265 *~;
r@302 16 #X obj 98 243 *~;
r@302 17 #X obj 167 285 sig~ 1;
r@302 18 #X obj 166 311 /~;
r@302 19 #X obj 215 286 +~ 1;
r@302 20 #X obj 215 265 *~;
r@302 21 #X obj 215 243 *~;
r@302 22 #X obj 286 287 sig~ 1;
r@302 23 #X obj 287 313 /~;
r@302 24 #X obj 334 288 +~ 1;
r@302 25 #X obj 334 267 *~;
r@302 26 #X obj 334 245 *~;
r@302 27 #X obj 398 291 sig~ 1;
r@302 28 #X obj 399 317 /~;
r@302 29 #X obj 446 292 +~ 1;
r@302 30 #X obj 446 271 *~;
r@302 31 #X obj 446 249 *~;
r@302 32 #X obj 576 -13 noise~;
r@302 33 #X obj 461 226 +~;
r@302 34 #X obj 351 223 +~;
r@302 35 #X obj 232 222 +~;
r@302 36 #X obj 115 221 +~;
r@302 37 #X obj 446 65 +~;
r@302 38 #X obj 334 62 +~;
r@302 39 #X obj 215 62 +~;
r@302 40 #X obj 97 61 +~;
r@302 41 #X obj 130 193 vd~ b 5;
r@302 42 #X obj 247 194 vd~ b 10;
r@302 43 #X obj 366 195 vd~ b 15;
r@302 44 #X obj 476 196 vd~ b 20;
r@302 45 #X obj 606 88 delwrite~ a 20;
r@302 46 #X obj 112 -15 delread~ a 5;
r@302 47 #X obj 230 -14 delread~ a 10;
r@302 48 #X obj 349 -14 delread~ a 15;
r@302 49 #X obj 462 -13 delread~ a 20;
r@302 50 #X obj 547 112 delwrite~ b 20;
r@302 51 #X obj 576 8 lop~ 20;
r@302 52 #X obj 576 30 lop~ 20;
r@302 53 #X obj 606 63 *~ 0.5;
r@302 54 #X obj 98 117 cos~;
r@302 55 #X obj 215 113 cos~;
r@302 56 #X obj 334 111 cos~;
r@302 57 #X obj 446 111 cos~;
r@302 58 #X obj 43 9 swap 1;
r@302 59 #X obj 43 31 -;
r@302 60 #X obj 43 -13 inlet;
r@302 61 #X obj 42 74 + 2;
r@302 62 #X obj 43 53 * 3;
r@302 63 #X obj 277 30 inlet~;
r@302 64 #X obj 547 62 *~ 10;
r@302 65 #X obj 277 157 line~;
r@302 66 #X msg 277 137 \$1 250;
r@302 67 #X connect 4 0 49 0;
r@302 68 #X connect 5 0 50 0;
r@302 69 #X connect 6 0 51 0;
r@302 70 #X connect 7 0 8 0;
r@302 71 #X connect 8 0 0 0;
r@302 72 #X connect 9 0 8 1;
r@302 73 #X connect 10 0 9 0;
r@302 74 #X connect 11 0 10 0;
r@302 75 #X connect 11 0 10 1;
r@302 76 #X connect 12 0 13 0;
r@302 77 #X connect 13 0 1 0;
r@302 78 #X connect 14 0 13 1;
r@302 79 #X connect 15 0 14 0;
r@302 80 #X connect 16 0 15 0;
r@302 81 #X connect 16 0 15 1;
r@302 82 #X connect 17 0 18 0;
r@302 83 #X connect 18 0 2 0;
r@302 84 #X connect 19 0 18 1;
r@302 85 #X connect 20 0 19 0;
r@302 86 #X connect 21 0 20 0;
r@302 87 #X connect 21 0 20 1;
r@302 88 #X connect 22 0 23 0;
r@302 89 #X connect 23 0 3 0;
r@302 90 #X connect 24 0 23 1;
r@302 91 #X connect 25 0 24 0;
r@302 92 #X connect 26 0 25 0;
r@302 93 #X connect 26 0 25 1;
r@302 94 #X connect 27 0 46 0;
r@302 95 #X connect 28 0 26 1;
r@302 96 #X connect 29 0 21 1;
r@302 97 #X connect 30 0 16 1;
r@302 98 #X connect 31 0 11 1;
r@302 99 #X connect 32 0 52 0;
r@302 100 #X connect 33 0 6 0;
r@302 101 #X connect 34 0 5 0;
r@302 102 #X connect 35 0 4 0;
r@302 103 #X connect 36 0 31 1;
r@302 104 #X connect 37 0 30 1;
r@302 105 #X connect 38 0 29 1;
r@302 106 #X connect 39 0 28 1;
r@302 107 #X connect 41 0 35 1;
r@302 108 #X connect 42 0 34 1;
r@302 109 #X connect 43 0 33 1;
r@302 110 #X connect 44 0 32 1;
r@302 111 #X connect 46 0 47 0;
r@302 112 #X connect 47 0 48 0;
r@302 113 #X connect 47 0 59 0;
r@302 114 #X connect 48 0 40 0;
r@302 115 #X connect 49 0 11 0;
r@302 116 #X connect 50 0 16 0;
r@302 117 #X connect 51 0 21 0;
r@302 118 #X connect 52 0 26 0;
r@302 119 #X connect 53 0 54 0;
r@302 120 #X connect 53 1 54 1;
r@302 121 #X connect 54 0 57 0;
r@302 122 #X connect 55 0 53 0;
r@302 123 #X connect 56 0 61 0;
r@302 124 #X connect 57 0 56 0;
r@302 125 #X connect 58 0 35 0;
r@302 126 #X connect 58 0 34 0;
r@302 127 #X connect 58 0 33 0;
r@302 128 #X connect 58 0 32 0;
r@302 129 #X connect 59 0 45 0;
r@302 130 #X connect 60 0 28 0;
r@302 131 #X connect 60 0 31 0;
r@302 132 #X connect 60 0 30 0;
r@302 133 #X connect 60 0 29 0;
r@302 134 #X connect 61 0 60 0;
r@302 135 #X restore 0 125 pd fourstroke engine;
r@302 136 #N canvas 0 22 276 452 overtone 0;
r@302 137 #X obj 73 65 max~;
r@302 138 #X obj 73 87 -~;
r@302 139 #X obj 103 96 sig~ 1;
r@302 140 #X obj 103 118 -~;
r@302 141 #X obj 88 140 sig~ 1;
r@302 142 #X obj 88 163 /~;
r@302 143 #X obj 72 185 *~;
r@302 144 #X obj 72 206 *~;
r@302 145 #X obj 71 250 -~ 0.5;
r@302 146 #X obj 71 274 *~;
r@302 147 #X obj 71 293 *~ -4;
r@302 148 #X obj 71 312 +~ 1;
r@302 149 #X obj 71 331 *~ 0.5;
r@302 150 #X obj 71 229 wrap~;
r@302 151 #X obj 71 361 *~;
r@302 152 #X obj 119 290 sig~ 1;
r@302 153 #X obj 119 331 -~;
r@302 154 #X obj 71 405 *~;
r@302 155 #X obj 88 383 *~ 12;
r@302 156 #X obj 149 118 *~;
r@302 157 #X obj 165 98 *~ 12;
r@302 158 #X obj 34 2 inlet~ drive;
r@302 159 #X obj 149 2 inlet~ phase;
r@302 160 #X obj 165 77 inlet~ freq;
r@302 161 #X obj 177 330 inlet~ amp;
r@302 162 #X obj 71 428 outlet~;
r@302 163 #X obj 3 64 s~ \$0-env;
r@302 164 #X obj 135 309 r~ \$0-env;
r@302 165 #X connect 0 0 1 0;
r@302 166 #X connect 1 0 6 0;
r@302 167 #X connect 2 0 3 0;
r@302 168 #X connect 3 0 5 1;
r@302 169 #X connect 4 0 5 0;
r@302 170 #X connect 5 0 6 1;
r@302 171 #X connect 6 0 7 0;
r@302 172 #X connect 7 0 13 0;
r@302 173 #X connect 8 0 9 0;
r@302 174 #X connect 8 0 9 1;
r@302 175 #X connect 9 0 10 0;
r@302 176 #X connect 10 0 11 0;
r@302 177 #X connect 11 0 12 0;
r@302 178 #X connect 12 0 14 0;
r@302 179 #X connect 13 0 8 0;
r@302 180 #X connect 14 0 17 0;
r@302 181 #X connect 15 0 16 0;
r@302 182 #X connect 16 0 14 1;
r@302 183 #X connect 17 0 25 0;
r@302 184 #X connect 18 0 17 1;
r@302 185 #X connect 19 0 7 1;
r@302 186 #X connect 20 0 19 1;
r@302 187 #X connect 21 0 0 0;
r@302 188 #X connect 21 0 26 0;
r@302 189 #X connect 22 0 0 1;
r@302 190 #X connect 22 0 1 1;
r@302 191 #X connect 22 0 3 1;
r@302 192 #X connect 22 0 19 0;
r@302 193 #X connect 23 0 20 0;
r@302 194 #X connect 24 0 18 0;
r@302 195 #X connect 27 0 16 1;
r@302 196 #X restore 362 517 pd overtone;
r@302 197 #N canvas 0 22 1000 760 overtone 0;
r@302 198 #X obj 459 157 max~;
r@302 199 #X obj 459 185 -~;
r@302 200 #X obj 495 215 sig~ 1;
r@302 201 #X obj 500 239 -~;
r@302 202 #X obj 479 253 sig~ 1;
r@302 203 #X obj 485 281 /~;
r@302 204 #X obj 458 323 *~;
r@302 205 #X obj 458 361 *~;
r@302 206 #X obj 452 428 -~ 0.5;
r@302 207 #X obj 451 452 *~;
r@302 208 #X obj 450 475 *~ -4;
r@302 209 #X obj 449 500 +~ 1;
r@302 210 #X obj 452 530 *~ 0.5;
r@302 211 #X obj 457 390 wrap~;
r@302 212 #X obj 450 557 *~;
r@302 213 #X obj 504 391 sig~ 1;
r@302 214 #X obj 509 415 -~;
r@302 215 #X obj 449 580 *~;
r@302 216 #X obj 689 431 *~ 12;
r@302 217 #X obj 506 328 *~;
r@302 218 #X obj 581 321 *~ 12;
r@302 219 #X obj 338 29 inlet~ drive;
r@302 220 #X obj 546 79 inlet~ phase;
r@302 221 #X obj 579 294 inlet~ freq;
r@302 222 #X obj 692 384 inlet~ amp;
r@302 223 #X obj 449 609 outlet~;
r@302 224 #X connect 0 0 1 0;
r@302 225 #X connect 1 0 6 0;
r@302 226 #X connect 2 0 3 0;
r@302 227 #X connect 3 0 5 1;
r@302 228 #X connect 4 0 5 0;
r@302 229 #X connect 5 0 6 1;
r@302 230 #X connect 6 0 7 0;
r@302 231 #X connect 7 0 13 0;
r@302 232 #X connect 8 0 9 0;
r@302 233 #X connect 8 0 9 1;
r@302 234 #X connect 9 0 10 0;
r@302 235 #X connect 10 0 11 0;
r@302 236 #X connect 11 0 12 0;
r@302 237 #X connect 12 0 14 0;
r@302 238 #X connect 13 0 8 0;
r@302 239 #X connect 14 0 17 0;
r@302 240 #X connect 15 0 16 0;
r@302 241 #X connect 16 0 14 1;
r@302 242 #X connect 17 0 25 0;
r@302 243 #X connect 18 0 17 1;
r@302 244 #X connect 19 0 7 1;
r@302 245 #X connect 20 0 19 1;
r@302 246 #X connect 21 0 0 0;
r@302 247 #X connect 21 0 16 1;
r@302 248 #X connect 22 0 0 1;
r@302 249 #X connect 22 0 1 1;
r@302 250 #X connect 22 0 3 1;
r@302 251 #X connect 22 0 19 0;
r@302 252 #X connect 23 0 20 0;
r@302 253 #X connect 24 0 18 0;
r@302 254 #X restore 501 855 pd overtone;
r@302 255 #N canvas 0 22 1000 760 overtone 0;
r@302 256 #X obj 459 157 max~;
r@302 257 #X obj 459 185 -~;
r@302 258 #X obj 495 215 sig~ 1;
r@302 259 #X obj 500 239 -~;
r@302 260 #X obj 479 253 sig~ 1;
r@302 261 #X obj 485 281 /~;
r@302 262 #X obj 458 323 *~;
r@302 263 #X obj 458 361 *~;
r@302 264 #X obj 452 428 -~ 0.5;
r@302 265 #X obj 451 452 *~;
r@302 266 #X obj 450 475 *~ -4;
r@302 267 #X obj 449 500 +~ 1;
r@302 268 #X obj 452 530 *~ 0.5;
r@302 269 #X obj 457 390 wrap~;
r@302 270 #X obj 450 557 *~;
r@302 271 #X obj 504 391 sig~ 1;
r@302 272 #X obj 509 415 -~;
r@302 273 #X obj 449 580 *~;
r@302 274 #X obj 689 431 *~ 12;
r@302 275 #X obj 506 328 *~;
r@302 276 #X obj 581 321 *~ 12;
r@302 277 #X obj 338 29 inlet~ drive;
r@302 278 #X obj 546 79 inlet~ phase;
r@302 279 #X obj 579 294 inlet~ freq;
r@302 280 #X obj 692 384 inlet~ amp;
r@302 281 #X obj 449 609 outlet~;
r@302 282 #X connect 0 0 1 0;
r@302 283 #X connect 1 0 6 0;
r@302 284 #X connect 2 0 3 0;
r@302 285 #X connect 3 0 5 1;
r@302 286 #X connect 4 0 5 0;
r@302 287 #X connect 5 0 6 1;
r@302 288 #X connect 6 0 7 0;
r@302 289 #X connect 7 0 13 0;
r@302 290 #X connect 8 0 9 0;
r@302 291 #X connect 8 0 9 1;
r@302 292 #X connect 9 0 10 0;
r@302 293 #X connect 10 0 11 0;
r@302 294 #X connect 11 0 12 0;
r@302 295 #X connect 12 0 14 0;
r@302 296 #X connect 13 0 8 0;
r@302 297 #X connect 14 0 17 0;
r@302 298 #X connect 15 0 16 0;
r@302 299 #X connect 16 0 14 1;
r@302 300 #X connect 17 0 25 0;
r@302 301 #X connect 18 0 17 1;
r@302 302 #X connect 19 0 7 1;
r@302 303 #X connect 20 0 19 1;
r@302 304 #X connect 21 0 0 0;
r@302 305 #X connect 21 0 16 1;
r@302 306 #X connect 22 0 0 1;
r@302 307 #X connect 22 0 1 1;
r@302 308 #X connect 22 0 3 1;
r@302 309 #X connect 22 0 19 0;
r@302 310 #X connect 23 0 20 0;
r@302 311 #X connect 24 0 18 0;
r@302 312 #X restore 431 687 pd overtone;
r@302 313 #N canvas 0 22 450 300 parabola 0;
r@302 314 #X obj 193 88 -~ 0.5;
r@302 315 #X obj 192 112 *~;
r@302 316 #X obj 191 135 *~ -4;
r@302 317 #X obj 190 160 +~ 1;
r@302 318 #X obj 192 58 inlet~;
r@302 319 #X obj 190 211 outlet~;
r@302 320 #X obj 190 185 *~ 3;
r@302 321 #X connect 0 0 1 0;
r@302 322 #X connect 0 0 1 1;
r@302 323 #X connect 1 0 2 0;
r@302 324 #X connect 2 0 3 0;
r@302 325 #X connect 3 0 6 0;
r@302 326 #X connect 4 0 0 0;
r@302 327 #X connect 6 0 5 0;
r@302 328 #X restore 156 225 pd parabola;
r@302 329 #X obj 135 101 phasor~;
r@302 330 #X obj 62 904 *~ 0.5;
r@302 331 #X obj 225 379 -~;
r@302 332 #X obj 225 439 *~;
r@302 333 #X obj 294 441 *~;
r@302 334 #X obj 294 462 +~ 0.5;
r@302 335 #X obj 225 462 +~ 0.5;
r@302 336 #X obj 225 354 sig~ 1;
r@302 337 #X obj 241 322 cos~;
r@302 338 #N canvas 701 265 579 456 spacewarping 0;
r@302 339 #X obj 263 429 outlet~;
r@302 340 #X obj 428 154 delwrite~ e1b 50;
r@302 341 #X obj 336 240 delwrite~ e2b 50;
r@302 342 #X obj 161 334 s~ ewgfb1;
r@302 343 #X obj 323 364 s~ ewgfb2;
r@302 344 #X obj 25 53 r~ ewgfb2;
r@302 345 #X obj 428 111 r~ ewgfb1;
r@302 346 #X obj 9 33 hip~ 30;
r@302 347 #X obj 263 385 hip~ 200;
r@302 348 #X obj 263 407 hip~ 200;
r@302 349 #X obj 336 155 vd~ e1b 12;
r@302 350 #X obj 161 313 vd~ e2a 12;
r@302 351 #X obj 323 343 vd~ e2b 12;
r@302 352 #X obj 9 123 delwrite~ e1a 50;
r@302 353 #X obj 161 276 delwrite~ e2a 50;
r@302 354 #X obj 428 133 +~;
r@302 355 #X obj 300 17 inlet~ b;
r@302 356 #X obj 161 171 +~;
r@302 357 #X obj 9 12 inlet~ a;
r@302 358 #X obj 444 89 inlet~ c;
r@302 359 #X obj 337 207 +~;
r@302 360 #X obj 352 185 inlet~ d;
r@302 361 #X obj 125 275 *~;
r@302 362 #X obj 322 319 *~;
r@302 363 #X obj 161 99 *~;
r@302 364 #X obj 335 130 *~;
r@302 365 #X obj 142 19 inlet~ fm1;
r@302 366 #X obj 221 18 inlet~ fm2;
r@302 367 #X obj 25 96 *~;
r@302 368 #X obj 41 74 r \$0-wg-fb;
r@302 369 #X obj 125 230 r \$0-wg-l1;
r@302 370 #X obj 338 279 r \$0-wg-l2;
r@302 371 #X obj 351 90 r \$0-wg-w1;
r@302 372 #X obj 161 58 r \$0-wg-w2;
r@302 373 #X obj 125 251 * 40;
r@302 374 #X obj 338 299 * 40;
r@302 375 #X obj 351 110 * 40;
r@302 376 #X obj 161 79 * 40;
r@302 377 #X obj 162 125 vd~ e1a;
r@302 378 #X connect 5 0 28 0;
r@302 379 #X connect 6 0 15 0;
r@302 380 #X connect 7 0 13 0;
r@302 381 #X connect 8 0 9 0;
r@302 382 #X connect 9 0 0 0;
r@302 383 #X connect 10 0 20 0;
r@302 384 #X connect 11 0 3 0;
r@302 385 #X connect 11 0 8 0;
r@302 386 #X connect 12 0 4 0;
r@302 387 #X connect 12 0 8 0;
r@302 388 #X connect 15 0 1 0;
r@302 389 #X connect 16 0 17 1;
r@302 390 #X connect 17 0 14 0;
r@302 391 #X connect 17 0 8 0;
r@302 392 #X connect 18 0 7 0;
r@302 393 #X connect 19 0 15 1;
r@302 394 #X connect 20 0 2 0;
r@302 395 #X connect 20 0 8 0;
r@302 396 #X connect 21 0 20 1;
r@302 397 #X connect 22 0 11 0;
r@302 398 #X connect 23 0 12 0;
r@302 399 #X connect 24 0 38 0;
r@302 400 #X connect 25 0 10 0;
r@302 401 #X connect 26 0 25 0;
r@302 402 #X connect 26 0 22 1;
r@302 403 #X connect 27 0 24 1;
r@302 404 #X connect 27 0 23 0;
r@302 405 #X connect 28 0 13 0;
r@302 406 #X connect 29 0 28 1;
r@302 407 #X connect 30 0 34 0;
r@302 408 #X connect 31 0 35 0;
r@302 409 #X connect 32 0 36 0;
r@302 410 #X connect 33 0 37 0;
r@302 411 #X connect 34 0 22 0;
r@302 412 #X connect 35 0 23 1;
r@302 413 #X connect 36 0 25 1;
r@302 414 #X connect 37 0 24 0;
r@302 415 #X connect 38 0 17 0;
r@302 416 #X restore 156 875 pd spacewarping nonlinear waveguide exhaust system
r@302 417 ;
r@302 418 #X obj 501 781 wrap~;
r@302 419 #X obj 362 438 wrap~;
r@302 420 #X obj 431 613 wrap~;
r@302 421 #X obj 501 762 *~ 8;
r@302 422 #X obj 362 418 *~ 16;
r@302 423 #X obj 431 594 *~ 4;
r@302 424 #X obj 134 41 * 30;
r@302 425 #X obj 62 879 hip~ 2;
r@302 426 #X obj 0 103 r \$0-speed;
r@302 427 #X obj 134 22 r \$0-speed;
r@302 428 #X obj 310 321 r \$0-speed;
r@302 429 #X obj 364 86 hsl 128 12 0 1 0 1 \$0-transmission_delay2 empty transmission_delay2
r@302 430 6 6 1 8 -262144 -1 -1 2000 1;
r@302 431 #X obj 362 379 * 100;
r@302 432 #X obj 386 457 r \$0-ot1-phase;
r@302 433 #X obj 410 476 r \$0-ot1-freq;
r@302 434 #X obj 434 495 r \$0-ot1-amp;
r@302 435 #X obj 525 799 r \$0-ot2-phase;
r@302 436 #X obj 549 817 r \$0-ot2-freq;
r@302 437 #X obj 573 835 r \$0-ot2-amp;
r@302 438 #X obj 455 631 r \$0-ot3-phase;
r@302 439 #X obj 479 649 r \$0-ot3-freq;
r@302 440 #X obj 503 668 r \$0-ot3-amp;
r@302 441 #X obj 310 380 sig~;
r@302 442 #X obj 364 146 hsl 128 12 0 1 0 1 \$0-wg-fb empty waveguide-feedback
r@302 443 6 6 1 8 -262144 -1 -1 2000 1;
r@302 444 #X obj 364 158 hsl 128 12 0 1 0 1 \$0-wg-l1 empty wguide-length1 6
r@302 445 6 1 8 -262144 -1 -1 3000 1;
r@302 446 #X obj 364 170 hsl 128 12 0 1 0 1 \$0-wg-l2 empty wguide-length2 6
r@302 447 6 1 8 -262144 -1 -1 3500 1;
r@302 448 #X obj 364 182 hsl 128 12 0 1 0 1 \$0-wg-w1 empty wguide-width1 6 6
r@302 449 1 8 -262144 -1 -1 8900 1;
r@302 450 #X obj 364 194 hsl 128 12 0 1 0 1 \$0-wg-w2 empty wguide-width2 6 6
r@302 451 1 8 -262144 -1 -1 6300 1;
r@302 452 #X obj 364 206 hsl 128 12 0 1 0 1 \$0-ot1-phase empty overtone1-phase
r@302 453 6 6 1 8 -262144 -1 -1 1000 1;
r@302 454 #X obj 364 218 hsl 128 12 0 1 0 1 \$0-ot1-freq empty overtone1-freq
r@302 455 6 6 1 8 -262144 -1 -1 1100 1;
r@302 456 #X obj 364 230 hsl 128 12 0 1 0 1 \$0-ot1-amp empty overtone1-amp 6
r@302 457 6 1 8 -262144 -1 -1 9900 1;
r@302 458 #X obj 364 242 hsl 128 12 0 1 0 1 \$0-ot2-phase empty overtone2-phase
r@302 459 6 6 1 8 -262144 -1 -1 1800 1;
r@302 460 #X obj 364 254 hsl 128 12 0 1 0 1 \$0-ot2-freq empty overtone2-freq
r@302 461 6 6 1 8 -262144 -1 -1 1700 1;
r@302 462 #X obj 364 266 hsl 128 12 0 1 0 1 \$0-ot2-amp empty overtone2-amp 6
r@302 463 6 1 8 -262144 -1 -1 3900 1;
r@302 464 #X obj 364 278 hsl 128 12 0 1 0 1 \$0-ot3-phase empty overtone3-phase
r@302 465 6 6 1 8 -262144 -1 -1 10300 1;
r@302 466 #X obj 364 290 hsl 128 12 0 1 0 1 \$0-ot3-freq empty overtone3-freq
r@302 467 6 6 1 8 -262144 -1 -1 9600 1;
r@302 468 #X obj 364 302 hsl 128 12 0 1 0 1 \$0-ot3-amp empty overtone3-amp 6
r@302 469 6 1 8 -262144 -1 -1 11200 1;
r@302 470 #X obj 310 360 *;
r@302 471 #X obj 364 134 hsl 128 12 0 1 0 1 \$0-waveguide-warping empty waveguide-warp
r@302 472 6 6 1 8 -262144 -1 -1 3600 1;
r@302 473 #X obj 156 269 *~;
r@302 474 #X obj 172 243 r \$0-mix-para;
r@302 475 #X obj 364 50 hsl 128 12 0 1 0 1 \$0-mix-para empty mix-parabolic 6
r@302 476 6 1 8 -262144 -1 -1 4000 1;
r@302 477 #X obj 364 38 hsl 128 12 0 1 0 1 \$0-mix-cylinders empty mix-cylinders
r@302 478 6 6 1 8 -262144 -1 -1 6200 1;
r@302 479 #X obj 62 168 *~;
r@302 480 #X obj 78 147 r \$0-mix-cylinders;
r@302 481 #X obj 326 340 r \$0-waveguide-warping;
r@302 482 #X obj 364 74 hsl 128 12 0 1 0 1 \$0-transmission_delay1 empty transmission_delay1
r@302 483 6 6 1 8 -262144 -1 -1 1900 1;
r@302 484 #X obj 431 556 * 100;
r@302 485 #X obj 431 575 delread~ td;
r@302 486 #X obj 362 398 delread~ td;
r@302 487 #X obj 146 124 delwrite~ td 300;
r@302 488 #X obj 501 724 * 100;
r@302 489 #X obj 501 705 r \$0-transmission_delay1;
r@302 490 #X obj 501 743 delread~ td;
r@302 491 #X obj 364 110 hsl 128 12 0 1 0 1 \$0-parabola-delay empty parabola-delay
r@302 492 6 6 1 8 -262144 -1 -1 1700 1;
r@302 493 #X obj 362 359 r \$0-transmission_delay2;
r@302 494 #X obj 431 536 r \$0-transmission_delay3;
r@302 495 #X obj 241 282 * 100;
r@302 496 #X obj 241 302 delread~ td;
r@302 497 #X obj 241 262 r \$0-warp-delay;
r@302 498 #X obj 364 122 hsl 128 12 0 1 0 1 \$0-warp-delay empty warp-delay 6
r@302 499 6 1 8 -262144 -1 -1 1900 1;
r@302 500 #X obj 156 186 * 100;
r@302 501 #X obj 156 206 delread~ td;
r@302 502 #X obj 156 166 r \$0-parabola-delay;
r@302 503 #X obj 364 98 hsl 128 12 0 1 0 1 \$0-transmission_delay3 empty transmission_delay3
r@302 504 6 6 1 8 -262144 -1 -1 3400 1;
r@302 505 #X obj 134 81 line~;
r@302 506 #X msg 134 62 \$1 250;
r@302 507 #X obj 309 401 lop~ 0.2;
r@302 508 #X obj 301 24 inlet;
r@302 509 #X floatatom 287 69 0 0 0 0 - - -;
r@302 510 #X obj 62 927 outlet~;
r@302 511 #X obj 310 49 / 2;
r@302 512 #X connect 1 0 59 0;
r@302 513 #X connect 1 1 59 0;
r@302 514 #X connect 1 2 59 0;
r@302 515 #X connect 1 3 59 0;
r@302 516 #X connect 2 0 15 3;
r@302 517 #X connect 3 0 15 5;
r@302 518 #X connect 4 0 15 4;
r@302 519 #X connect 5 0 55 0;
r@302 520 #X connect 6 0 1 1;
r@302 521 #X connect 6 0 66 0;
r@302 522 #X connect 7 0 86 0;
r@302 523 #X connect 8 0 9 0;
r@302 524 #X connect 9 0 12 0;
r@302 525 #X connect 10 0 11 0;
r@302 526 #X connect 11 0 15 2;
r@302 527 #X connect 12 0 15 1;
r@302 528 #X connect 13 0 8 0;
r@302 529 #X connect 14 0 8 1;
r@302 530 #X connect 14 0 10 0;
r@302 531 #X connect 15 0 7 0;
r@302 532 #X connect 16 0 3 0;
r@302 533 #X connect 17 0 2 0;
r@302 534 #X connect 18 0 4 0;
r@302 535 #X connect 19 0 16 0;
r@302 536 #X connect 20 0 17 0;
r@302 537 #X connect 21 0 18 0;
r@302 538 #X connect 22 0 82 0;
r@302 539 #X connect 23 0 7 0;
r@302 540 #X connect 24 0 1 0;
r@302 541 #X connect 25 0 22 0;
r@302 542 #X connect 26 0 53 0;
r@302 543 #X connect 28 0 65 0;
r@302 544 #X connect 29 0 2 1;
r@302 545 #X connect 30 0 2 2;
r@302 546 #X connect 31 0 2 3;
r@302 547 #X connect 32 0 3 1;
r@302 548 #X connect 33 0 3 2;
r@302 549 #X connect 34 0 3 3;
r@302 550 #X connect 35 0 4 1;
r@302 551 #X connect 36 0 4 2;
r@302 552 #X connect 37 0 4 3;
r@302 553 #X connect 38 0 83 0;
r@302 554 #X connect 53 0 38 0;
r@302 555 #X connect 55 0 15 0;
r@302 556 #X connect 56 0 55 1;
r@302 557 #X connect 59 0 23 0;
r@302 558 #X connect 60 0 59 1;
r@302 559 #X connect 61 0 53 1;
r@302 560 #X connect 63 0 64 0;
r@302 561 #X connect 64 0 21 0;
r@302 562 #X connect 65 0 20 0;
r@302 563 #X connect 67 0 69 0;
r@302 564 #X connect 68 0 67 0;
r@302 565 #X connect 69 0 19 0;
r@302 566 #X connect 71 0 28 0;
r@302 567 #X connect 72 0 63 0;
r@302 568 #X connect 73 0 74 0;
r@302 569 #X connect 74 0 14 0;
r@302 570 #X connect 75 0 73 0;
r@302 571 #X connect 77 0 78 0;
r@302 572 #X connect 78 0 5 0;
r@302 573 #X connect 79 0 77 0;
r@302 574 #X connect 81 0 6 0;
r@302 575 #X connect 82 0 81 0;
r@302 576 #X connect 83 0 10 1;
r@302 577 #X connect 83 0 9 1;
r@302 578 #X connect 84 0 85 0;
r@302 579 #X connect 84 0 87 0;
r@302 580 #X connect 87 0 0 0;