#N canvas 87 101 860 610 10; #X text 492 542 (c)2012 Marian Weger; #X obj 16 396 tabread4 \$1; #X obj 94 541 outlet; #N canvas 774 81 317 328 init 0; #X obj 54 -61 loadbang; #X obj 157 51 float \$2; #X obj 157 73 sel 0; #X msg 157 95 100; #X obj 54 51 list prepend \$1; #X obj 54 103 list append; #X obj 54 -9 t b b; #X obj 54 143 list append \$3; #X msg 54 168 \; \$1 bounds 1 1 \$2 0 \; \$1/resolution \$2 \; \$1/quality \$3 \;; #X obj 119 -61 r \$1/loadbang; #X connect 0 0 6 0; #X connect 1 0 2 0; #X connect 2 0 3 0; #X connect 2 1 5 1; #X connect 3 0 5 1; #X connect 4 0 5 0; #X connect 5 0 7 0; #X connect 6 0 4 0; #X connect 6 1 1 0; #X connect 7 0 8 0; #X connect 9 0 6 0; #X coords 0 328 1 327 85 60 0; #X restore 490 331 pd init; #X obj 382 241 s \$1/shape; #X obj 430 219 s \$1/weight; #X obj 479 197 s \$1/resolution; #X obj 246 421 + 1; #X obj 152 443 tabread \$1; #X obj 246 443 tabread \$1; #X text 19 30 fadecurve ; #X obj 527 177 s \$1/quality; #X obj 139 175 r \$1/quality; #N canvas 466 47 586 541 demux 0; #X obj 64 99 inlet; #X obj 451 99 inlet; #X obj 64 227 spigot 1; #X obj 166 429 outlet; #X obj 64 429 outlet; #X obj 166 227 spigot 0; #X obj 211 181 == 1; #X obj 331 181 == 2; #X obj 286 429 outlet; #X obj 286 227 spigot 0; #X obj 406 429 outlet; #X obj 406 227 spigot 0; #X obj 406 400 + 1; #X obj 307 325 - 1; #X obj 406 378 * 99; #X obj 286 400 + 1; #X obj 286 378 * 99; #X obj 166 400 + 1; #X obj 166 378 * 99; #X obj 307 273 r \$1/resolution; #X obj 307 295 clip 10 10000; #X obj 109 181 <= 0; #X obj 451 181 >= 3; #X connect 0 0 2 0; #X connect 0 0 5 0; #X connect 0 0 9 0; #X connect 0 0 11 0; #X connect 1 0 6 0; #X connect 1 0 7 0; #X connect 1 0 21 0; #X connect 1 0 22 0; #X connect 2 0 4 0; #X connect 5 0 18 0; #X connect 6 0 5 1; #X connect 7 0 9 1; #X connect 9 0 16 0; #X connect 11 0 14 0; #X connect 12 0 10 0; #X connect 13 0 14 1; #X connect 13 0 16 1; #X connect 13 0 18 1; #X connect 14 0 12 0; #X connect 15 0 8 0; #X connect 16 0 15 0; #X connect 17 0 3 0; #X connect 18 0 17 0; #X connect 19 0 20 0; #X connect 20 0 13 0; #X connect 21 0 2 1; #X connect 22 0 11 1; #X restore 94 297 pd demux; #X obj 109 396 tabread \$1; #X obj 109 344 + 0.5; #X obj 109 366 int; #X obj 341 443 wrap; #X obj 227 396 t f f f; #X obj 139 229 int; #X obj 225 175 r \$1/weight; #X obj 225 207 > 0; #X obj 139 271 *; #X obj 225 229 t b f; #X obj 94 133 clip 0 1; #N canvas 221 88 964 756 curve-calculation 0; #X obj 87 350 until; #X obj 87 379 f; #X obj 127 379 + 1; #X obj 87 322 t f b; #X msg 127 350 0; #X obj 328 104 t b f; #X obj 51 1233 tabwrite \$1; #X obj 237 466 - 1; #X obj 166 550 / 99; #X obj 87 152 f 0; #X obj 328 79 f 0; #X obj 166 466 moses 100; #X obj 87 401 t f f; #X msg 51 608 0; #X obj 127 446 moses 2; #X obj 114 229 + 3; #X obj 87 297 f 103; #X msg 81 608 1; #X obj 166 488 - 1; #X obj 193 784 s \$0-linear; #X obj 260 1117 r \$0-linear; #X obj 166 1143 expr ($f1*$f3) + ($f2*(1.0-$f3)); #X obj 166 608 t b f; #X obj 166 909 f 0; #X obj 87 178 t b f; #X obj 166 992 list append; #X obj 166 941 pack 0 0 0 0 0; #X obj 487 646 f 0; #X obj 543 433 moses 0; #X obj 797 469 moses 1; #X obj 543 469 moses -1; #X obj 502 520 * -1; #X obj 621 596 + 1; #X obj 878 520 - 1; #X obj 612 701 pack 0 0 0 0 0; #X obj 836 572 + 2; #X obj 797 520 * -1; #X obj 797 596 + 1; #X obj 543 520 + 2; #X msg 758 596 0; #X msg 723 596 0; #X msg 689 596 0; #X msg 652 596 0; #X obj 502 572 - 1; #X obj 588 596 * -1; #X obj 836 520 * -1; #X obj 166 1016 unpack 0 0 0 0 0 0 0 0 0 0; #X obj 166 1058 *; #X obj 201 1058 *; #X obj 236 1058 *; #X obj 271 1058 *; #X obj 307 1058 *; #X obj 166 1084 expr $f1+$f2+$f3+$f4+$f5; #X obj 442 572 max 2; #X obj 487 362 t b f; #X obj 234 608 unpack 0 0 0 0 0; #X obj 201 738 spigot; #X obj 224 718 spigot; #X obj 247 698 spigot; #X obj 270 678 spigot; #X obj 294 658 spigot; #X obj 612 723 s \$0-weight-list; #X obj 229 969 r \$0-weight-list; #X obj 234 581 r \$0-weight-list; #X obj 878 596 min 1; #X obj 836 596 max 0; #X obj 502 596 min 1; #X obj 543 596 max 0; #X obj 17 34 r \$1/shape; #X obj 337 904 expr pow($f1 \, $f2); #X obj 337 814 expr sin($f1*1.570796326794897); #X obj 87 34 r \$1/resolution; #X obj 87 56 t b f; #X obj 198 152 clip 10 10000; #X obj 328 34 r \$1/weight; #X obj 328 56 clip 0 1; #X msg 141 274 resize \$1; #X obj 141 297 s \$1; #X obj 114 251 t f f; #X obj 198 178 t f f f; #X obj 337 784 expr 1.0-pow(1.0-$f1 \, $f2); #X obj 337 874 expr 1.0-cos($f1*1.570796326794897); #X obj 337 844 expr pow(sin($f1*1.570796326794897) \, 2); #X connect 0 0 1 0; #X connect 1 0 2 0; #X connect 1 0 12 0; #X connect 2 0 1 1; #X connect 3 0 0 0; #X connect 3 1 4 0; #X connect 4 0 1 1; #X connect 5 0 9 0; #X connect 5 1 21 2; #X connect 7 0 8 1; #X connect 8 0 22 0; #X connect 9 0 24 0; #X connect 10 0 5 0; #X connect 11 0 18 0; #X connect 11 1 17 0; #X connect 12 0 14 0; #X connect 12 1 6 1; #X connect 13 0 6 0; #X connect 14 0 13 0; #X connect 14 1 11 0; #X connect 15 0 78 0; #X connect 16 0 3 0; #X connect 17 0 6 0; #X connect 18 0 8 0; #X connect 20 0 21 1; #X connect 21 0 6 0; #X connect 22 0 23 0; #X connect 22 1 19 0; #X connect 22 1 60 0; #X connect 22 1 59 0; #X connect 22 1 58 0; #X connect 22 1 57 0; #X connect 22 1 56 0; #X connect 23 0 26 0; #X connect 24 0 16 0; #X connect 24 1 54 0; #X connect 25 0 46 0; #X connect 26 0 25 0; #X connect 27 0 34 0; #X connect 28 0 30 0; #X connect 28 1 29 0; #X connect 29 0 34 3; #X connect 29 0 36 0; #X connect 29 0 40 0; #X connect 29 1 33 0; #X connect 29 1 39 0; #X connect 29 1 45 0; #X connect 29 1 53 0; #X connect 30 0 31 0; #X connect 30 0 38 0; #X connect 30 0 42 0; #X connect 30 1 41 0; #X connect 30 1 44 0; #X connect 30 1 32 0; #X connect 31 0 43 0; #X connect 31 0 53 0; #X connect 32 0 34 2; #X connect 33 0 64 0; #X connect 34 0 61 0; #X connect 35 0 65 0; #X connect 36 0 37 0; #X connect 37 0 34 2; #X connect 38 0 67 0; #X connect 39 0 34 2; #X connect 39 0 34 1; #X connect 39 0 27 1; #X connect 40 0 34 1; #X connect 40 0 27 1; #X connect 40 0 34 4; #X connect 41 0 34 3; #X connect 41 0 27 1; #X connect 41 0 34 4; #X connect 42 0 34 2; #X connect 42 0 34 3; #X connect 42 0 34 4; #X connect 43 0 66 0; #X connect 44 0 34 1; #X connect 45 0 35 0; #X connect 46 0 47 0; #X connect 46 1 48 0; #X connect 46 2 49 0; #X connect 46 3 50 0; #X connect 46 4 51 0; #X connect 46 5 47 1; #X connect 46 6 48 1; #X connect 46 7 49 1; #X connect 46 8 50 1; #X connect 46 9 51 1; #X connect 47 0 52 0; #X connect 48 0 52 1; #X connect 49 0 52 2; #X connect 50 0 52 3; #X connect 51 0 52 4; #X connect 52 0 21 0; #X connect 53 0 69 1; #X connect 53 0 80 1; #X connect 54 0 27 0; #X connect 54 1 28 0; #X connect 55 0 56 1; #X connect 55 1 57 1; #X connect 55 2 58 1; #X connect 55 3 59 1; #X connect 55 4 60 1; #X connect 56 0 80 0; #X connect 57 0 70 0; #X connect 58 0 82 0; #X connect 59 0 81 0; #X connect 60 0 69 0; #X connect 62 0 25 1; #X connect 63 0 55 0; #X connect 64 0 34 4; #X connect 65 0 34 3; #X connect 66 0 27 1; #X connect 67 0 34 1; #X connect 68 0 9 0; #X connect 69 0 26 4; #X connect 70 0 26 1; #X connect 71 0 72 0; #X connect 72 0 9 0; #X connect 72 1 73 0; #X connect 73 0 79 0; #X connect 74 0 75 0; #X connect 75 0 10 0; #X connect 76 0 77 0; #X connect 78 0 16 1; #X connect 78 1 76 0; #X connect 79 0 15 0; #X connect 79 1 11 1; #X connect 79 2 7 0; #X connect 80 0 23 1; #X connect 81 0 26 3; #X connect 82 0 26 2; #X coords 0 756 1 755 85 60 0; #X restore 490 351 pd curve-calculation; #N canvas 0 22 290 330 resize 0; #X obj 80 100 r \$0-resolution; #X obj 80 124 + 3; #X obj 80 148 list prepend \$1; #X msg 80 176 \; \$1 resize \$2 \;; #X connect 0 0 1 0; #X connect 1 0 2 0; #X connect 2 0 3 0; #X restore 490 371 pd resize; #X obj 152 470 expr ($f1*(1.0-$f3)) + ($f2*$f3); #X obj 382 101 inlet control; #X obj 94 101 inlet; #X obj 382 133 route shape weight resolution quality vis; #X obj 593 401 r \$1/vis; #X obj 593 423 t b; #X msg 593 445 vis 1; #X obj 576 157 s \$1/vis; #X obj 593 467 s pd-\$1; #X obj 490 401 table \$1 100; #X connect 1 0 2 0; #X connect 7 0 9 0; #X connect 8 0 27 0; #X connect 9 0 27 1; #X connect 12 0 19 0; #X connect 13 0 2 0; #X connect 13 1 15 0; #X connect 13 2 18 0; #X connect 13 3 1 0; #X connect 14 0 2 0; #X connect 15 0 16 0; #X connect 16 0 14 0; #X connect 17 0 27 2; #X connect 18 0 8 0; #X connect 18 1 7 0; #X connect 18 2 17 0; #X connect 19 0 22 0; #X connect 20 0 21 0; #X connect 21 0 23 0; #X connect 22 0 13 1; #X connect 23 0 22 0; #X connect 23 1 22 1; #X connect 24 0 13 0; #X connect 27 0 2 0; #X connect 28 0 30 0; #X connect 29 0 24 0; #X connect 30 0 4 0; #X connect 30 1 5 0; #X connect 30 2 6 0; #X connect 30 3 11 0; #X connect 30 4 34 0; #X connect 31 0 32 0; #X connect 32 0 33 0; #X connect 33 0 35 0; #X coords 0 610 1 609 85 60 0;