CLIPS-多模式规则、调入和保存结构、注释
来源:互联网 发布:阿里云学生认证包过 编辑:程序博客网 时间:2024/06/09 20:27
一、
1、设火灾有A类和B类,A类用水喷water sprinkler,B类用汽喷carbon dioxideextinguisher,STATUS表示相应的喷洒装置是否开启。
2、调入和保存结构使用save和load命令
3、注释使用;标注
二、操作
CLIPS (Quicksilver Beta 09/24/07)
CLIPS> (deftemplate emergency (slot type ))
CLIPS> (deftemplate extiguisher-system
(slot type)
(slot status))
CLIPS> (defrule B-emergency
(emergency (type B-FIRE))
(extiguisher-system
(type carbon-dioxide)
(status off))
=>
(printout t "Activate carbon dioxide extinguisher" crlf))
CLIPS> (defrule A-emergency
(emergency (type A-FIRE))
(extiguisher-system
(type water-sprinkler)
(status off))
=>
(printout t "Activate water sprinkler" crlf))
CLIPS> (list-defrules)
B-emergency
A-emergency
For a total of 2 defrules.
CLIPS> (assert (extiguisher-system (typecarbon-dioxide)(status off)))
CLIPS> (agenda)
CLIPS> (assert (emergency (type A-FIRE)))
CLIPS> (agenda)
CLIPS> (facts)
f-0 (initial-fact)
f-1 (extiguisher-system (type carbon-dioxide) (status off))
f-2 (emergency (type A-FIRE))
For a total of 3 facts.
CLIPS> (assert (emergency (type B-FIRE)))
CLIPS> (facts)
f-0 (initial-fact)
f-1 (extiguisher-system (type carbon-dioxide) (status off))
f-2 (emergency (type A-FIRE))
f-3 (emergency (type B-FIRE))
For a total of 4 facts.
CLIPS> (agenda)
0 B-emergency: f-3,f-1
For a total of 1 activation.
CLIPS> (run)
Activate carbon dioxide extinguisher
CLIPS> (save"d:/aa.clp")
TRUE
CLIPS> (clear)
CLIPS> (list-defrules)
CLIPS> (load "d:/aa.clp")
Defining deftemplate: emergency
Defining deftemplate: extiguisher-system
Defining defrule: B-emergency +j+j+j
Defining defrule: A-emergency +j+j+j
TRUE
CLIPS> (list-defrules)
B-emergency
A-emergency
For a total of 2 defrules.
- CLIPS-多模式规则、调入和保存结构、注释
- CLIPS-规则、议程、结构处理、监视
- CLIPS-规则优先级
- CLIPS-自定义事实结构
- CLIPS-规则操作块移动实例
- Go语言学习笔记 --- 关键字、注释、结构、包相关和可见性规则
- CSS 结构和规则
- CSS 结构和规则
- CSS 结构和规则
- CSS 结构和规则
- CSS结构和规则
- CLIPS-修改和复制事实
- 注释规则
- Makefile的后缀规则和模式规则
- 【转】Symbian 关于 当前程序调入后台和调到前台
- oracle 读取表结构和注释
- 查询Oracle表结构和注释信息
- MySQL 查询表结构和列注释
- CLIPS-多字段变量
- 《一个月挑战C++》改错(连载)
- CLIPS-断点
- SQL Server 索引结构及其使用(三)
- 类的定义
- CLIPS-多模式规则、调入和保存结构、注释
- SQL Server 索引结构及其使用(四)
- Windows 下 Fluent & Gambit 进程及窗口的控制方法
- CLIPS-规则、议程、结构处理、监视
- jQuery学习之:Datepicker日期选择插件
- CLIPS-自定义事实结构
- CLIPS-监视
- CLIPS-修改和复制事实
- 专家系统-CLIPS-事实的增加与删除