update
[fp1415-soccerfun.git] / src / Game / Team.icl
index d41af0b..21c0286 100644 (file)
@@ -14,6 +14,7 @@ import Team_Student_Passing_Assignment
 import Team_Student_DeepPass_Assignment
 import Team_Student_Keeper_Assignment
 import Team_MartLubbers
+import Team_Harmless
 
 allAvailableTeams                                      :: [Home FootballField -> Team]
 allAvailableTeams                                      = [ Team_MartLubbers
@@ -27,7 +28,7 @@ allAvailableTeams                                     = [ Team_MartLubbers
                                                                          , Team_Opponent_Passing
                                                                          , Team_Opponent_DeepPass
                                                                          , Team_Opponent_Keeper
-                                                                         ]
+                                                                         ] ++ [MostlyHarmless (11, Level n) \\ n <- [0..10]]
 
 instance nameOf Team where     nameOf players
                                                                        = case players of