#N canvas 442 94 629 579 12;
#X msg 196 21 bang;
#X obj 196 161 zl group 3;
#X msg 296 21 a b c;
#X msg 62 133 symbol test;
#X floatatom 54 171 5 0 0 0 - - -;
#X msg 307 171 bang;
#X msg 308 105 symbol test;
#X floatatom 308 133 5 0 0 0 - - -;
#X msg 29 21 b c d e f;
#X msg 69 489 mode len \, debug \, bang \, mode previous \, debug;
#X msg 433 77 2nd;
#X msg 433 21 1st;
#X obj 433 105 testmess 150;
#X obj 433 49 testmess 150;
#X msg 69 517 mode reg \, debug \, bang \, mode previous \, debug;
#X msg 111 171 debug 1;
#X msg 54 77 -1 -2 -3 -4 -5;
#X msg 308 77 -4 -5 -6;
#X obj 524 237 zl;
#X msg 524 209 bang;
#X msg 462 209 debug;
#X msg 406 297 mode rev \, bang;
#X msg 487 21 set 1000;
#X msg 488 77 set 1000;
#X msg 406 353 mode union \, bang;
#X msg 406 325 mode sect \, bang;
#X floatatom 49 301 5 0 0 0 - - -;
#X msg 172 271 mode group \$1 \, bang;
#X floatatom 49 276 5 0 0 0 - - -;
#X msg 172 327 mode slice \$1 \, bang;
#X msg 406 381 mode join \, bang;
#X msg 172 243 mode iter \$1 \, bang;
#X floatatom 49 326 5 0 0 0 - - -;
#X floatatom 49 251 5 0 0 0 - - -;
#X msg 172 299 mode rot \$1 \, bang;
#X msg 172 355 mode ecils \$1 \, bang;
#X floatatom 49 351 5 0 0 0 - - -;
#X obj 196 189 print left;
#X obj 307 199 print right;
#X msg 172 383 mode nth \$1 \, bang;
#N canvas 0 0 450 300 prev 0;
#X obj 45 39 r doit;
#X obj 173 246 outlet;
#X obj 45 75 route mode;
#X obj 173 211 prepend mode;
#X obj 173 177 zl reg;
#X msg 173 143 bang;
#X obj 45 109 route len reg previous;
#X msg 92 177 debug 1;
#X connect 0 0 2 0;
#X connect 2 0 6 0;
#X connect 3 0 1 0;
#X connect 4 0 3 0;
#X connect 5 0 4 0;
#X connect 6 2 5 0;
#X connect 6 3 4 1;
#X connect 7 0 4 0;
#X restore 206 105 pd prev;
#X obj 41 549 s doit;
#X obj 359 458 s doit;
#X obj 196 133 r doit;
#X obj 409 133 s doit;
#X obj 104 458 s doit;
#X floatatom 49 382 5 0 0 0 - - -;
#X floatatom 49 407 5 0 0 0 - - -;
#X msg 172 411 mode nth \$1 x \, bang;
#X msg 406 409 mode sub \, bang;
#X obj 29 199 s doit;
#X msg 62 105 1 1 2 2 1 2;
#X msg 45 49 1 a b c test;
#X msg 259 49 1 2;
#X msg 308 49 148 149;
#X msg 487 133 bang;
#N canvas 419 256 450 300 more 0;
#X obj 118 117 zl sub;
#X obj 78 78 t a a;
#X obj 51 185 print upto;
#X obj 170 185 print downfrom;
#X msg 78 42 a list with a pattern to split upon;
#X msg 167 78 a pattern;
#X obj 51 150 zl slice;
#X msg 271 78 a list;
#X msg 351 78 upon;
#X msg 23 42 bang;
#X obj 23 78 t b b;
#X connect 0 0 6 1;
#X connect 1 0 6 0;
#X connect 1 1 0 0;
#X connect 4 0 1 0;
#X connect 5 0 0 1;
#X connect 6 0 2 0;
#X connect 6 1 3 0;
#X connect 7 0 0 1;
#X connect 8 0 0 1;
#X connect 9 0 10 0;
#X connect 10 0 6 0;
#X connect 10 1 0 0;
#X restore 396 251 pd more;
#X connect 0 0 1 0;
#X connect 1 0 37 0;
#X connect 1 1 38 0;
#X connect 2 0 1 1;
#X connect 3 0 50 0;
#X connect 4 0 50 0;
#X connect 5 0 1 1;
#X connect 6 0 1 1;
#X connect 7 0 1 1;
#X connect 8 0 50 0;
#X connect 9 0 41 0;
#X connect 10 0 12 0;
#X connect 11 0 13 0;
#X connect 12 0 1 1;
#X connect 13 0 44 0;
#X connect 14 0 41 0;
#X connect 15 0 1 0;
#X connect 16 0 50 0;
#X connect 17 0 1 1;
#X connect 19 0 18 0;
#X connect 20 0 18 0;
#X connect 21 0 42 0;
#X connect 22 0 13 0;
#X connect 23 0 12 0;
#X connect 24 0 42 0;
#X connect 25 0 42 0;
#X connect 26 0 34 0;
#X connect 27 0 45 0;
#X connect 28 0 27 0;
#X connect 29 0 45 0;
#X connect 30 0 42 0;
#X connect 31 0 45 0;
#X connect 32 0 29 0;
#X connect 33 0 31 0;
#X connect 34 0 45 0;
#X connect 35 0 45 0;
#X connect 36 0 35 0;
#X connect 39 0 45 0;
#X connect 40 0 1 0;
#X connect 43 0 1 0;
#X connect 46 0 39 0;
#X connect 47 0 48 0;
#X connect 48 0 45 0;
#X connect 49 0 42 0;
#X connect 51 0 50 0;
#X connect 52 0 50 0;
#X connect 53 0 1 1;
#X connect 54 0 1 1;
#X connect 55 0 12 0;
