Sequence N Parser

thisMany

Write a function that accepts an integer (n) and a parser and returns a parser that binds 'n' times. We can do this by using the library function replicate.

thisMany :: Int -> Parser a -> Parser [a]
thisMany n p = sequenceParser (replicate n p)