-- Umwandeln der Ergebnistupel in einen String durch 1. Umwandeln aller Tupel, 2. Versehen mit Kopfzeile und 3. Konkatenieren der Strings mit „\n“ display :: [(Name,Mark,Rank)] -> String display = unlines . (heading :) . map line -- Prelude-Funktion, Konkatenieren einer Liste von Strings zu einem String über „\n“ unlines :: [String] -> String unlines = foldr join where join xs ys = xs ++ "\n" ++ ys