Update weektwo.hs