Update TH.hs

change `-- | @ declareFields = 'declareFieldsWith' 'defaultFieldRules' @` to `-- | @ declareFields = 'declareLensesWith' 'defaultFieldRules' @`