CLIPS-事实地址

CLIPS规则引擎示例

最新推荐文章于 2012-08-14 19:55:50 发布

原创最新推荐文章于 2012-08-14 19:55:50 发布 · 730 阅读

0 ·

CC 4.0 BY-SA版权

搜索引擎与人工智能专栏收录该内容

217 篇文章

订阅专栏

本文通过CLIPS规则引擎实现了一个简单的人员信息变更案例。具体操作包括定义模板、事实和规则，来完成将指定人员的城市信息从一个地点更改为另一个地点的过程。通过断言和运行规则，最终实现了人员信息的有效更新。

一、

１、?f1<-和?f2<-等表示事实地址，用?事实名<-表示。

2、操作表示把指定某人的城市更换为某地。

二、操作

       CLIPS (Quicksilver Beta 09/24/07)
CLIPS> (clear)
CLIPS> (deftemplate person
(slot name)
(slot city))
CLIPS> (deftemplate moved-personinfo-process
(slot name)
(slot city))
CLIPS> (defrule change-personinfo
?f1 <- (moved-personinfo-process (name ?name)(city?city))
?f2 <- (person (name ?name))
=>
(retract ?f1)
(modify ?f2 (city ?city)))
CLIPS> (reset)
CLIPS> (watch rules)
CLIPS> (watch facts)
CLIPS> (deffacts people
(person (name liuxiang)(city changsha))
(person (name huajun)(city shanghai))
)
CLIPS> (reset)
<==f-0    (initial-fact)
==>f-0    (initial-fact)
==>f-1    (person (name liuxiang) (city changsha))
==>f-2    (person (name huajun) (city shanghai))
CLIPS> (assert (moved-personinfo-process (nameliuxiang)(city zhanjiang)))
==>f-3    (moved-personinfo-process (name liuxiang) (city zhanjiang))
<Fact-3>
CLIPS> (run)
FIRE    1change-personinfo: f-3,f-1
<==f-3    (moved-personinfo-process (name liuxiang) (city zhanjiang))
<==f-1    (person (name liuxiang) (city changsha))
==>f-4    (person (name liuxiang) (city zhanjiang))
CLIPS> (facts)
f-0    (initial-fact)
f-2    (person (name huajun) (city shanghai))
f-4    (person (name liuxiang) (city zhanjiang))
For a total of 3 facts.
CLIPS>