1
#N canvas 471 146 638 403 12;
2
#X obj 156 262 pack 0 50;
3
#X obj 98 216 pack 0 50;
10
#X obj 285 165 r pitch+;
11
#X obj 185 139 r interval+;
12
#X obj 98 164 expr $f1 * $f2 + $f3;
13
#X obj 481 137 r dropoff+;
14
#X obj 297 63 expr ($i1% 10000) * 0.0002 - 1;
15
#X obj 297 11 r phase;
17
#X obj 376 165 expr exp(-$f1*$f1*$f2);
20
#X text 64 8 our local phase =;
21
#X text 61 26 overall phase + our;
22
#X text 60 45 relative phase;
23
#X text 57 64 (modulo 10000);
24
#X text 59 81 normalized from -1 to 1;
25
#X text 349 36 \$1: relative phase;
26
#X text 9 110 pitch is center pitch;
27
#X text 16 125 + interval*phase;
28
#X text 373 194 amplitude is Gaussian \, with;
29
#X text 321 215 peak width controlled by "dropoff";