axelrod :: [Player Dilemma] -> IO ()
axelrod ps = roundRobin pd 2 ps (times 200) >>= printResults
axelrod :: [Player Dilemma] -> IO ()
axelrod ps = roundRobin pd 2 ps (times 200) >>= printResults
axelrod ps = roundRobin pd 2 ps (times 200) >>= printResults