Update exercise3.hs