#N canvas 627 235 783 837 12; #N canvas 0 0 450 300 graph1 0; #X array array1 62079 float 2; #X coords 0 1 62079 -1 200 140 1; #X restore 291 29 graph; #X obj 290 220 soundfiler; #X floatatom 290 246 5 0 0 0 - - -; #X obj 290 272 expr 44100 / $f1; #X obj 290 329 *~; #X obj 290 303 phasor~; #X obj 47 370 phasor~; #X floatatom 47 345 5 0 0 0 - - -; #X obj 46 512 *~ 256; #X msg 290 190 read -resize voice.wav array1; #X obj 290 507 samphold~; #X obj 47 628 tabread4~ array1; #X obj 47 593 +~; #X obj 49 763 dac~; #N canvas 0 0 450 300 graph2 0; #X array hanning 256 float 1; #A 0 0 0.000150591 0.000602275 0.00135478 0.00240764 0.00376022 0.00541174 0.00736117 0.00960734 0.0121489 0.0149843 0.0181119 0.0215298 0.0252359 0.0292279 0.0335035 0.0380601 0.042895 0.0480052 0.0533877 0.0590392 0.0649563 0.0711355 0.077573 0.084265 0.0912073 0.0983959 0.105826 0.113494 0.121395 0.129524 0.137876 0.146446 0.155229 0.16422 0.173413 0.182803 0.192384 0.20215 0.212095 0.222214 0.2325 0.242948 0.25355 0.264301 0.275194 0.286222 0.297379 0.308658 0.320052 0.331555 0.343159 0.354857 0.366643 0.378509 0.390449 0.402454 0.414519 0.426634 0.438794 0.450991 0.463218 0.475466 0.487729 0.5 0.512271 0.524534 0.536782 0.549009 0.561205 0.573365 0.585481 0.597545 0.609551 0.62149 0.633357 0.645143 0.656841 0.668445 0.679948 0.691342 0.702621 0.713778 0.724806 0.735699 0.74645 0.757052 0.767499 0.777786 0.787905 0.79785 0.807616 0.817197 0.826587 0.83578 0.844771 0.853554 0.862124 0.870476 0.878605 0.886506 0.894174 0.901605 0.908793 0.915736 0.922428 0.928865 0.935044 0.940961 0.946613 0.951995 0.957106 0.96194 0.966497 0.970773 0.974765 0.978471 0.981889 0.985016 0.987852 0.990393 0.992639 0.994589 0.99624 0.997593 0.998645 0.999398 0.999849 1 0.999849 0.999398 0.998645 0.997592 0.996239 0.994588 0.992638 0.990392 0.987851 0.985015 0.981887 0.978469 0.974763 0.970771 0.966495 0.961939 0.957104 0.951993 0.946611 0.940959 0.935042 0.928863 0.922425 0.915733 0.908791 0.901602 0.894171 0.886503 0.878602 0.870473 0.862121 0.853551 0.844768 0.835777 0.826584 0.817194 0.807613 0.797847 0.787901 0.777782 0.767496 0.757048 0.746446 0.735695 0.724802 0.713774 0.702617 0.691338 0.679944 0.668441 0.656837 0.645139 0.633353 0.621486 0.609547 0.597541 0.585477 0.573361 0.561201 0.549004 0.536778 0.52453 0.512266 0.499996 0.487725 0.475462 0.463213 0.450987 0.43879 0.42663 0.414515 0.40245 0.390445 0.378505 0.366639 0.354853 0.343155 0.331551 0.320048 0.308654 0.297375 0.286218 0.27519 0.264297 0.253547 0.242944 0.232497 0.222211 0.212092 0.202146 0.19238 0.182799 0.17341 0.164217 0.155226 0.146443 0.137873 0.129521 0.121392 0.113491 0.105823 0.0983929 0.0912044 0.0842621 0.0775702 0.0711328 0.0649537 0.0590367 0.0533853 0.0480029 0.0428928 0.038058 0.0335015 0.029226 0.025234 0.0215281 0.0181104 0.0149829 0.0121476 0.00960615 0.0073601 0.00541082 0.00375944 0.00240701 0.00135431 0.000601947 0.000150442 ; #X coords 0 1 256 0 40 30 1; #X restore 248 741 graph; #X text 233 758 0; #X text 233 735 1; #X text 236 774 0; #X text 272 774 256; #X obj 204 629 tabread~ hanning; #X obj 48 695 *~; #X obj 385 508 *~ 256; #X obj 627 515 samphold~; #X obj 386 624 tabread4~ array1; #X obj 386 589 +~; #X obj 543 625 tabread~ hanning; #X obj 387 691 *~; #X obj 385 457 wrap~; #X obj 385 429 +~ 0.5; #X obj 49 731 *~ 0.6; #X text 31 29 3.7.1.1. Granular Theory 4; #X text 537 193 load sound file; #X text 343 247 size of sound file; #X text 356 303 runs at original speed; #X text 45 323 playback speed you want; #X text 104 502 window \, here 256; #X text 103 519 samples in size; #X text 448 436 phase shift; #X text 445 500 window \, here 256; #X text 444 517 samples in size; #X text 543 778 www.pd-tutorial.com; #X text 561 748 Johannes Kreidler; #X connect 1 0 2 0; #X connect 2 0 3 0; #X connect 2 0 4 1; #X connect 3 0 5 0; #X connect 4 0 10 0; #X connect 4 0 22 0; #X connect 5 0 4 0; #X connect 6 0 8 0; #X connect 6 0 10 1; #X connect 6 0 28 0; #X connect 7 0 6 0; #X connect 8 0 12 0; #X connect 8 0 19 0; #X connect 9 0 1 0; #X connect 10 0 12 1; #X connect 11 0 20 0; #X connect 12 0 11 0; #X connect 19 0 20 1; #X connect 20 0 29 0; #X connect 21 0 24 0; #X connect 21 0 25 0; #X connect 22 0 24 1; #X connect 23 0 26 0; #X connect 24 0 23 0; #X connect 25 0 26 1; #X connect 26 0 29 0; #X connect 27 0 21 0; #X connect 27 0 22 1; #X connect 28 0 27 0; #X connect 29 0 13 0; #X connect 29 0 13 1;