Wrote monday.hs for random Haskell example