This command is not yet implemented.
Creates a new rule that fires when a specified relation (also called a slot or property) is queried or modified.
- The relation that the rule(s) are associated with.
- The backward or forward chaining rules to be associated with the relation.
(:ADD-RELATION-RULE engine ((engine ?truck ?engine)
(size ?engine ?engine-size)
(:test (:LISP (> ?engine-size 400)))
(wheel ?truck wheel)
(size wheel "P195/65R15")))
Succeeds if the rule is successfully created.
Fails if the rule can not be created.
The relation associated with the rule must already exist when this command is executed.
Algernon Documentation Central
Algernon home page