src/StdReferee/NoReferee.icl

   1 implementation module NoReferee
   2
   3 import StdEnvExt
   4 import Referee
   5
   6 NoReferee :: !FootballField -> Referee
   7 NoReferee field = { name  = "NoReferee"
   8                                                           , brain = { memory = initMem
   9                                                                     , ai     = randomlessRefereeAI (brain field)
  10                                                                     }
  11                                                           , refActionPics    = []
  12                                                           }
  13
  14 ::      Memory = Memory
  15
  16 initMem :: Memory
  17 initMem = Memory
  18
  19 brain :: !FootballField !(!RefereeInput,!Memory) -> (!RefereeOutput,!Memory)
  20 brain field ({RefereeInput | theBall=ballState,team1,team2},memory)
  21         = ([], memory)