Parser.take : ∀(n: Nat) (Parser String) = λn (Parser.repeat n Char Parser.pick)