Quoting of reserved words in Lenses generation

[Deenar Toraskar]

Lenses generation does not seem to use the reserved words list.

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

[Deenar Toraskar]

fixed by #539