1 files changed, 23 insertions, 0 deletions
diff --git a/1415/files/practicum/Origami.icl b/1415/files/practicum/Origami.icl
new file mode 100644
index 0000000..3c4dcc4
--- /dev/null
+++ b/1415/files/practicum/Origami.icl
@@ -0,0 +1,23 @@
+module Origami
+
+import StdEnv
+
+Start			= and
+				  [ sum`       [1 .. 5]                 == sum       [1 .. 5]
+				  , prod`      [1 .. 5]                 == prod      [1 .. 5]
+				  , flatten`   [[],[1],[1,2],[1,2,3]]   == flatten   [[],[1],[1,2],[1,2,3]]
+				  , length`    [1 .. 5]                 == length    [1 .. 5]
+				  , reverse`   [1 .. 5]                 == reverse   [1 .. 5]
+				  , filter`    isEven [1 .. 100]        == filter    isEven [1 .. 100]
+				  , takeWhile` ((<>) 0) [1,2,3,0,4,5,6] == takeWhile ((<>) 0) [1,2,3,0,4,5,6]
+				  , maxList`   [1 .. 5]                 == maxList   [1 .. 5]
+				  ]
+
+sum`         xs = ...
+prod`        xs = ...
+flatten`     xs = ...
+length`      xs = ...
+reverse`     xs = ...
+filter`    p xs = ...
+takeWhile` p xs = ...
+maxList`     xs = ...