Update Main.hs

formatting