module LocalMono where

fff xs = (ys,ys)
  where ys = xs ++ xs