Data commit

Task/Pascals-triangle/Quackery/pascals-triangle.quackery

@@ -0,0 +1,22 @@
+  [ over size -
+    space swap of
+    swap join ]           is justify  ( $ n -->   )
+
+  [ witheach
+      [ number$
+        5 justify echo$ ]
+    cr ]                  is echoline (   [ -->   )
+
+  [ [] 0 rot 0 join
+    witheach
+     [ tuck +
+       rot join swap ]
+    drop ]                is nextline (   [ --> [ )
+
+  [ ' [ 1 ] swap
+    1 - times
+      [ dup echoline
+        nextline ]
+    echoline ]            is pascal   (   n -->   )
+
+  16 pascal