🚀 Functions

a1/src/APL/AST.hs

@@ -19,7 +19,8 @@ data Exp
   | If Exp Exp Exp
   | Var VName
   | Let VName Exp Exp
-  -- TODO: add cases
+  | Lambda VName Exp
+  | Apply Exp Exp
   deriving (Eq, Show)
 
 printExp :: Exp -> String