Add description

4 years ago · 445d1de534
parent 03e4155bfc
commit 445d1de534
1 changed files with 1 additions and 0 deletions
--- a/3/lambda/lambda.hs
+++ b/3/lambda/lambda.hs
@ -23,6 +23,7 @@ double = (\x -> x * 2)
 square :: Integer -> Integer
 square = (\x -> x ^ 2)

+counter :: Num a => a -> a
 counter x = (\x -> x + 1)
            ((\x -> x + 1)
             ((\x -> x) x))