#N canvas 371 292 652 283 10; #X obj 138 85 phasor~; #X obj 139 125 cos~; #X text 191 125 2*pi is implicit; #X obj 31 84 vline~; #X obj 123 178 *~; #X obj 123 229 dac~; #X msg 191 157 0.5; #X text 227 156 a = amplitude; #X text 203 60 f = frequency; #X text 63 29 T = time of window; #X obj 31 135 cos~; #X obj 138 61 nbx 5 14 -1e+37 1e+37 0 1 empty empty empty 0 -6 0 10 -262144 -1 -1 440 256; #X obj 124 202 *~ 0.5; #X obj 31 112 -~ 0.25; #X msg 31 57 0 \, 0.5 \$1 0; #X msg 31 28 100; #N canvas 0 0 248 261 grain 0; #X obj 65 84 phasor~; #X obj 66 110 cos~; #X obj 7 83 vline~; #X obj 50 176 *~; #X obj 7 134 cos~; #X obj 51 198 *~ 0.5; #X obj 7 111 -~ 0.25; #X msg 7 56 0 \, 0.5 \$1 0; #X obj 7 6 inlet time frequency amplitude; #X obj 50 225 outlet~; #X obj 7 31 unpack f f f; #X connect 0 0 1 0; #X connect 1 0 3 1; #X connect 2 0 6 0; #X connect 3 0 5 0; #X connect 4 0 3 0; #X connect 5 0 9 0; #X connect 6 0 4 0; #X connect 7 0 2 0; #X connect 8 0 10 0; #X connect 10 0 7 0; #X connect 10 1 0 0; #X connect 10 2 5 1; #X restore 411 162 pd grain; #X obj 411 193 dac~; #X msg 445 66 800 100 0.6; #X msg 434 89 400 200 0.5; #X msg 421 111 200 800 0.4; #X msg 411 133 20 1000 0.3; #X text 375 36 use with lists - time \, freq \, qmp; #X connect 0 0 1 0; #X connect 1 0 4 1; #X connect 3 0 13 0; #X connect 4 0 12 0; #X connect 6 0 12 1; #X connect 10 0 4 0; #X connect 11 0 0 0; #X connect 12 0 5 0; #X connect 12 0 5 1; #X connect 13 0 10 0; #X connect 14 0 3 0; #X connect 15 0 14 0; #X connect 16 0 17 0; #X connect 16 0 17 1; #X connect 18 0 16 0; #X connect 19 0 16 0; #X connect 20 0 16 0; #X connect 21 0 16 0;