diff --git a/Code.hs b/Code.hs
index d53bcab..56c1dc8 100644
--- a/Code.hs
+++ b/Code.hs
@@ -39,3 +39,15 @@ calcSomething :: Int -> MaybeInt
 calcSomething x
   | x < 100   = NoError (x * 5)
   | otherwise = Error "Int out of range!"
+
+
+f' :: Int -> Int
+f' x = let y p = x + p
+       in x + (y 2)
+
+addTwo :: [Int] -> [Int]
+addTwo [] = []
+addTwo (x:xs) = (x + 2) : addTwo xs
+
+f'' :: String -> Bool
+f'' xs = even . length . (\x -> x ++ "Hello world") $ xs