{- - WICHTIGER HINWEIS, was den Vergleich zur echten BuLi-Tabelle - angeht: Kaiserslautern wurden wegen Verstosses gegen - Lizenzierungsauflagen drei Punkte abgezogen. Dies muesste - also "von Hand" nachgebaut werden, damit die eigene Tabelle - genau den realen Tabellen entspricht. -} -- | Gibt den vollen Namen fuer die untenstehenden Akronyme; -- | ist dieses ungueltig, wird das Akronym zurueckgegeben fullname :: String -> String fullname s = case lookup s teamNames of Nothing -> s Just t -> t -- | vollst. Mannschaftsnamen; in der DB nur abgekuerzt, um Platz zu sparen teamNames :: [(String, String)] teamNames = [("BAY", "Bayern Muenchen"), ("FRA", "Eintracht Frankfurt"), ("BER", "Hertha BSC"), ("BRE", "Werder Bremen"), ("WOL", "VfL Wolfsburg"), ("BOC", "VfL Bochum"), ("S04", "FC Schalke 04"), ("DOR", "Borussia Dortmund"), ("HAM", "Hamburger SV"), ("HAN", "Hannover 96"), ("LEV", "Bayer Leverkusen"), ("FRE", "SC Freiburg"), ("KAI", "1. FC Kaiserslautern"), ("MUE", "1860 Muenchen"), ("MGL", "Bor. M\'Gladbach"), ("KOE", "1. FC Koeln"), ("ROS", "Hansa Rostock"), ("STU", "VfB Stuttgart")] -- Der geforderte Typ fuer ein Spiel -- (Spieltag, Heimm., Tore, Gastm., Tore) type Game = (Int, String, Int, String, Int) -- Die komplette Bundesligasaison 2003/2004 season2003 :: [Game] season2003 = [(1,"BAY",3,"FRA",1) ,(1,"BER",0,"BRE",3) ,(1,"WOL",3,"BOC",2) ,(1,"S04",2,"DOR",2) ,(1,"HAM",0,"HAN",3) ,(1,"LEV",4,"FRE",1) ,(1,"KAI",0,"MUE",1) ,(1,"MGL",1,"KOE",0) ,(1,"ROS",0,"STU",2) ,(2,"MUE",1,"S04",1) ,(2,"FRE",2,"ROS",2) ,(2,"DOR",4,"WOL",0) ,(2,"HAN",3,"BAY",3) ,(2,"BRE",1,"MGL",1) ,(2,"BOC",1,"HAM",1) ,(2,"KOE",1,"KAI",2) ,(2,"FRA",1,"LEV",2) ,(2,"STU",0,"BER",0) ,(3,"KAI",0,"BRE",1) ,(3,"MGL",0,"STU",1) ,(3,"BER",0,"FRE",0) ,(3,"BAY",2,"BOC",0) ,(3,"ROS",3,"FRA",0) ,(3,"DOR",3,"MUE",1) ,(3,"LEV",4,"HAN",0) ,(3,"WOL",5,"HAM",1) ,(3,"S04",2,"KOE",1) ,(4,"FRA",0,"BER",0) ,(4,"FRE",4,"MGL",1) ,(4,"STU",2,"KAI",0) ,(4,"MUE",1,"WOL",0) ,(4,"BRE",4,"S04",1) ,(4,"BOC",1,"LEV",0) ,(4,"KOE",1,"DOR",0) ,(4,"HAM",0,"BAY",2) ,(4,"HAN",3,"ROS",3) ,(5,"MUE",2,"KOE",1) ,(5,"DOR",2,"BRE",1) ,(5,"BER",2,"HAN",3) ,(5,"WOL",3,"BAY",2) ,(5,"ROS",0,"BOC",2) ,(5,"S04",0,"STU",0) ,(5,"LEV",1,"HAM",0) ,(5,"KAI",2,"FRE",2) ,(5,"MGL",0,"FRA",2) ,(6,"BAY",3,"LEV",3) ,(6,"FRE",2,"S04",1) ,(6,"STU",1,"DOR",0) ,(6,"HAN",2,"MGL",0) ,(6,"BRE",2,"MUE",1) ,(6,"BOC",2,"BER",2) ,(6,"KOE",2,"WOL",3) ,(6,"FRA",1,"KAI",3) ,(6,"HAM",2,"ROS",1) ,(7,"KAI",1,"HAN",0) ,(7,"MGL",2,"BOC",2) ,(7,"MUE",0,"STU",3) ,(7,"WOL",0,"LEV",1) ,(7,"ROS",1,"BAY",2) ,(7,"DOR",1,"FRE",0) ,(7,"KOE",1,"BRE",4) ,(7,"BER",1,"HAM",1) ,(7,"S04",1,"FRA",1) ,(8,"FRA",0,"DOR",1) ,(8,"FRE",1,"MUE",0) ,(8,"HAN",1,"S04",2) ,(8,"STU",0,"KOE",0) ,(8,"HAM",2,"MGL",1) ,(8,"BOC",4,"KAI",0) ,(8,"BAY",4,"BER",1) ,(8,"BRE",5,"WOL",3) ,(8,"LEV",3,"ROS",0) ,(9,"MUE",1,"FRA",0) ,(9,"MGL",0,"BAY",0) ,(9,"BER",1,"LEV",4) ,(9,"WOL",3,"ROS",1) ,(9,"BRE",1,"STU",3) ,(9,"DOR",6,"HAN",2) ,(9,"KOE",1,"FRE",0) ,(9,"KAI",4,"HAM",0) ,(9,"S04",0,"BOC",2) ,(10,"FRA",2,"KOE",0) ,(10,"FRE",2,"BRE",4) ,(10,"STU",1,"WOL",0) ,(10,"HAN",1,"MUE",1) ,(10,"ROS",0,"BER",1) ,(10,"HAM",2,"S04",2) ,(10,"BAY",4,"KAI",1) ,(10,"LEV",1,"MGL",0) ,(10,"BOC",3,"DOR",0) ,(11,"MUE",3,"BOC",1) ,(11,"MGL",1,"ROS",1) ,(11,"STU",4,"FRE",1) ,(11,"WOL",3,"BER",0) ,(11,"BRE",3,"FRA",1) ,(11,"S04",2,"BAY",0) ,(11,"KOE",1,"HAN",2) ,(11,"KAI",0,"LEV",0) ,(11,"DOR",3,"HAM",2) ,(12,"BOC",4,"KOE",0) ,(12,"FRA",0,"STU",2) ,(12,"FRE",3,"WOL",2) ,(12,"HAN",1,"BRE",5) ,(12,"BER",2,"MGL",1) ,(12,"HAM",3,"MUE",1) ,(12,"ROS",4,"KAI",0) ,(12,"BAY",4,"DOR",1) ,(12,"LEV",3,"S04",1) ,(13,"DOR",2,"LEV",2) ,(13,"S04",0,"ROS",1) ,(13,"MUE",0,"BAY",1) ,(13,"WOL",1,"MGL",3) ,(13,"BRE",3,"BOC",1) ,(13,"KOE",0,"HAM",1) ,(13,"STU",3,"HAN",1) ,(13,"KAI",4,"BER",2) ,(13,"FRE",1,"FRA",0) ,(14,"FRA",3,"WOL",2) ,(14,"MGL",2,"KAI",1) ,(14,"HAN",3,"FRE",0) ,(14,"BOC",0,"STU",0) ,(14,"HAM",1,"BRE",1) ,(14,"LEV",2,"MUE",2) ,(14,"BAY",2,"KOE",2) ,(14,"BER",1,"S04",3) ,(14,"ROS",2,"DOR",1) ,(15,"FRA",2,"HAN",2) ,(15,"FRE",4,"BOC",2) ,(15,"STU",0,"HAM",0) ,(15,"WOL",4,"KAI",1) ,(15,"BRE",1,"BAY",1) ,(15,"DOR",1,"BER",1) ,(15,"MUE",1,"ROS",4) ,(15,"KOE",0,"LEV",0) ,(15,"S04",2,"MGL",1) ,(16,"KAI",0,"S04",2) ,(16,"BAY",1,"STU",0) ,(16,"BER",1,"MUE",1) ,(16,"HAM",4,"FRE",1) ,(16,"ROS",1,"KOE",1) ,(16,"BOC",1,"FRA",0) ,(16,"LEV",1,"BRE",3) ,(16,"MGL",2,"DOR",1) ,(16,"WOL",2,"HAN",1) ,(17,"FRA",2,"HAM",3) ,(17,"FRE",0,"BAY",6) ,(17,"BRE",3,"ROS",0) ,(17,"KOE",3,"BER",0) ,(17,"HAN",2,"BOC",2) ,(17,"STU",2,"LEV",3) ,(17,"MUE",1,"MGL",2) ,(17,"S04",1,"WOL",1) ,(17,"DOR",1,"KAI",1) ,(18,"DOR",0,"S04",1) ,(18,"KOE",1,"MGL",0) ,(18,"BRE",4,"BER",0) ,(18,"BOC",1,"WOL",0) ,(18,"STU",2,"ROS",0) ,(18,"MUE",2,"KAI",1) ,(18,"FRA",1,"BAY",1) ,(18,"HAN",3,"HAM",2) ,(18,"FRE",1,"LEV",0) ,(19,"LEV",1,"FRA",2) ,(19,"ROS",4,"FRE",1) ,(19,"S04",0,"MUE",0) ,(19,"WOL",2,"DOR",4) ,(19,"MGL",1,"BRE",2) ,(19,"HAM",1,"BOC",1) ,(19,"KAI",1,"KOE",0) ,(19,"BER",1,"STU",0) ,(19,"BAY",3,"HAN",1) ,(20,"BOC",1,"BAY",0) ,(20,"STU",1,"MGL",1) ,(20,"FRE",2,"BER",3) ,(20,"HAM",2,"WOL",0) ,(20,"FRA",1,"ROS",1) ,(20,"KOE",0,"S04",2) ,(20,"HAN",2,"LEV",2) ,(20,"BRE",1,"KAI",0) ,(20,"MUE",0,"DOR",2) ,(21,"WOL",3,"MUE",1) ,(21,"MGL",2,"FRE",2) ,(21,"KAI",1,"STU",0) ,(21,"ROS",3,"HAN",1) ,(21,"S04",0,"BRE",0) ,(21,"LEV",1,"BOC",3) ,(21,"BAY",1,"HAM",0) ,(21,"BER",1,"FRA",2) ,(21,"DOR",1,"KOE",0) ,(22,"KOE",1,"MUE",3) ,(22,"FRA",3,"MGL",1) ,(22,"BRE",2,"DOR",0) ,(22,"BAY",2,"WOL",0) ,(22,"BOC",0,"ROS",0) ,(22,"STU",0,"S04",0) ,(22,"HAM",3,"LEV",1) ,(22,"FRE",1,"KAI",0) ,(22,"HAN",1,"BER",3) ,(23,"KAI",1,"FRA",0) ,(23,"S04",3,"FRE",0) ,(23,"MGL",1,"HAN",0) ,(23,"DOR",0,"STU",2) ,(23,"ROS",3,"HAM",0) ,(23,"BER",1,"BOC",1) ,(23,"LEV",1,"BAY",3) ,(23,"MUE",0,"BRE",2) ,(23,"WOL",2,"KOE",0) ,(24,"HAN",0,"KAI",1) ,(24,"FRE",2,"DOR",2) ,(24,"HAM",2,"BER",0) ,(24,"LEV",4,"WOL",2) ,(24,"BAY",3,"ROS",3) ,(24,"FRA",3,"S04",0) ,(24,"BRE",3,"KOE",2) ,(24,"BOC",1,"MGL",0) ,(24,"STU",2,"MUE",0) ,(25,"DOR",2,"FRA",0) ,(25,"KOE",2,"STU",2) ,(25,"S04",2,"HAN",2) ,(25,"KAI",2,"BOC",2) ,(25,"MGL",3,"HAM",0) ,(25,"ROS",0,"LEV",2) ,(25,"BER",1,"BAY",1) ,(25,"MUE",1,"FRE",1) ,(25,"WOL",0,"BRE",2) ,(26,"LEV",4,"BER",1) ,(26,"BAY",5,"MGL",2) ,(26,"ROS",3,"WOL",1) ,(26,"BOC",1,"S04",2) ,(26,"HAN",1,"DOR",1) ,(26,"FRE",3,"KOE",0) ,(26,"FRA",0,"MUE",3) ,(26,"HAM",3,"KAI",2) ,(26,"STU",4,"BRE",4) ,(27,"KOE",2,"FRA",0) ,(27,"KAI",0,"BAY",2) ,(27,"WOL",1,"STU",5) ,(27,"MUE",0,"HAN",2) ,(27,"BER",1,"ROS",1) ,(27,"S04",4,"HAM",1) ,(27,"MGL",0,"LEV",0) ,(27,"BRE",1,"FRE",1) ,(27,"DOR",4,"BOC",1) ,(28,"LEV",6,"KAI",0) ,(28,"ROS",1,"MGL",2) ,(28,"BOC",4,"MUE",0) ,(28,"BER",1,"WOL",0) ,(28,"FRA",0,"BRE",1) ,(28,"BAY",2,"S04",1) ,(28,"HAM",0,"DOR",2) ,(28,"FRE",0,"STU",1) ,(28,"HAN",1,"KOE",0) ,(29,"S04",2,"LEV",3) ,(29,"STU",3,"FRA",1) ,(29,"WOL",4,"FRE",0) ,(29,"DOR",2,"BAY",0) ,(29,"MGL",1,"BER",1) ,(29,"MUE",1,"HAM",2) ,(29,"KAI",3,"ROS",2) ,(29,"KOE",1,"BOC",2) ,(29,"BRE",0,"HAN",0) ,(30,"LEV",3,"DOR",0) ,(30,"ROS",3,"S04",1) ,(30,"MGL",0,"WOL",2) ,(30,"HAN",0,"STU",1) ,(30,"BER",3,"KAI",0) ,(30,"HAM",4,"KOE",2) ,(30,"FRA",3,"FRE",0) ,(30,"BAY",1,"MUE",0) ,(30,"BOC",0,"BRE",0) ,(31,"WOL",1,"FRA",0) ,(31,"KAI",2,"MGL",2) ,(31,"KOE",1,"BAY",2) ,(31,"FRE",4,"HAN",1) ,(31,"DOR",4,"ROS",1) ,(31,"BRE",6,"HAM",0) ,(31,"MUE",1,"LEV",1) ,(31,"S04",3,"BER",0) ,(31,"STU",1,"BOC",1) ,(32,"HAN",3,"FRA",0) ,(32,"BER",6,"DOR",2) ,(32,"HAM",2,"STU",1) ,(32,"KAI",3,"WOL",2) ,(32,"BAY",1,"BRE",3) ,(32,"MGL",2,"S04",0) ,(32,"LEV",2,"KOE",0) ,(32,"BOC",3,"FRE",0) ,(32,"ROS",3,"MUE",0) ,(33,"S04",4,"KAI",1) ,(33,"DOR",3,"MGL",1) ,(33,"MUE",1,"BER",1) ,(33,"HAN",0,"WOL",0) ,(33,"KOE",4,"ROS",0) ,(33,"FRA",3,"BOC",2) ,(33,"BRE",2,"LEV",6) ,(33,"STU",3,"BAY",1) ,(33,"FRE",0,"HAM",0) ,(34,"HAM",2,"FRA",1) ,(34,"BAY",2,"FRE",0) ,(34,"LEV",2,"STU",0) ,(34,"BOC",3,"HAN",1) ,(34,"ROS",3,"BRE",1) ,(34,"WOL",1,"S04",1) ,(34,"BER",3,"KOE",1) ,(34,"MGL",3,"MUE",1) ,(34,"KAI",1,"DOR",1) ]