square1 :: Int -> Int
square1 x = x * x



square2 :: Int -> Int
square2 x = x * x

square3 :: Int -> Int

square3 x = x * x


square4 :: Int -> Int
square4 x = x * x


data Tree a = Leaf a | Node [Tree a]


class Foo a where
    bar :: a