Update solWeek3.hs