VPF::база знаний экспертной системы

16alex

Дата 21.5.2007, 20:41 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 3
Регистрация: 7.5.2007

Репутация: нет
Всего: нет

Код


:-op(100,xfx,['-рекомендовано','имеет','имеет симптом','имеет признак']).
:-dynamic 'имеет симптом'/2 'имеет признак'/2
clause_cf(X'-рекомендовано''лечь в постель и принять аспирин',(X'имеет''простуда',not(X'имеет''уязвимый возраст')),0.9).
X'-рекомендовано''вызвать врача':-X'имеет''простуда',X'имеет''уязвимый возраст'.
X'-рекомендовано''вызвать врача':-X'имеет''острый фарингит'.
clause_cf(X'-рекомендовано''лечь в постель и принять аспирин',X'имеет''грипп',0.7).
clause_cf(X'имеет простуда',(X'имеет симптом''мышечные боли',X'имеет''лихорадка'),0.8).
X'имеет''уязвимый возраст':-X'имеет признак''моложе 8 лет'.
X'имеет''уязвимый возраст':-X'имеет признак''старше 60 лет'.
clause_cf(X'имеет''острый фарингит',(X'имеет симптом''лихорадка',X'имеет симптом''нарывы в горле'),0.8).
askable(_'имеет симптом'_).
askable(_'имеет признак'_).
hy(X,Y):-member(Y,['лечь в постель и принять аспирин','вызвать врача']),X'-рекомендовано'Y.
system(member(_,_)).

В методичке по прологу этот код представлен как база знаний для экспертной системы,
при запуске этого файла выдаются следующие ошибки:
ERROR: c:/laba3/base.pl:2:0: Syntax error: Operator expected
ERROR: c:/laba3/base.pl:4:0: Syntax error: Operator expected
ERROR: c:/laba3/base.pl:5:0: Syntax error: Operator expected
ERROR: c:/laba3/base.pl:6:0: Syntax error: Operator expected
ERROR: c:/laba3/base.pl:7:0: Syntax error: Operator expected
ERROR: c:/laba3/base.pl:8:0: Syntax error: Operator expected
ERROR: c:/laba3/base.pl:9:0: Syntax error: Operator expected
ERROR: c:/laba3/base.pl:10:0: Syntax error: Operator expected
,что делать как их исправить.
Не судите строго так я почти не шарю в прологе, а сделать лабу надо
У меня стоит SWI-Prolog (Multi-threaded, Version 5.6.28), в методичке версия пролога не указана.

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Prolog \| Следующая тема »