This shows you the differences between two versions of the page.
Both sides previous revision Previous revision Next revision | Previous revision Next revision Both sides next revision | ||
courses:knowledge_representation_and_artificial_intelligence_systems:lab4 [2019/07/24 12:19] andrey.suchkov [Общие сведения] |
courses:knowledge_representation_and_artificial_intelligence_systems:lab4 [2020/08/27 09:51] 127.0.0.1 external edit |
||
---|---|---|---|
Line 17: | Line 17: | ||
(slot peasant-location (type SYMBOL) (allowed-symbols shore-1 shore-2)) | (slot peasant-location (type SYMBOL) (allowed-symbols shore-1 shore-2)) | ||
(slot wolf-location (type SYMBOL) (allowed-symbols shore-1 shore-2)) | (slot wolf-location (type SYMBOL) (allowed-symbols shore-1 shore-2)) | ||
- | (slot goat-locatio (type SYMBOL) (allowed-symbols shore-1 shore-2)) | + | (slot goat-location (type SYMBOL) (allowed-symbols shore-1 shore-2)) |
(slot cabbage-location (type SYMBOL) (allowed-symbols shore-1 shore-2)) | (slot cabbage-location (type SYMBOL) (allowed-symbols shore-1 shore-2)) | ||
(slot parent (type FACT-ADDRESS SYMBOL) (allowed-symbols no-parent)) | (slot parent (type FACT-ADDRESS SYMBOL) (allowed-symbols no-parent)) | ||
Line 148: | Line 148: | ||
else (printout t "Peasant moves with " ?thing " to " ?shore "." t)) | else (printout t "Peasant moves with " ?thing " to " ?shore "." t)) | ||
(if (eq ?shore shore-1) ; Если ?shore = shore-1 | (if (eq ?shore shore-1) ; Если ?shore = shore-1 | ||
- | then (bind ?shore shore-2) ;?shore = shore-2 | + | then (bind ?shore shore-2) ; ?shore = shore-2 |
- | else (bind ?shore shore-1)) ;?shore = shore-1 | + | else (bind ?shore shore-1)) ; ?shore = shore-1 |
(bind ?i (+ 1 ?i)))) ; ?i = ?i + 1 | (bind ?i (+ 1 ?i)))) ; ?i = ?i + 1 | ||
</code> | </code> |