blob: 3ebfce9415303ab4ed82d5d1383d81a7b6846375 (
plain)
1
2
3
4
5
6
7
8
9
|
% Mistrust Tit for Tat:
% In the first round it defects, than it plays opponent’s move.
% Syntax: mistrust_tit4tat(+history, -choice, +state_in, -state_out)
% Use opponents last decision
mistrust_tit4tat([Last|_],Last,_,_).
% Fallback to defect if history is empty.
mistrust_tit4tat([],d,_,_).
|