Automatic Lens with template haskell