CLIPS 使用规则递增变量

Question

我想在规则运行时提高安全性。现在它什么也改变不了。 ( human_resources n )这一事实确实存在。

(defglobal ?安全性 = 0)

(defrule 规则1 （人力资源 n） => (defglobal ?安全 = (+ ?安全 1)) )

这导致 ?*security = 1: （defglobal？安全性 = 0） (defglobal ?安全 = (+ ?安全 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>