mirror of
https://github.com/sdiehl/write-you-a-haskell.git
synced 2024-07-07 07:06:34 +03:00
fix names for ski combinators
This commit is contained in:
parent
5c515bd386
commit
033d0ae477
|
@ -6,6 +6,6 @@ data Expr
|
|||
| Lam Name Expr
|
||||
|
||||
s, k, i :: Expr
|
||||
s = Lam "x" (Var "x")
|
||||
i = Lam "x" (Var "x")
|
||||
k = Lam "x" (Lam "y" (Var "x"))
|
||||
i = Lam "x" (Lam "y" (Lam "z" (App (App (Var "x") (Var "z")) (App (Var "y") (Var "z")))))
|
||||
s = Lam "x" (Lam "y" (Lam "z" (App (App (Var "x") (Var "z")) (App (Var "y") (Var "z")))))
|
||||
|
|
Loading…
Reference in New Issue
Block a user