Update Main.hs

Finished monopoly