###
### note: the production names here need to be changed to
### be more descriptive of their funtion!
###

### map nominative/agentive 1s
sp {map-sem-to-lex*apply*operator*recall-expression-in-context*1s-nominative
  (state <g> ^activity *none* ^prev-word *none* ^operator <o>
        ^problem-space <p> ^object <o*1>)
  (<o> ^name recall-expression-in-context)
  (<p> ^name map-sem-to-lex)
  (<o*1> ^name agent-of ^to <ag>)
  (<ag> ^properties <prop-a>)
  (<prop-a> ^value i ^name isa)
-->
  (<g> ^candidate-lexical-item ja + ^candidate-lexical-item ja &)}


### map finite "have" for 1s
sp {map-sem-to-lex*apply*operator*recall-expression-in-context*have
#  source: /usr0/lonz/nlg9602jav/map-semantics.soar
  (state <g> ^activity *none* ^prev-word *none* ^operator <o>
        ^problem-space <p> ^object <o*1>)
  (<o> ^name recall-expression-in-context)
  (<p> ^name map-sem-to-lex)
  ;## verb is have
  (<o*1> ^properties <props> ^relations <ag>)
  (<props> ^name isa ^value have)
  ;## temporary agreement check: agent must be "i"
  (<ag> ^from <o*1> ^name agent-of ^to <the-ag>)
  (<the-ag> ^properties <props-a>)
  (<props-a> ^value i ^name isa)
-->
  (<g> ^candidate-lexical-item have + ^candidate-lexical-item have &)}

### map generic semantic role to lexical item "cyclotron" for now
sp {map-sem-to-lex*apply*operator*recall-expression-in-context*thing
#  source: /usr0/lonz/nlg9602jav/map-semantics.soar
  (state <g> ^activity *none* ^prev-word *none* ^operator <o>
        ^problem-space <p> ^object <o*1>)
  (<o> ^name recall-expression-in-context)
  (<p> ^name map-sem-to-lex)
  (<o*1> ^to <pat>)
  (<pat> ^properties <props>)
  (<props> ^name isa ^value thing)
-->
  (<g> ^candidate-lexical-item cyclotron + ^candidate-lexical-item cyclotron &)}


### map nominative/accusative of "contact"
sp {map-sem-to-lex*apply*operator*recall-expression-in-context*contact
#  source: /usr0/lonz/nlg9602jav/map-semantics.soar
  (state <g> ^activity *none* ^prev-word *none* ^operator <o>
        ^problem-space <p> ^object <o*1>)
  (<o> ^name recall-expression-in-context)
  (<p> ^name map-sem-to-lex)
  (<o*1> ^to <pat>)
  (<pat> ^properties <props>)
  (<props> ^name isa ^value contact)
-->
  (<g> ^candidate-lexical-item contact + ^candidate-lexical-item contact &)}


### general mapping schema for nouns, subsumes previous case
#(sp {map-sem-to-lex*apply*operator*recall-expression-in-context*general-word*noun
#  source: /usr0/lonz/nlg9602jav/map-semantics.soar
#  (state <g> ^activity *none* ^prev-word *none* ^operator <o>
#       ^problem-space <p> ^object <o*1>}
#  (<o> ^name recall-expression-in-context)
#  (<p> ^name map-sem-to-lex)
#  (<o*1> ^to <pat>)
#  (<pat> ^properties <props>)
#  (<props> ^name isa ^value <val>)
#-->
#  (<g> ^candidate-lexical-item <val> + &))
#
#
#(sp {map-sem-to-lex*apply*operator*recall-expression-in-context*general-word*verb
#  (state <g> ^activity *none* ^prev-word *none* ^operator <o>
#        ^problem-space <p> ^object <o*1>}
#  (<o> ^name recall-expression-in-context)
#  (<p> ^name map-sem-to-lex)
#  (<o*1> ^properties <props> ^relations.name agent-of)
#  (<props> ^name isa ^value <val>)
#-->
#  (<g> ^candidate-lexical-item <val> + &))
#
#

excise map-sem-to-lex*apply*operator*recall-expression-in-context*general-word

sp {map-sem-to-lex*recall-expression-in-context*implement*boy
#  source: /usr0/lonz/nlg9602jav/map-semantics.soar
  (state <g> ^activity *none* ^prev-word *none* ^operator <o>
        ^problem-space <p> ^object <o*1>)
  (<o> ^name recall-expression-in-context)
  (<p> ^name map-sem-to-lex)
  (<o*1> ^to <pat>)
  (<pat> ^properties <props>)
  (<props> ^name isa ^value boy)
-->
  (<g> ^candidate-lexical-item chlopiec + &)}

sp {map-sem-to-lex*recall-expression-in-context*implement*friend
#  source: /usr0/lonz/nlg9602jav/map-semantics.soar
  (state <g> ^activity *none* ^prev-word *none* ^operator <o>
        ^problem-space <p> ^object <o*1>)
  (<o> ^name recall-expression-in-context)
  (<p> ^name map-sem-to-lex)
  (<o*1> ^to <pat>)
  (<pat> ^properties <props>)
  (<props> ^name isa ^value friend)
-->
  (<g> ^candidate-lexical-item kolega + &)}

sp {map-sem-to-lex*recall-expression-in-context*implement*kolega
#  source: /usr0/lonz/nlg9602jav/map-semantics.soar
  (state <g> ^activity *none* ^prev-word *none* ^operator <o>
        ^problem-space <p> ^object <o*1>)
  (<o> ^name recall-expression-in-context)
  (<p> ^name map-sem-to-lex)
  (<o*1> ^to <pat>)
  (<pat> ^properties <props>)
  (<props> ^name isa ^value << znajoma kolega >>)
-->
  (<g> ^candidate-lexical-item friend + &)}

sp {map-sem-to-lex*recall-expression-in-context*implement*book
#  source: /usr0/lonz/nlg9602jav/map-semantics.soar
  (state <g> ^activity *none* ^prev-word *none* ^operator <o>
        ^problem-space <p> ^object <o*1>)
  (<o> ^name recall-expression-in-context)
  (<p> ^name map-sem-to-lex)
  (<o*1> ^to <pat>)
  (<pat> ^properties <props>)
  (<props> ^name isa ^value book)
-->
  (<g> ^candidate-lexical-item ksiazka + &)}

sp {map-sem-to-lex*recall-expression-in-context*implement*ksiazka
#  source: /usr0/lonz/nlg9602jav/map-semantics.soar
  (state <g> ^activity *none* ^prev-word *none* ^operator <o>
        ^problem-space <p> ^object <o*1>)
  (<o> ^name recall-expression-in-context)
  (<p> ^name map-sem-to-lex)
  (<o*1> ^to <pat>)
  (<pat> ^properties <props>)
  (<props> ^name isa ^value ksiazka)
-->
  (<g> ^candidate-lexical-item book + &)}

sp {map-sem-to-lex*recall-expression-in-context*implement*desk
#  source: /usr0/lonz/nlg9602jav/map-semantics.soar
  (state <g> ^activity *none* ^prev-word *none* ^operator <o>
        ^problem-space <p> ^object <o*1>)
  (<o> ^name recall-expression-in-context)
  (<p> ^name map-sem-to-lex)
  (<o*1> ^to <pat>)
  (<pat> ^properties <props>)
  (<props> ^name isa ^value desk)
-->
  (<g> ^candidate-lexical-item biurku + &)}

sp {map-sem-to-lex*recall-expression-in-context*implement*biurku
#  source: /usr0/lonz/nlg9602jav/map-semantics.soar
  (state <g> ^activity *none* ^prev-word *none* ^operator <o>
        ^problem-space <p> ^object <o*1>)
  (<o> ^name recall-expression-in-context)
  (<p> ^name map-sem-to-lex)
  (<o*1> ^to <pat>)
  (<pat> ^properties <props>)
  (<props> ^name isa ^value biurku)
-->
  (<g> ^candidate-lexical-item desk + &)}



sp {map-sem-to-lex*recall-expression-in-context*implement*film
#  source: /usr0/lonz/nlg9602jav/map-semantics.soar
  (state <g> ^activity *none* ^prev-word *none* ^operator <o>
        ^problem-space <p> ^object <o*1>)
  (<o> ^name recall-expression-in-context)
  (<p> ^name map-sem-to-lex)
  (<o*1> ^to <pat>)
  (<pat> ^properties <props>)
  (<props> ^name isa ^value film)
-->
  (<g> ^candidate-lexical-item movie + &)}


sp {map-sem-to-lex*recall-expression-in-context*implement*movie
#  source: /usr0/lonz/nlg9602jav/map-semantics.soar
  (state <g> ^activity *none* ^prev-word *none* ^operator <o>
        ^problem-space <p> ^object <o*1>)
  (<o> ^name recall-expression-in-context)
  (<p> ^name map-sem-to-lex)
  (<o*1> ^to <pat>)
  (<pat> ^properties <props>)
  (<props> ^name isa ^value movie)
-->
  (<g> ^candidate-lexical-item film + &)}

sp {map-sem-to-lex*recall-expression-in-context*implement*brat
#  source: /usr0/lonz/nlg9602jav/map-semantics.soar
  (state <g> ^activity *none* ^prev-word *none* ^operator <o>
        ^problem-space <p> ^object <o*1>)
  (<o> ^name recall-expression-in-context)
  (<p> ^name map-sem-to-lex)
  (<o*1> ^to <pat>)
  (<pat> ^properties <props>)
  (<props> ^name isa ^value brat)
-->
  (<g> ^candidate-lexical-item brother + &)}


sp {map-sem-to-lex*recall-expression-in-context*implement*brother
#  source: /usr0/lonz/nlg9602jav/map-semantics.soar
  (state <g> ^activity *none* ^prev-word *none* ^operator <o>
        ^problem-space <p> ^object <o*1>)
  (<o> ^name recall-expression-in-context)
  (<p> ^name map-sem-to-lex)
  (<o*1> ^to <pat>)
  (<pat> ^properties <props>)
  (<props> ^name isa ^value brother)
-->
  (<g> ^candidate-lexical-item brat + &)}


sp {map-sem-to-lex*recall-expression-in-context*implement*ball
#  source: /usr0/lonz/nlg9602jav/map-semantics.soar
  (state <g> ^activity *none* ^prev-word *none* ^operator <o>
        ^problem-space <p> ^object <o*1>)
  (<o> ^name recall-expression-in-context)
  (<p> ^name map-sem-to-lex)
  (<o*1> ^to <pat>)
  (<pat> ^properties <props>)
  (<props> ^name isa ^value ball)
-->
  (<g> ^candidate-lexical-item pilke + &)}

sp {map-sem-to-lex*recall-expression-in-context*implement*pilke
#  source: /usr0/lonz/nlg9602jav/map-semantics.soar
  (state <g> ^activity *none* ^prev-word *none* ^operator <o>
        ^problem-space <p> ^object <o*1>)
  (<o> ^name recall-expression-in-context)
  (<p> ^name map-sem-to-lex)
  (<o*1> ^to <pat>)
  (<pat> ^properties <props>)
  (<props> ^name isa ^value << pilke pilka >>)
-->
  (<g> ^candidate-lexical-item ball + &)}

sp {map-sem-to-lex*recall-expression-in-context*implement*professor
#  source: /usr0/lonz/nlg9602jav/map-semantics.soar
  (state <g> ^activity *none* ^prev-word *none* ^operator <o>
        ^problem-space <p> ^object <o*1>)
  (<o> ^name recall-expression-in-context)
  (<p> ^name map-sem-to-lex)
  (<o*1> ^to <pat>)
  (<pat> ^properties <props>)
  (<props> ^name isa ^value professor)
-->
  (<g> ^candidate-lexical-item professor*p + &)}

sp {map-sem-to-lex*recall-expression-in-context*implement*professor*p
#  source: /usr0/lonz/nlg9602jav/map-semantics.soar
  (state <g> ^activity *none* ^prev-word *none* ^operator <o>
        ^problem-space <p> ^object <o*1>)
  (<o> ^name recall-expression-in-context)
  (<p> ^name map-sem-to-lex)
  (<o*1> ^to <pat>)
  (<pat> ^properties <props>)
  (<props> ^name isa ^value professor*p)
-->
  (<g> ^candidate-lexical-item professor + &)}


sp {map-sem-to-lex*recall-expression-in-context*implement*woman
#  source: /usr0/lonz/nlg9602jav/map-semantics.soar
  (state <g> ^activity *none* ^prev-word *none* ^operator <o>
        ^problem-space <p> ^object <o*1>)
  (<o> ^name recall-expression-in-context)
  (<p> ^name map-sem-to-lex)
  (<o*1> ^to <pat>)
  (<pat> ^properties <props>)
  (<props> ^name isa ^value << woman a_woman the_woman >>)
-->
  (<g> ^candidate-lexical-item kobieta + &)}

sp {map-sem-to-lex*recall-expression-in-context*implement*kobieta
#  source: /usr0/lonz/nlg9602jav/map-semantics.soar
  (state <g> ^activity *none* ^prev-word *none* ^operator <o>
        ^problem-space <p> ^object <o*1>)
  (<o> ^name recall-expression-in-context)
  (<p> ^name map-sem-to-lex)
  (<o*1> ^to <pat>)
  (<pat> ^properties <props>)
  (<props> ^name isa ^value << kobieta >>)
-->
  (<g> ^candidate-lexical-item woman + &)}



sp {map-sem-to-lex*recall-expression-in-context*implement*boy
#  source: /usr0/lonz/nlg9602jav/map-semantics.soar
  (state <g> ^activity *none* ^prev-word *none* ^operator <o>
        ^problem-space <p> ^object <o*1>)
  (<o> ^name recall-expression-in-context)
  (<p> ^name map-sem-to-lex)
  (<o*1> ^to <pat>)
  (<pat> ^properties <props>)
  (<props> ^name isa ^value << boy >>)
-->
  (<g> ^candidate-lexical-item chlopiec + &)}

sp {map-sem-to-lex*recall-expression-in-context*implement*chlopiec
#  source: /usr0/lonz/nlg9602jav/map-semantics.soar
  (state <g> ^activity *none* ^prev-word *none* ^operator <o>
        ^problem-space <p> ^object <o*1>)
  (<o> ^name recall-expression-in-context)
  (<p> ^name map-sem-to-lex)
  (<o*1> ^to <pat>)
  (<pat> ^properties <props>)
  (<props> ^name isa ^value << chlopiec >>)
-->
  (<g> ^candidate-lexical-item boy + &)}


sp {map-sem-to-lex*recall-expression-in-context*implement*nice
#  source: /usr0/lonz/nlg9602jav/map-semantics.soar
  (state <g> ^activity *none* ^prev-word *none* ^operator <o>
        ^problem-space <p> ^object <o*1>)
  (<o> ^name recall-expression-in-context)
  (<p> ^name map-sem-to-lex)
  (<o*1> ^to <pat>)
  (<pat> ^properties <props>)
  (<props> ^name isa ^value nice)
-->
  (<g> ^candidate-lexical-item mila + &)}

sp {map-sem-to-lex*recall-expression-in-context*implement*mila
#  source: /usr0/lonz/nlg9602jav/map-semantics.soar
  (state <g> ^activity *none* ^prev-word *none* ^operator <o>
        ^problem-space <p> ^object <o*1>)
  (<o> ^name recall-expression-in-context)
  (<p> ^name map-sem-to-lex)
  (<o*1> ^to <pat>)
  (<pat> ^properties <props>)
  (<props> ^name isa ^value mila)
-->
  (<g> ^candidate-lexical-item nice + &)}


#(sp {map-sem-to-lex*recall-expression-in-context*implement*kobieta-new
##  source: /usr0/lonz/nlg9602jav/map-semantics.soar
#  (state <g> ^activity *none* ^prev-word *none* ^operator <o>
#        ^problem-space <p> ^object <o*1>}
#  (<o> ^name recall-expression-in-context)
#  (<p> ^name map-sem-to-lex)
#  (<o*1> ^to <pat1> <pat2>)
#  (<pat1> ^properties <props>)
#  (<props> ^name isa ^value kobieta)
#  (<pat2> ^properties <props2>)
#  (<props2> ^name annotation ^value new-info)
#-->
#  (<g> ^candidate-lexical-item a_woman + &))
#
#(sp {map-sem-to-lex*recall-expression-in-context*implement*kobieta-old
##  source: /usr0/lonz/nlg9602jav/map-semantics.soar
#  (state <g> ^activity *none* ^prev-word *none* ^operator <o>
#        ^problem-space <p> ^object <o*1>}
#  (<o> ^name recall-expression-in-context)
#  (<p> ^name map-sem-to-lex)
#  (<o*1> ^to <pat1> <pat2>)
#  (<pat1> ^properties <props>)
#  (<props> ^name isa ^value kobieta)
#  (<pat2> ^properties <props2>)
#  (<props2> ^name annotation ^value old-info)
#-->
#  (<g> ^candidate-lexical-item the_woman + &))
#


## verbs

sp {map-sem-to-lex*recall-expression-in-context*implement*jest
#  source: /usr0/lonz/nlg9602jav/map-semantics.soar
  (state <g> ^activity *none* ^prev-word *none* ^operator <o>
        ^problem-space <p> ^object <o*1>)
  (<o> ^name recall-expression-in-context)
  (<p> ^name map-sem-to-lex)
  (<o*1> ^properties <props> ^relations <ag>)
  (<props> ^name isa ^value jest)
  ;## temporary agreement check: agent must be "i"
  (<ag> ^from <o*1> ^name agent-of ^to <the-ag>)
  (<the-ag> ^properties <props-a>)
  (<props-a> -^value i  ^name isa)
-->
  (<g> ^candidate-lexical-item is + &)}


sp {map-sem-to-lex*recall-expression-in-context*implement*is
#  source: /usr0/lonz/nlg9602jav/map-semantics.soar
  (state <g> ^activity *none* ^prev-word *none* ^operator <o>
        ^problem-space <p> ^object <o*1>)
  (<o> ^name recall-expression-in-context)
  (<p> ^name map-sem-to-lex)
  (<o*1> ^properties <props> ^relations <ag>)
  (<props> ^name isa ^value is)
  ;## temporary agreement check: agent must be "i"
  (<ag> ^from <o*1> ^name agent-of ^to <the-ag>)
  (<the-ag> ^properties <props-a>)
  (<props-a> -^value i  ^name isa)
-->
  (<g> ^candidate-lexical-item jest  + &)}


sp {map-sem-to-lex*recall-expression-in-context*implement*lying
#  source: /usr0/lonz/nlg9602jav/map-semantics.soar
  (state <g> ^activity *none* ^prev-word *none* ^operator <o>
        ^problem-space <p> ^object <o*1>)
  (<o> ^name recall-expression-in-context)
  (<p> ^name map-sem-to-lex)
  (<o*1> ^properties <props> ^relations <ag>)
  (<props> ^name isa ^value lying)
  ;## temporary agreement check: agent must be "i"
  (<ag> ^from <o*1> ^name agent-of ^to <the-ag>)
  (<the-ag> ^properties <props-a>)
  (<props-a> -^value i  ^name isa)
-->
  (<g> ^candidate-lexical-item lezala + &)}



sp {map-sem-to-lex*recall-expression-in-context*implement*lezala
#  source: /usr0/lonz/nlg9602jav/map-semantics.soar
  (state <g> ^activity *none* ^prev-word *none* ^operator <o>
        ^problem-space <p> ^object <o*1>)
  (<o> ^name recall-expression-in-context)
  (<p> ^name map-sem-to-lex)
  (<o*1> ^properties <props> ^relations <ag>)
  (<props> ^name isa ^value lezala)
  ;## temporary agreement check: agent must be "i"
  (<ag> ^from <o*1> ^name agent-of ^to <the-ag>)
  (<the-ag> ^properties <props-a>)
  (<props-a> -^value i  ^name isa)
-->
  (<g> ^candidate-lexical-item lying + &)}


sp {map-sem-to-lex*recall-expression-in-context*implement*came_late
#  source: /usr0/lonz/nlg9602jav/map-semantics.soar
  (state <g> ^activity *none* ^prev-word *none* ^operator <o>
        ^problem-space <p> ^object <o*1>)
  (<o> ^name recall-expression-in-context)
  (<p> ^name map-sem-to-lex)
  (<o*1> ^properties <props> ^relations <ag>)
  (<props> ^name isa ^value came_late)
  ;## temporary agreement check: agent must be "i"
  (<ag> ^from <o*1> ^name agent-of ^to <the-ag>)
  (<the-ag> ^properties <props-a>)
  (<props-a> -^value i  ^name isa)
-->
  (<g> ^candidate-lexical-item spoznil_sie + &)}


sp {map-sem-to-lex*recall-expression-in-context*implement*spozil_sie
#  source: /usr0/lonz/nlg9602jav/map-semantics.soar
  (state <g> ^activity *none* ^prev-word *none* ^operator <o>
        ^problem-space <p> ^object <o*1>)
  (<o> ^name recall-expression-in-context)
  (<p> ^name map-sem-to-lex)
  (<o*1> ^properties <props> ^relations <ag>)
  (<props> ^name isa ^value spozil_sie)
  ;## temporary agreement check: agent must be "i"
  (<ag> ^from <o*1> ^name agent-of ^to <the-ag>)
  (<the-ag> ^properties <props-a>)
  (<props-a> -^value i  ^name isa)
-->
  (<g> ^candidate-lexical-item came_late + &)}


sp {map-sem-to-lex*recall-expression-in-context*implement*came
#  source: /usr0/lonz/nlg9602jav/map-semantics.soar
  (state <g> ^activity *none* ^prev-word *none* ^operator <o>
        ^problem-space <p> ^object <o*1>)
  (<o> ^name recall-expression-in-context)
  (<p> ^name map-sem-to-lex)
  (<o*1> ^properties <props> ^relations <ag>)
  (<props> ^name isa ^value came)
  ;## temporary agreement check: agent must be "i"
  (<ag> ^from <o*1> ^name agent-of ^to <the-ag>)
  (<the-ag> ^properties <props-a>)
  (<props-a> -^value i  ^name isa)
-->
  (<g> ^candidate-lexical-item przyszla + &)}


sp {map-sem-to-lex*recall-expression-in-context*implement*przyszla
#  source: /usr0/lonz/nlg9602jav/map-semantics.soar
  (state <g> ^activity *none* ^prev-word *none* ^operator <o>
        ^problem-space <p> ^object <o*1>)
  (<o> ^name recall-expression-in-context)
  (<p> ^name map-sem-to-lex)
  (<o*1> ^properties <props> ^relations <ag>)
  (<props> ^name isa ^value << przyszli przyszla >>)
  ;## temporary agreement check: agent must be "i"
  (<ag> ^from <o*1> ^name agent-of ^to <the-ag>)
  (<the-ag> ^properties <props-a>)
  (<props-a> -^value i  ^name isa)
-->
  (<g> ^candidate-lexical-item came + &)}


sp {map-sem-to-lex*recall-expression-in-context*implement*left
#  source: /usr0/lonz/nlg9602jav/map-semantics.soar
  (state <g> ^activity *none* ^prev-word *none* ^operator <o>
        ^problem-space <p> ^object <o*1>)
  (<o> ^name recall-expression-in-context)
  (<p> ^name map-sem-to-lex)
  (<o*1> ^properties <props> ^relations <ag>)
  (<props> ^name isa ^value left)
  ;## temporary agreement check: agent must be "i"
  (<ag> ^from <o*1> ^name agent-of ^to <the-ag>)
  (<the-ag> ^properties <props-a>)
  (<props-a> -^value i  ^name isa)
-->
  (<g> ^candidate-lexical-item wyszedl + &)}


sp {map-sem-to-lex*recall-expression-in-context*implement*wyszedl
#  source: /usr0/lonz/nlg9602jav/map-semantics.soar
  (state <g> ^activity *none* ^prev-word *none* ^operator <o>
        ^problem-space <p> ^object <o*1>)
  (<o> ^name recall-expression-in-context)
  (<p> ^name map-sem-to-lex)
  (<o*1> ^properties <props> ^relations <ag>)
  (<props> ^name isa ^value wyszedl)
  ;## temporary agreement check: agent must be "i"
  (<ag> ^from <o*1> ^name agent-of ^to <the-ag>)
  (<the-ag> ^properties <props-a>)
  (<props-a> -^value i  ^name isa)
-->
  (<g> ^candidate-lexical-item left + &)}


sp {map-sem-to-lex*recall-expression-in-context*implement*widzial
#  source: /usr0/lonz/nlg9602jav/map-semantics.soar
  (state <g> ^activity *none* ^prev-word *none* ^operator <o>
        ^problem-space <p> ^object <o*1>)
  (<o> ^name recall-expression-in-context)
  (<p> ^name map-sem-to-lex)
  (<o*1> ^properties <props> ^relations <ag>)
  (<props> ^name isa ^value << widzial widziala widzialam >> )
  ;## temporary agreement check: agent must be "i"
  (<ag> ^from <o*1> ^name agent-of ^to <the-ag>)
  (<the-ag> ^properties <props-a>)
  (<props-a> -^value i  ^name isa)
-->
  (<g> ^candidate-lexical-item saw + &)}

sp {map-sem-to-lex*recall-expression-in-context*implement*widzial
#  source: /usr0/lonz/nlg9602jav/map-semantics.soar
  (state <g> ^activity *none* ^prev-word *none* ^operator <o>
        ^problem-space <p> ^object <o*1>)
  (<o> ^name recall-expression-in-context)
  (<p> ^name map-sem-to-lex)
  (<o*1> ^properties <props> ^relations <ag>)
  (<props> ^name isa ^value << widzial widziala widzialam >> )
  ;## temporary agreement check: agent must be "i"
  (<ag> ^from <o*1> ^name agent-of ^to <the-ag>)
  (<the-ag> ^properties <props-a>)
  (<props-a> -^value i  ^name isa)
-->
  (<g> ^candidate-lexical-item saw + &)}

sp {map-sem-to-lex*recall-expression-in-context*implement*saw1s
#  source: /usr0/lonz/nlg9602jav/map-semantics.soar
  (state <g> ^activity *none* ^prev-word *none* ^operator <o>
        ^problem-space <p> ^object <o*1>)
  (<o> ^name recall-expression-in-context)
  (<p> ^name map-sem-to-lex)
  (<o*1> ^properties <props> ^relations <ag>)
  (<props> ^name isa ^value saw)
  ;## temporary agreement check: agent must be "i"
  (<ag> ^from <o*1> ^name agent-of ^to <the-ag>)
  (<the-ag> ^properties <props-a>)
  (<props-a> ^value i ^name isa)
-->
  (<g> ^candidate-lexical-item widzialam + &)}

sp {map-sem-to-lex*recall-expression-in-context*implement*saw3s
#  source: /usr0/lonz/nlg9602jav/map-semantics.soar
  (state <g> ^activity *none* ^prev-word *none* ^operator <o>
        ^problem-space <p> ^object <o*1>)
  (<o> ^name recall-expression-in-context)
  (<p> ^name map-sem-to-lex)
  (<o*1> ^properties <props> ^relations <ag>)
  (<props> ^name isa ^value saw)
  ;## temporary agreement check: agent must be "i"
  (<ag> ^from <o*1> ^name agent-of ^to <the-ag>)
  (<the-ag> ^properties <props-a>)
  (<props-a> -^value i ^name isa)
-->
  (<g> ^candidate-lexical-item widzial + &)}

sp {map-sem-to-lex*recall-expression-in-context*implement*kicked3s
#  source: /usr0/lonz/nlg9602jav/map-semantics.soar
  (state <g> ^activity *none* ^prev-word *none* ^operator <o>
        ^problem-space <p> ^object <o*1>)
  (<o> ^name recall-expression-in-context)
  (<p> ^name map-sem-to-lex)
  (<o*1> ^properties <props> ^relations <ag>)
  (<props> ^name isa ^value kicked)
  ;## temporary agreement check: agent must be "i"
  (<ag> ^from <o*1> ^name agent-of ^to <the-ag>)
  (<the-ag> ^properties <props-a>)
  (<props-a> -^value i ^name isa)
-->
  (<g> ^candidate-lexical-item kopnal + &)}


sp {map-sem-to-lex*recall-expression-in-context*implement*kopnal
#  source: /usr0/lonz/nlg9602jav/map-semantics.soar
  (state <g> ^activity *none* ^prev-word *none* ^operator <o>
        ^problem-space <p> ^object <o*1>)
  (<o> ^name recall-expression-in-context)
  (<p> ^name map-sem-to-lex)
  (<o*1> ^properties <props> ^relations <ag>)
  (<props> ^name isa ^value kopnal)
  ;## temporary agreement check: agent must be "i"
  (<ag> ^from <o*1> ^name agent-of ^to <the-ag>)
  (<the-ag> ^properties <props-a>)
  (<props-a> -^value i ^name isa)
-->
  (<g> ^candidate-lexical-item kicked + &)}