#N canvas 173 60 491 669 10; #X obj 109 443 list-find; #X obj 108 163 unpack f f; #X obj 108 186 swap; #X text 173 163 note \, vel; #X obj 136 358 list-value-extend \$0-notes; #X obj 109 266 f; #X obj 109 233 sel 0; #X obj 136 334 list append; #X obj 136 266 list prepend; #X text 213 268 note \, vel; #X text 207 335 note \, vel \, time-on; #X obj 109 516 list-extract 0 3; #X obj 109 490 list-value \$0-notes; #X obj 136 420 list-value \$0-notes; #X obj 109 399 t a b; #X obj 202 540 list-value \$0-notes; #X obj 109 585 list append; #X obj 108 39 inlet note vel; #X obj 323 41 inlet time; #X obj 199 312 r \$0-time; #X obj 172 562 r \$0-time; #X obj 323 76 s \$0-time; #X obj 109 629 outlet note vel timeon timeoff; #N canvas 748 370 257 276 ignore-dupes 0; #X obj 42 26 inlet; #X obj 42 144 list-find; #X obj 42 68 unpack f f; #X obj 93 166 sel 0; #X obj 93 190 list; #X obj 42 47 t a a; #X obj 42 100 t a b; #X obj 69 121 list-value \$0-notes; #X obj 93 215 outlet; #X connect 0 0 5 0; #X connect 1 1 3 0; #X connect 2 0 6 0; #X connect 3 0 4 0; #X connect 4 0 8 0; #X connect 5 0 2 0; #X connect 5 1 4 1; #X connect 6 0 1 0; #X connect 6 1 7 0; #X connect 7 0 1 1; #X restore 136 288 pd ignore-dupes; #X obj 109 464 t b a; #X connect 0 0 24 0; #X connect 1 0 2 0; #X connect 1 1 2 1; #X connect 2 0 6 0; #X connect 2 1 5 1; #X connect 2 1 8 1; #X connect 5 0 14 0; #X connect 6 0 5 0; #X connect 6 1 8 0; #X connect 7 0 4 0; #X connect 8 0 23 0; #X connect 11 0 16 0; #X connect 11 1 15 0; #X connect 12 0 11 0; #X connect 13 0 0 1; #X connect 14 0 0 0; #X connect 14 1 13 0; #X connect 16 0 22 0; #X connect 17 0 1 0; #X connect 18 0 21 0; #X connect 19 0 7 1; #X connect 20 0 16 1; #X connect 23 0 7 0; #X connect 24 0 12 0; #X connect 24 1 11 1;