1 files changed, 0 insertions, 19 deletions
diff --git a/examples/algebraic-types-concept.lisp b/examples/algebraic-types-concept.lisp
deleted file mode 100644
index 315a693..0000000
--- a/examples/algebraic-types-concept.lisp
+++ /dev/null
@@ -1,19 +0,0 @@
-(let just (\[a]
-    ["maybe" "just" a]))
-(let nothing (\[]
-    ["maybe" "nothing"]))
-
-(let at (\[n seq]
-    (match seq
-        [] (nothing)
-        (match n
-            0 (head seq)
-            (at (- n 1) (tail seq))))))
-
-(let from-just (at 2))
-(let kind (at 1))
-
-(let m (just 10))
-(match (kind m)
-    "just" (from-just m)
-    "nothing" "nothing")