1 files changed, 45 insertions, 0 deletions
diff --git a/pal/pappend.pd b/pal/pappend.pd
new file mode 100755
index 0000000..c9c5267
--- /dev/null
+++ b/pal/pappend.pd
@@ -0,0 +1,45 @@
+#N canvas 356 230 545 374 12;
+#X obj 88 164 + 1;
+#X obj 374 248 pointer;
+#X obj 20 67 v \$1-id;
+#X obj 20 17 inlet;
+#X obj 57 301 outlet;
+#X obj 20 331 outlet;
+#X obj 174 171 f \$3;
+#X obj 214 171 f \$4;
+#X obj 127 201 + \$5;
+#X obj 167 201 + \$6;
+#X obj 20 163 t a a;
+#X obj 174 140 loadbang;
+#X obj 20 42 t b b b;
+#X obj 103 39 s \$1-spawn;
+#X obj 86 97 s global-id-turnstile;
+#X obj 57 273 append \$2 id x y x0 y0 xsize ysize int-c;
+#X obj 57 243 pack f 0 0 f f f f 900;
+#X obj 186 302 list prepend pappend;
+#X obj 186 327 s \$2-pappend;
+#X obj 374 62 ptraverse \$1 bang;
+#X connect 0 0 2 0;
+#X connect 1 0 15 8;
+#X connect 2 0 10 0;
+#X connect 2 0 14 0;
+#X connect 3 0 12 0;
+#X connect 6 0 8 0;
+#X connect 6 0 16 5;
+#X connect 7 0 9 0;
+#X connect 7 0 16 6;
+#X connect 8 0 16 3;
+#X connect 9 0 16 4;
+#X connect 10 0 5 0;
+#X connect 10 1 0 0;
+#X connect 10 1 16 0;
+#X connect 11 0 6 0;
+#X connect 11 0 7 0;
+#X connect 12 0 2 0;
+#X connect 12 1 19 0;
+#X connect 12 2 13 0;
+#X connect 15 0 4 0;
+#X connect 15 0 17 0;
+#X connect 16 0 15 0;
+#X connect 17 0 18 0;
+#X connect 19 0 1 0;