summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJed Barber <jjbarber@y7mail.com>2014-04-02 19:45:13 +1100
committerJed Barber <jjbarber@y7mail.com>2014-04-02 19:45:13 +1100
commit1b5cff7bece5b1f4efd9e40023ea41b579250192 (patch)
treeb3d7bfde780e76606ea4e1ff2ef055812276d045
parent8dcbe15a59014e32b7e32d5466e23bbfbbe0ccc8 (diff)
Typos corrected with pitAt dynamic clause
-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,