In this HASKELL program, we will inspect calendar dates, which we will store as a tuple triple (Int, Int, Int) in the form (MM, DD, YYYY).

1. Write a function older that takes two dates and returns whichever one is older. older :: (Int, Int, Int) -> (Int, Int, Int) -> (Int, Int, Int)
2. Write a function numInMonth that takes a month and a list of dates and returns how many dates in the list match the given month. numInMonth :: Int -> [(Int, Int, Int)] -> Int