LemonCurry_W2L2_Batch3_Q4_Vlad

import Prelude hiding (curry, uncurry)

-- f :: ((a, b) -> c)
-- x :: a
-- y :: b
curry :: ((a, b) -> c) -> (a -> b -> c)
curry f x y = f (x, y)

-- f :: a -> b -> c
-- (x, y) :: (a, b)
uncurry :: (a -> b -> c) -> ((a, b) -> c)
uncurry f (x, y) = f x y