diff options
-rw-r--r-- | prisoners_dilemma.pl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/prisoners_dilemma.pl b/prisoners_dilemma.pl index ac267c2..ffcbfad 100644 --- a/prisoners_dilemma.pl +++ b/prisoners_dilemma.pl @@ -15,7 +15,7 @@ * along with this program. If not, see <http://www.gnu.org/licenses/>. */ -:-initialization(start). + %:-initialization(start). pay(c,d,1). pay(d,d,2). @@ -46,5 +46,5 @@ loop(Module, Hist, PayedA, PayedB) :- do(Choice, Module, Hist, PayedA, PayedB). -start(Module) :- consult(Module), loop(Module, [], [], []), halt. -start :- start(tit4tat). +start(Module) :- consult(Module), loop(Module, [], [], []). +start :- start(tit4tat),halt. |