summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--agent.prolog6
1 files changed, 3 insertions, 3 deletions
diff --git a/agent.prolog b/agent.prolog
index 6e51283..e48049d 100644
--- a/agent.prolog
+++ b/agent.prolog
@@ -32,8 +32,8 @@ initPos :-
initPits :-
- retractall(pitsAt(_)),
- insert(5,pitsAt).
+ retractall(pitAt(_)),
+ insert(5,pitAt).
initWumpus :-
@@ -83,7 +83,7 @@ move(Direction) :-
connects(Location, New, Direction),
retract(here(Location)),
asserta(here(New)),
- join(['You move to the ',Direction,' .\n\n'],W),
+ join(['You move to the ',Direction,'.\n\n'],W),
write(W),
checkHazards,
incrementMoves,