data Parser c a = Parser ( [c] -> [ (a, [c]) ] )
Beispiel-Parser, Aufrufen mit:
parse :: Parser c a -> [c] -> [(a,[c])] parse (Parser f) w = f w