get-superconcepts [Function]


Purpose

The get-superconcepts function finds all superconcepts, or only the direct superconcepts, of a given concept.

Syntax

get-superconcepts concept &key direct-p

Arguments

The concept argument is the concept, or the name of the concept, whose superconcepts are to be found.

If the direct-p argument is t, only the most specific superconcepts are returned. Otherwise, all superconcepts, including concept itself, are returned.

Value

This function returns a list of concepts.

Examples

(defconcept Animal)
(defconcept Person :is-primitive Animal) 
(defconcept Man :is-primitive Person) 
(get-superconcepts 'Man) ==> (|C|MAN |C|PERSON |C|ANIMAL |C|THING) 
(get-superconcepts (fc Man) :direct-p t) ==> (|C|PERSON)

See Also

Last modified: Jun 1 1995