add :: (Int, Int) -> Int
add (a, b) = a + b

main = print $ add (2, 2)