module Date where

data Weekday = Mon | Tue | Wed | Thu | Fri | Sat | Sun

data Month = Jan | Feb | Mar | Apr
           | May | Jun | Jul | Aug
           | Sep | Oct | Nov | Dec