{-| Match a letter

>>> match letter "A"
"A"
>>> match letter "a"
"a"
>>> match letter "1"
""
-}
letter :: Pattern Char
letter = satisfy isLetter
letter :: Pattern Char
letter = satisfy isLetter
letter = satisfy isLetter