#N canvas -9 -9 1920 976 12; #X obj 260 447 dac~; #X floatatom 297 251 8 0 0 0 - - -; #X obj 12 22 hsl 777 25 10 80000 1 0 empty empty empty -2 -8 0 10 -228856 -1 -1 101000 1; #X obj 9 389 -; #X floatatom 9 413 12 0 0 0 - - -; #X obj 20 366 t b f; #X obj 9 342 / 2; #X obj 9 436 - 48.4948; #X floatatom 9 460 12 0 0 0 - - -; #X text 67 49 Hz; #X obj 359 145 vsl 30 215 0 96.7841 0 0 empty empty empty 0 -9 0 10 -262144 -1 -1 180 1; #X obj 297 277 rmstodb; #X floatatom 297 301 8 0 0 0 - - -; #N canvas 0 50 450 250 (subpatch) 0; #X array \$0-view 20 float 1; #A 0 0.980379 0.934423 0.66498 0.236509 -0.248525 -0.674127 -0.938494 -0.978418 -0.784352 -0.402698 0.0752694 0.53523 0.867194 0.991758 0.87913 0.556263 0.100362 -0.379547 -0.768677 -0.973977; #X coords 0 -1 19 1 200 280 1 0 0; #X restore 393 143 graph; #X obj 298 447 tabwrite~ \$0-view; #X obj 298 434 bng 10 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X obj 520 449 s \$0-view; #X msg 520 425 resize \$1; #X obj 396 425 hsl 110 19 20 441 0 1 empty empty empty -2 -8 0 10 -228856 -1 -1 0 1; #X obj 298 395 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1; #X obj 607 126 vradio 18 1 0 8 empty empty empty 0 -8 0 10 -262144 -1 -1 1; #X msg 607 280 interp \$1; #X text 612 126 0 - No interpolation, f 47; #X text 612 142 1 - High-quality linear interpolation (default); #X text 612 160 2 -; #X text 640 154 Low-quality linear interpolation (found in MSP 1.x versions of [wave~], f 43; #X text 612 181 3 - Cosine interpolation, f 47; #X text 612 198 4 - Cubic interpolation, f 47; #X text 612 216 5 - Spline interpolation, f 47; #X text 612 233 6 - Hermite interpolation, f 47; #X text 612 251 7 - Extra: Pd's interpolator (Lagrange), f 47; #X msg 683 280 interp_bias \$1; #X msg 683 306 interp_tension \$1; #X obj 607 318 s interp; #X obj 297 334 hradio 27 1 0 2 empty empty empty 0 -8 0 10 -228856 -1 -1 1; #N canvas 0 50 479 418 AB 0; #X obj 75 41 inlet; #X obj 75 65 expr 1-$f1; #X obj 14 104 r~ A; #X obj 189 108 r~ B; #X obj 56 159 *~; #X msg 74 91 \$1 60; #X msg 120 91 \$1 60; #X obj 102 159 *~; #X obj 74 115 line~; #X obj 120 116 line~; #X obj 80 185 outlet~; #X connect 0 0 1 0; #X connect 0 0 6 0; #X connect 1 0 5 0; #X connect 2 0 4 0; #X connect 3 0 7 0; #X connect 4 0 10 0; #X connect 5 0 8 0; #X connect 6 0 9 0; #X connect 7 0 10 0; #X connect 8 0 4 1; #X connect 9 0 7 1; #X restore 297 367 pd AB; #X msg 339 367 1; #X floatatom 358 392 4 60 10000 0 - - -; #X obj 298 412 metro 800; #N canvas -9 -9 1920 976 sinetables 0; #X obj 77 18 loadbang; #X obj 97 175 cnv 15 198 138 empty empty empty 20 12 0 14 -261682 -66577 0; #N canvas 0 22 450 300 (subpatch) 0; #X array smallsine 4099 float 0; #X coords 0 1 4098 -1 200 140 1 0 0; #X restore 96 174 graph; #X msg 77 91 sinesum 4096 1 normalize; #X obj 77 45 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X text 293 315 4099; #X obj 432 173 cnv 15 198 138 empty empty empty 20 12 0 14 -261682 -66577 0; #N canvas 0 22 450 300 (subpatch) 0; #X array bigsine 32771 float 0; #X coords 0 1 32770 -1 200 140 1 0 0; #X restore 431 172 graph; #X text 628 313 44103; #X msg 412 89 sinesum 44100 1 normalize; #X obj 412 115 send bigsine; #X obj 77 117 send smallsine; #X text 545 327 damn' sinesum resizes array to 32771; #X text 147 354 how many points do [osc~] or [cos~] use? 512!?; #X connect 0 0 4 0; #X connect 3 0 11 0; #X connect 4 0 3 0; #X connect 4 0 9 0; #X connect 9 0 10 0; #X restore 607 341 pd sinetables; #X text 602 95 [cyclone/wave~] interpolation-modes; #X obj 597 467 bng 8 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X obj 597 81 bng 8 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X text 56 157 ... bandlimited \, waveshapers ect.; #X obj 260 424 /~ 4; #X text 827 464 tweaked for 44100; #X text 7 3 ///quantify aliasing by measuring an upsampled copy with hp; #X text 37 342 ? because reflection doubles ?; #X text 13 72 test with (copy/paste: editmode \, click once \, ctrl+c \, ctrl+v); #X floatatom 9 50 8 0 0 0 - - -; #X text 85 98 qalias~ 8 phasor~ 1 cyclone/wave~ bigsine; #X text 85 110 qalias~ 8 phasor~ 1 cyclone/wave~ smallsine; #X text 85 122 qalias~ 8 phasor~ 1 cos~; #X text 84 135 qalias~ 8 osc~ 100 +~ 0; #X msg 9 106 \$1 40; #X obj 9 130 line~; #X obj 9 185 qalias~ 8 osc~ 100 +~ 0; #X connect 1 0 5 0; #X connect 1 0 11 0; #X connect 2 0 49 0; #X connect 3 0 4 0; #X connect 4 0 7 0; #X connect 5 0 3 0; #X connect 5 1 3 1; #X connect 6 0 3 0; #X connect 7 0 8 0; #X connect 11 0 12 0; #X connect 15 0 14 0; #X connect 17 0 16 0; #X connect 18 0 17 0; #X connect 19 0 38 0; #X connect 20 0 21 0; #X connect 21 0 33 0; #X connect 31 0 33 0; #X connect 32 0 33 0; #X connect 34 0 35 0; #X connect 34 0 36 0; #X connect 35 0 14 0; #X connect 35 0 44 0; #X connect 36 0 19 0; #X connect 37 0 38 1; #X connect 38 0 15 0; #X connect 42 0 41 0; #X connect 44 0 0 0; #X connect 49 0 54 0; #X connect 54 0 55 0; #X connect 55 0 56 0; #X connect 56 0 6 0; #X connect 56 1 1 0; #X connect 56 1 10 0;