[Haskell-cafe] Minor issue with mapAccumR