13.hs run length encoding submission