Data commit

Task/Extend-your-language/Min/extend-your-language.min

@@ -0,0 +1,22 @@
+(
+  :none :two :one :both -> :r2 -> :r1
+  (
+    ((r1 r2 and)(both))
+    ((r1)(one))
+    ((r2)(two))
+    ((true)(none))
+  ) case
+) :if2
+
+(3 4 >) (0 0 ==)
+("both are true")
+("the first is true")
+("the second is true")
+("both are false")
+if2 puts!   ;the second is true
+
+;compare to regular if
+(4 even?)
+("true")
+("false")
+if puts!   ;true