src/StdTeam/Team_Student_Keeper_Assignment.icl

   1 implementation module Team_Student_Keeper_Assignment
   2
   3 /**     Implement a solution to the keeper assignment.
   4
   5         Your team consists of a single keeper, with player's number 1.
   6         Below you should only change the definition of footballer to your solution.
   7         Do not change the positions and player identifications.
   8         Do not change the implementation of base_TeamName_Student_Keeper.
   9 */
  10
  11 import  Footballer
  12
  13 Team_Student_Keeper                             :: !Home FootballField -> Team
  14 Team_Student_Keeper home field  = if (home == West) team (mirror field team)
  15 where
  16         team                                            = [{footballer {clubName=club,playerNr=1} & pos = {zero & px = scale -0.485 field.flength}}]
  17         club                                            = base_TeamName_Student_Keeper +++ if (home == West) "_W" "_E"
  18         footballer playerID                     = defaultFootballer playerID            // implement your footballer here
  19
  20 base_TeamName_Student_Keeper    :: String
  21 base_TeamName_Student_Keeper    = "Student Keeper"
  22