haskell lens getter