Update Hw2.hs