Please write the answer on Haskell notation.

Make a realization of the function below based on the definitions and specifications given. If you need to create an intermediate function, make a definition, specification and realization.

-- IS THE DATE VALID? isDateValid(d,m,y)

-- DEFINITION AND SPECIFICATION

isDateValid :: Int -> Int -> Int -> Bool

{- isDateValid(d,m,y) returns true if d, m, y form a valid date. A valid definition of date is if the day element (d) is between 1 and 31, depending on the month and whether it is a leap year or not, the month (m) element is between 1 and 12, and the year (y) element is between 0 and 99. The value of y represents the years 1900 to 1999 - }