CLIPS 使用规则递增变量

Question

我想在规则运行时增加安全性。现在它什么都没有改变。事实（human_resources n）确实存在。

(defglobal ?安全 = 0)

(取消规则1 （人力资源n） => (defglobal ?security = (+ ?security 1)) )

这导致 ?*security = 1： (defglobal ?安全 = 0) (defglobal ?security = (+ ?security 1))

Answer 1

CLIPS> (defglobal ?*security* = 0)
CLIPS> 
(defrule rule1
   (human_resources n)
   =>
   (bind ?*security* (+ ?*security* 1)))
CLIPS> (reset)
CLIPS> ?*security*
0
CLIPS> (assert (human_resources n))
<Fact-1>
CLIPS> (run)
CLIPS> ?*security*
1
CLIPS>