Fix Week2.hs