Titfor2tat2.adb

function TitFor2Tat2 return Move is
begin
   if MN = 1 then
      return Cooperate;
   elsif MN = 2 or else OL = OppMoves(MN-2) then
      return OL;
   else
      return Mymoves(Mn-2);
   end if;
end TitFor2Tat2;

Tillbaka till huvudsidan