Update IntMapOrd.hs