Update rle.hs