Simplify same room definition

This commit is contained in:
Naveen Sundar Govindarajulu 2017-01-18 23:16:33 -05:00
parent d4c4e71000
commit 14e418b37a

View file

@ -16,7 +16,7 @@
(not (open (door room1)))
(forall [?x ?y ?room] (implies (and (and (in ?x ?room) (in ?y ?room)) (not (= ?x ?y))) (sameroom ?x ?y)))
(forall [?x ?y] (exists ?room (implies (sameroom ?x ?y) (and (in ?x ?room) (in ?y ?room)) )) )
(forall [?x ?y] (implies (sameroom ?x ?y) (exists ?room (and (in ?x ?room) (in ?y ?room)))))
]
:goal []