#N canvas 0 0 628 715 10;
#X obj 123 77 inlet;
#X obj 167 413 outlet;
#X msg 147 262 next;
#X text 182 513 speed;
#X obj 123 605 del;
#X obj 123 634 s \$0-next;
#X obj 147 239 r \$0-next;
#X obj 202 328 outlet;
#X obj 145 513 * 10;
#X obj 139 565 -;
#X obj 145 535 t a a;
#X obj 145 183 s pd-data;
#X msg 145 158 sort;
#X obj 167 131 s \$0-start;
#X obj 327 506 r \$0-start;
#X msg 327 528 0;
#X obj 168 487 r \$0-speed;
#X obj 471 105 s \$0-speed;
#X obj 471 78 inlet;
#X text 260 131 reset delta time below;
#X text 257 330 Bang at EOF;
#X text 203 635 get next note;
#X text 262 584 delta = x[current] - x[previous];
#X text 263 564 calculate delta time between notes:;
#X obj 123 329 t b p p;
#X text 257 412 Pointer out;
#X text 408 506 reset delta;
#X text 260 459 get x position;
#X obj 123 296 pointer \$1;
#X obj 145 459 get \$1 x;
#X msg 123 207 traverse \$1 \, next;
#X obj 123 108 t a b b;
#X text 123 27 Argument: data structure name;
#X text 66 56 Inlet: name of subpatch containing data structures;
#X text 466 59 Inlet: speed mult;
#X connect 0 0 31 0;
#X connect 2 0 28 0;
#X connect 4 0 5 0;
#X connect 6 0 2 0;
#X connect 8 0 10 0;
#X connect 9 0 4 1;
#X connect 10 0 9 1;
#X connect 10 1 9 0;
#X connect 12 0 11 0;
#X connect 14 0 15 0;
#X connect 15 0 9 1;
#X connect 16 0 8 1;
#X connect 18 0 17 0;
#X connect 24 0 4 0;
#X connect 24 1 29 0;
#X connect 24 2 1 0;
#X connect 28 0 24 0;
#X connect 28 1 2 0;
#X connect 28 2 7 0;
#X connect 29 0 8 0;
#X connect 30 0 28 0;
#X connect 31 0 30 0;
#X connect 31 1 12 0;
#X connect 31 2 13 0;