Update Utility.hs