Working through the lens basics [Haskell]