16: What is the relation between an Enzyme and an Enzyme-Catalysis
Shaken formulation:
What is the relation between a Enzyme and a Enzyme-Catalysis ?
Answer
No relations found.
Question in KM
Template
What is the relationship between <instance> and a <class>?
Parameters
| INSTANCE | _Enzyme1309 |
|---|---|
| CLASS | Enzyme-Catalysis |
Code
("p35: What is the relation between <instance> and a <class>?
Returns the path from <instance> to an object of class <class>"
(defun answer-p35-data0 (instance class)
(let ()
`(answer
(question-type p35)
(instance ,instance)
(class ,class)
(relation ,@(find-relation instance class 7))
))))
(defun find-relation (frame target-class depth)
(clrhash *relations*)
(set-relation frame :root)
(search-relation target-class depth)
(let ((found (find-class-relation target-class)))
(cons found (get-chain-relation found))))
(defun search-relation (target-class depth)
(and (> depth 0)
(or (find-class-relation target-class)
(progn (loop for frame being the hash-key in *relations*
do (build-relation-table frame))
(search-relation target-class (1- depth))))))
(defun build-relation-table (frame)
(let ((children ()))
(dolist ;;(sval (all-slot-vals frame))
(slot ;;(okbc:get-frame-slots frame :kb rkf::*base-kb*)
(links-of-interest frame)
)
(when (okbc:slot-p slot :kb rkf::*base-kb*)
(let* (;;(slot (first sval))
(values (okbc:get-slot-values frame slot
:inference-level :all-inferable
:kb rkf::*base-kb*)))
(dolist (val values)
(when (and (not (get-relation val))
(okbc::coercible-to-frame-p val))
(set-relation val (cons slot frame))
(push val children))))))
t))
Raw Answer
((question-type p35) (instance _enzyme1309) (class enzyme-catalysis) (relation nil) (explanations nil))
Terms
SHAKEN - Unpublished Copyright © 1999-2001, SRI Team