Ошибка CLIPS: недопустимое использование спецификатора модуля при defrule

Я хочу определить некоторые правила модуля для утверждения фактов модуля, а затем пакетно получить список групп фактов по get-fact-list, но произошла ошибка!

         CLIPS (6.31 6/12/19)
CLIPS> (defmodule M)
CLIPS> (deftemplate M::T (slot k1))
CLIPS> (defrule M::T (testvalue 1) => (assert (M::T (k1 "v1"))))

[MODULDEF1] Illegal use of the module specifier.

ERROR:
(defrule M::T
   (testvalue 1)
   =>
   (assert (M::T
CLIPS>

ожидал:

CLIPS> (defmodule M)
CLIPS> (deftemplate M::T (slot k1))
CLIPS> (defrule M::T (testvalue 1) => (assert (M::T (k1 "v1"))))

CLIPS> (assert (testvalue 1))
CLIPS> (get-fact-list M)
;; return the facts that M::rulexx  assert

Почему возникает ошибка синтаксиса? Как я могу сделать это для defrule из module?


rules rule-engine clips expert-system
person Javin Fan    schedule 09.04.2020    source источник

Ответы (1)


arrow_upward
1
arrow_downward

Не используйте M :: T в своей команде assert. Поскольку defrule содержится в модуле M, на все шаблоны defrule, видимые для M, можно ссылаться без использования спецификатора модуля.

         CLIPS (6.31 6/12/19)
CLIPS> (defmodule M)
CLIPS> (deftemplate M::T (slot k1))
CLIPS> (defrule M::T (testvalue 1) => (assert (T (k1 "v1"))))
CLIPS> (assert (testvalue 1))
<Fact-1>
CLIPS> (get-fact-list M)
(<Fact-1>)
CLIPS>
person Gary Riley    schedule 09.04.2020