kodjo
dd3d8f4abe
Fixed #60 : Hash error when ReturnValue is a list of list Fixed #59 : Implement smart_get() Fixed #58 : SheerkaPromptCompleter: Cannot parse concept token Fixed #57 : SheerkaPrompt: Add concept autocompletion Fixed #56 : automatically backup command Fixed #54 : I can record execution status Fixed #53 : ConceptManager: modify_concept fails
35 lines
779 B
Plaintext
35 lines
779 B
Plaintext
# define adjectives
|
|
push_ontology("english")
|
|
|
|
def concept adjective
|
|
def concept color
|
|
set_isa(color, adjective)
|
|
|
|
def concept red
|
|
def concept blue
|
|
def concept orange
|
|
def concept yellow
|
|
def concept green
|
|
def concept indigo
|
|
def concept violet
|
|
def concept cyan
|
|
def concept magenta
|
|
def concept black
|
|
def concept white
|
|
def concept grey
|
|
|
|
set_isa(red, color)
|
|
set_isa(blue, color)
|
|
set_isa(orange, color)
|
|
set_isa(yellow, color)
|
|
set_isa(green, color)
|
|
set_isa(indigo, color)
|
|
set_isa(violet, color)
|
|
set_isa(cyan, color)
|
|
set_isa(magenta, color)
|
|
set_isa(black, color)
|
|
set_isa(white, color)
|
|
set_isa(grey, color)
|
|
|
|
def concept qualify x from bnf adjective x as set_attr(x, c:adjective:, adjective) ret x
|
|
def concept qualify x from bnf x 'is' adjective as set_attr(x, c:adjective:, adjective) ret x |