Update Region.hs