summaryrefslogtreecommitdiff
path: root/mistrust_tit4tat.pl
blob: 3c150c53c980c735fb78b36c8c146c0cb3496cf7 (plain)
1
2
3
4
5
6
% Syntax: MODULE(UserDecisionHistry [in], ModuleDecision [out])

% Use opponents last decision
mistrust_tit4tat([Last|_],Last,_,_).
% Fallback to defect if history is empty.
mistrust_tit4tat([],d,_,_).