Lenses reserved word fix

[deenar]

Fixed the lenses generation code to check for reserved words. The lenses generation code lowercased the Class names to generate function parameters and this wasn't being checked for reserved words.

  def Id: monocle.Lens[Case, String] = monocle.Lens[Case, String](_.Id)((_Id: String) => (`case`: Case) => `case`.copy(Id = _Id))

[eed3si9n]

Thanks!