;;;; -*- Mode: Lisp -*- ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;; ;;;; File : trace-formats.soar6 ;;;; Author : Greg Nelson ;;;; Created On : Thu Aug 19 16:43:26 1993 ;;;; Last Modified By: Greg Nelson ;;;; Last Modified On: Tue Feb 8 16:29:09 1994 ;;;; Update Count : 25 ;;;; ;;;; PURPOSE ;;;; Define trace formats for all of the unusual operators ;;;; TABLE OF CONTENTS ;;;; |>Contents of this module<| ;;;; ;;;; (C) Copyright 1993, Carnegie Mellon University, all rights reserved. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;; Status : Unknown, Use with caution! ;;;; HISTORY ;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ; STACK-TRACE-FORMATS to include simtime (stack-trace-format :add g "%right[7,%st] %right[6,%dc]: %rsd[ ]==>G: %cg") (stack-trace-format :add p "%right[7,%st] %right[6,%dc]: %rsd[ ] P: %cp") (stack-trace-format :add s "%right[7,%st] %right[6,%dc]: %rsd[ ] S: %cs") (stack-trace-format :add o "%right[7,%st] %right[6,%dc]: %rsd[ ] O: %co") ; WAIT (ghn) (object-trace-format :add o wait "%id (wait%ifdef[ %v[count]])") ; ATTEND (ghn) (object-trace-format :add o attend "%id (attend%ifdef[ to %v[identifier.type] %v[identifier]]%ifdef[ to nearest %v[direction] %v[nearest]]%ifdef[ to furthest %v[direction] %v[furthest]])") ; COMPREHEND (ghn) (object-trace-format :add o comprehend "%id (comprehend %v[modality]%ifdef[ %v[information]])") ; RECOGNIZE (ghn) (object-trace-format :add o recognize "%id (recognize %ifdef[%v[item.type] %v[item.value] ](%v[item])%ifdef[ with match target %v[match-target]])") ; NEW-TASK (ghn) (object-trace-format :add o new-task "%id (new-task%ifdef[ %v[new-task.name]])") ; SEARCH-FOR-STEP (ghn) (object-trace-format :add o search-for-step "%id (search-for-step %ifdef[%v[criterion]])") ; SCAN-PAGE (ghn) (object-trace-format :add o scan-page "%id (scan-page%ifdef[ %v[page] %v[direction]])") ; INTEND (ghn) (object-trace-format :add o intend "%id (intend to %v[modality]%ifdef[ %v[part]])") ; SAY (ghn after rubinoff) (object-trace-format :add o say "%id (say \"%v[position.constituent.word-name]\")") ; INITIAL-STATE (ghn) (object-trace-format :add s initial-state "%id (%v[name])%ifdef[ Task: %v[task.name]%ifdef[ %v[task.criterion]]]%ifdef[ Visual target: %v[current-visual-target.item]%ifdef[ column: %v[current-visual-target.column]]%ifdef[ row: %v[current-visual-target.row]]]") ; GENERATE-OPERATOR (rick) (object-trace-format :add o generate-operator "%id generate-operator(%v[constructed-operator.name](%v[constructed-operator.assigner.word-id.word-name]%ifdef[.%v[constructed-operator.assigner.category]]--%v[constructed-operator.role]-->%v[constructed-operator.receiver.word-id.word-name]%ifdef[.%v[constructed-operator.receiver.category]]))") ; LINK (rick) (object-trace-format :add o link "%id link(%v[assigner.word-id.word-name]%ifdef[.%v[assigner.category]]--%v[role]-->%v[receiver.word-id.word-name]%ifdef[.%v[receiver.category]])") ; SNIP (rick) (object-trace-format :add o snip "%id snip(%v[receiver.word-id.word-name])") ; CHECK (rick) (object-trace-format :add o check "%id check %v[constraint.name]") ; LEARN-COMPREHENSION (ghn after rick's attend) ; The following operator augmentation is needed to get this to run, because ; we need something pointing from the operator back to the state to get at ; the a/r sets. (sp top*augo*put-state-on-lc-ops-for-trace (goal ^object nil ^state ^operator +) ( ^name learn-comprehension) --> ( ^state ) ) (object-trace-format :add o learn-comprehension "%id (learn-comprehension up to %v[up-to]) ASSIGNERS ========= %ifdef[%left[20,spec-AP: %v[state.assigners.a.max.spec.word-id.word-name]]]%ifdef[%left[20,spec-AP: %v[state.assigners2.a.max.spec.word-id.word-name]]]%ifdef[%left[20,he*d-AP: %v[state.assigners.a.max.he*d.word-id.word-name]]]%ifdef[%left[20,he*d-AP: %v[state.assigners2.a.max.he*d.word-id.word-name]]]%ifdef[%left[20,adjo*n-AP: %v[state.assigners.a.max.adjo*n.word-id.word-name]]]%ifdef[%left[20,adjo*n-AP: %v[state.assigners2.a.max.adjo*n.word-id.word-name]]]%ifdef[%left[20,comp-A': %v[state.assigners.a.one.comp.word-id.word-name]]]%ifdef[%left[20,comp-A': %v[state.assigners2.a.one.comp.word-id.word-name]]]%ifdef[%left[20,he*d-A': %v[state.assigners.a.one.he*d.word-id.word-name]]]%ifdef[%left[20,he*d-A': %v[state.assigners2.a.one.he*d.word-id.word-name]]]%ifdef[%left[20,adjo*n-A': %v[state.assigners.a.one.adjo*n.word-id.word-name]]]%ifdef[%left[20,adjo*n-A': %v[state.assigners2.a.one.adjo*n.word-id.word-name]]]%ifdef[%left[20,adjo*n-A: %v[state.assigners.a.zero.adjo*n.word-id.word-name]]]%ifdef[%left[20,adjo*n-A: %v[state.assigners2.a.zero.adjo*n.word-id.word-name]]]%ifdef[%left[20,spec-CP: %v[state.assigners.c.max.spec.word-id.word-name]]]%ifdef[%left[20,spec-CP: %v[state.assigners2.c.max.spec.word-id.word-name]]]%ifdef[%left[20,he*d-CP: %v[state.assigners.c.max.he*d.word-id.word-name]]]%ifdef[%left[20,he*d-CP: %v[state.assigners2.c.max.he*d.word-id.word-name]]]%ifdef[%left[20,adjo*n-CP: %v[state.assigners.c.max.adjo*n.word-id.word-name]]]%ifdef[%left[20,adjo*n-CP: %v[state.assigners2.c.max.adjo*n.word-id.word-name]]]%ifdef[%left[20,comp-C': %v[state.assigners.c.one.comp.word-id.word-name]]]%ifdef[%left[20,comp-C': %v[state.assigners2.c.one.comp.word-id.word-name]]]%ifdef[%left[20,he*d-C': %v[state.assigners.c.one.he*d.word-id.word-name]]]%ifdef[%left[20,he*d-C': %v[state.assigners2.c.one.he*d.word-id.word-name]]]%ifdef[%left[20,adjo*n-C': %v[state.assigners.c.one.adjo*n.word-id.word-name]]]%ifdef[%left[20,adjo*n-C': %v[state.assigners2.c.one.adjo*n.word-id.word-name]]]%ifdef[%left[20,adjo*n-C: %v[state.assigners.c.zero.adjo*n.word-id.word-name]]]%ifdef[%left[20,adjo*n-C: %v[state.assigners2.c.zero.adjo*n.word-id.word-name]]]%ifdef[%left[20,spec-detP: %v[state.assigners.det.max.spec.word-id.word-name]]]%ifdef[%left[20,spec-detP: %v[state.assigners2.det.max.spec.word-id.word-name]]]%ifdef[%left[20,he*d-detP: %v[state.assigners.det.max.he*d.word-id.word-name]]]%ifdef[%left[20,he*d-detP: %v[state.assigners2.det.max.he*d.word-id.word-name]]]%ifdef[%left[20,adjo*n-detP: %v[state.assigners.det.max.adjo*n.word-id.word-name]]]%ifdef[%left[20,adjo*n-detP: %v[state.assigners2.det.max.adjo*n.word-id.word-name]]]%ifdef[%left[20,comp-det': %v[state.assigners.det.one.comp.word-id.word-name]]]%ifdef[%left[20,comp-det': %v[state.assigners2.det.one.comp.word-id.word-name]]]%ifdef[%left[20,he*d-det': %v[state.assigners.det.one.he*d.word-id.word-name]]]%ifdef[%left[20,he*d-det': %v[state.assigners2.det.one.he*d.word-id.word-name]]]%ifdef[%left[20,adjo*n-det': %v[state.assigners.det.one.adjo*n.word-id.word-name]]]%ifdef[%left[20,adjo*n-det': %v[state.assigners2.det.one.adjo*n.word-id.word-name]]]%ifdef[%left[20,adjo*n-det: %v[state.assigners.det.zero.adjo*n.word-id.word-name]]]%ifdef[%left[20,adjo*n-det: %v[state.assigners2.det.zero.adjo*n.word-id.word-name]]]%ifdef[%left[20,spec-IP: %v[state.assigners.i.max.spec.word-id.word-name]]]%ifdef[%left[20,spec-IP: %v[state.assigners2.i.max.spec.word-id.word-name]]]%ifdef[%left[20,he*d-IP: %v[state.assigners.i.max.he*d.word-id.word-name]]]%ifdef[%left[20,he*d-IP: %v[state.assigners2.i.max.he*d.word-id.word-name]]]%ifdef[%left[20,adjo*n-IP: %v[state.assigners.i.max.adjo*n.word-id.word-name]]]%ifdef[%left[20,adjo*n-IP: %v[state.assigners2.i.max.adjo*n.word-id.word-name]]]%ifdef[%left[20,comp-I': %v[state.assigners.i.one.comp.word-id.word-name]]]%ifdef[%left[20,comp-I': %v[state.assigners2.i.one.comp.word-id.word-name]]]%ifdef[%left[20,he*d-I': %v[state.assigners.i.one.he*d.word-id.word-name]]]%ifdef[%left[20,he*d-I': %v[state.assigners2.i.one.he*d.word-id.word-name]]]%ifdef[%left[20,adjo*n-I': %v[state.assigners.i.one.adjo*n.word-id.word-name]]]%ifdef[%left[20,adjo*n-I': %v[state.assigners2.i.one.adjo*n.word-id.word-name]]]%ifdef[%left[20,adjo*n-I: %v[state.assigners.i.zero.adjo*n.word-id.word-name]]]%ifdef[%left[20,adjo*n-I: %v[state.assigners2.i.zero.adjo*n.word-id.word-name]]]%ifdef[%left[20,spec-NP: %v[state.assigners.n.max.spec.word-id.word-name]]]%ifdef[%left[20,spec-NP: %v[state.assigners2.n.max.spec.word-id.word-name]]]%ifdef[%left[20,he*d-NP: %v[state.assigners.n.max.he*d.word-id.word-name]]]%ifdef[%left[20,he*d-NP: %v[state.assigners2.n.max.he*d.word-id.word-name]]]%ifdef[%left[20,adjo*n-NP: %v[state.assigners.n.max.adjo*n.word-id.word-name]]]%ifdef[%left[20,adjo*n-NP: %v[state.assigners2.n.max.adjo*n.word-id.word-name]]]%ifdef[%left[20,comp-N': %v[state.assigners.n.one.comp.word-id.word-name]]]%ifdef[%left[20,comp-N': %v[state.assigners2.n.one.comp.word-id.word-name]]]%ifdef[%left[20,he*d-N': %v[state.assigners.n.one.he*d.word-id.word-name]]]%ifdef[%left[20,he*d-N': %v[state.assigners2.n.one.he*d.word-id.word-name]]]%ifdef[%left[20,he*d-N': %v[state.assigners2.n.one.he*d.word-id.word-name]]]%ifdef[%left[20,he*d-N': %v[state.assigners2.n.one.he*d.word-id.word-name]]]%ifdef[%left[20,adjoin-N': %v[state.assigners.n.one.adjoin.word-id.word-name]]]%ifdef[%left[20,adjoin-N': %v[state.assigners2.n.one.adjoin.word-id.word-name]]]%ifdef[%left[20,adjoin-N: %v[state.assigners.n.zero.adjoin.word-id.word-name]]]%ifdef[%left[20,adjoin-N: %v[state.assigners2.n.zero.adjoin.word-id.word-name]]]%ifdef[%left[20,spec-PP: %v[state.assigners.p.max.spec.word-id.word-name]]]%ifdef[%left[20,spec-PP: %v[state.assigners2.p.max.spec.word-id.word-name]]]%ifdef[%left[20,he*d-PP: %v[state.assigners.p.max.he*d.word-id.word-name]]]%ifdef[%left[20,he*d-PP: %v[state.assigners2.p.max.he*d.word-id.word-name]]]%ifdef[%left[20,adjo*n-PP: %v[state.assigners.p.max.adjo*n.word-id.word-name]]]%ifdef[%left[20,adjo*n-PP: %v[state.assigners2.p.max.adjo*n.word-id.word-name]]]%ifdef[%left[20,comp-P': %v[state.assigners.p.one.comp.word-id.word-name]]]%ifdef[%left[20,comp-P': %v[state.assigners2.p.one.comp.word-id.word-name]]]%ifdef[%left[20,he*d-P': %v[state.assigners.p.one.he*d.word-id.word-name]]]%ifdef[%left[20,he*d-P': %v[state.assigners2.p.one.he*d.word-id.word-name]]]%ifdef[%left[20,adjo*n-P': %v[state.assigners.p.one.adjo*n.word-id.word-name]]]%ifdef[%left[20,adjo*n-P': %v[state.assigners2.p.one.adjo*n.word-id.word-name]]]%ifdef[%left[20,adjo*n-P: %v[state.assigners.p.zero.adjo*n.word-id.word-name]]]%ifdef[%left[20,adjo*n-P: %v[state.assigners2.p.zero.adjo*n.word-id.word-name]]]%ifdef[%left[20,spec-VP: %v[state.assigners.v.max.spec.word-id.word-name]]]%ifdef[%left[20,spec-VP: %v[state.assigners2.v.max.spec.word-id.word-name]]]%ifdef[%left[20,he*d-VP: %v[state.assigners.v.max.he*d.word-id.word-name]]]%ifdef[%left[20,he*d-VP: %v[state.assigners2.v.max.he*d.word-id.word-name]]]%ifdef[%left[20,adjo*n-VP: %v[state.assigners.v.max.adjo*n.word-id.word-name]]]%ifdef[%left[20,adjo*n-VP: %v[state.assigners2.v.max.adjo*n.word-id.word-name]]]%ifdef[%left[20,comp-V': %v[state.assigners.v.one.comp.word-id.word-name]]]%ifdef[%left[20,comp-V': %v[state.assigners2.v.one.comp.word-id.word-name]]]%ifdef[%left[20,he*d-V': %v[state.assigners.v.one.he*d.word-id.word-name]]]%ifdef[%left[20,he*d-V': %v[state.assigners2.v.one.he*d.word-id.word-name]]]%ifdef[%left[20,adjo*n-V': %v[state.assigners.v.one.adjo*n.word-id.word-name]]]%ifdef[%left[20,adjo*n-V': %v[state.assigners2.v.one.adjo*n.word-id.word-name]]]%ifdef[%left[20,adjo*n-V: %v[state.assigners.v.zero.adjo*n.word-id.word-name]]]%ifdef[%left[20,adjo*n-V: %v[state.assigners2.v.zero.adjo*n.word-id.word-name]]] RECEIVERS ========= %ifdef[%left[20,spec-AP: %v[state.receivers.a.max.spec.word-id.word-name]]]%ifdef[%left[20,spec-AP: %v[state.receivers2.a.max.spec.word-id.word-name]]]%ifdef[%left[20,he*d-AP: %v[state.receivers.a.max.he*d.word-id.word-name]]]%ifdef[%left[20,he*d-AP: %v[state.receivers2.a.max.he*d.word-id.word-name]]]%ifdef[%left[20,adjo*n-AP: %v[state.receivers.a.max.adjo*n.word-id.word-name]]]%ifdef[%left[20,adjo*n-AP: %v[state.receivers2.a.max.adjo*n.word-id.word-name]]]%ifdef[%left[20,comp-A': %v[state.receivers.a.one.comp.word-id.word-name]]]%ifdef[%left[20,comp-A': %v[state.receivers2.a.one.comp.word-id.word-name]]]%ifdef[%left[20,he*d-A': %v[state.receivers.a.one.he*d.word-id.word-name]]]%ifdef[%left[20,he*d-A': %v[state.receivers2.a.one.he*d.word-id.word-name]]]%ifdef[%left[20,adjo*n-A': %v[state.receivers.a.one.adjo*n.word-id.word-name]]]%ifdef[%left[20,adjo*n-A': %v[state.receivers2.a.one.adjo*n.word-id.word-name]]]%ifdef[%left[20,adjo*n-A: %v[state.receivers.a.zero.adjo*n.word-id.word-name]]]%ifdef[%left[20,adjo*n-A: %v[state.receivers2.a.zero.adjo*n.word-id.word-name]]]%ifdef[%left[20,spec-CP: %v[state.receivers.c.max.spec.word-id.word-name]]]%ifdef[%left[20,spec-CP: %v[state.receivers2.c.max.spec.word-id.word-name]]]%ifdef[%left[20,he*d-CP: %v[state.receivers.c.max.he*d.word-id.word-name]]]%ifdef[%left[20,he*d-CP: %v[state.receivers2.c.max.he*d.word-id.word-name]]]%ifdef[%left[20,adjo*n-CP: %v[state.receivers.c.max.adjo*n.word-id.word-name]]]%ifdef[%left[20,adjo*n-CP: %v[state.receivers2.c.max.adjo*n.word-id.word-name]]]%ifdef[%left[20,comp-C': %v[state.receivers.c.one.comp.word-id.word-name]]]%ifdef[%left[20,comp-C': %v[state.receivers2.c.one.comp.word-id.word-name]]]%ifdef[%left[20,he*d-C': %v[state.receivers.c.one.he*d.word-id.word-name]]]%ifdef[%left[20,he*d-C': %v[state.receivers2.c.one.he*d.word-id.word-name]]]%ifdef[%left[20,adjo*n-C': %v[state.receivers.c.one.adjo*n.word-id.word-name]]]%ifdef[%left[20,adjo*n-C': %v[state.receivers2.c.one.adjo*n.word-id.word-name]]]%ifdef[%left[20,adjo*n-C: %v[state.receivers.c.zero.adjo*n.word-id.word-name]]]%ifdef[%left[20,adjo*n-C: %v[state.receivers2.c.zero.adjo*n.word-id.word-name]]]%ifdef[%left[20,spec-detP: %v[state.receivers.det.max.spec.word-id.word-name]]]%ifdef[%left[20,spec-detP: %v[state.receivers2.det.max.spec.word-id.word-name]]]%ifdef[%left[20,he*d-detP: %v[state.receivers.det.max.he*d.word-id.word-name]]]%ifdef[%left[20,he*d-detP: %v[state.receivers2.det.max.he*d.word-id.word-name]]]%ifdef[%left[20,adjo*n-detP: %v[state.receivers.det.max.adjo*n.word-id.word-name]]]%ifdef[%left[20,adjo*n-detP: %v[state.receivers2.det.max.adjo*n.word-id.word-name]]]%ifdef[%left[20,comp-det': %v[state.receivers.det.one.comp.word-id.word-name]]]%ifdef[%left[20,comp-det': %v[state.receivers2.det.one.comp.word-id.word-name]]]%ifdef[%left[20,he*d-det': %v[state.receivers.det.one.he*d.word-id.word-name]]]%ifdef[%left[20,he*d-det': %v[state.receivers2.det.one.he*d.word-id.word-name]]]%ifdef[%left[20,adjo*n-det': %v[state.receivers.det.one.adjo*n.word-id.word-name]]]%ifdef[%left[20,adjo*n-det': %v[state.receivers2.det.one.adjo*n.word-id.word-name]]]%ifdef[%left[20,adjo*n-det: %v[state.receivers.det.zero.adjo*n.word-id.word-name]]]%ifdef[%left[20,adjo*n-det: %v[state.receivers2.det.zero.adjo*n.word-id.word-name]]]%ifdef[%left[20,spec-IP: %v[state.receivers.i.max.spec.word-id.word-name]]]%ifdef[%left[20,spec-IP: %v[state.receivers2.i.max.spec.word-id.word-name]]]%ifdef[%left[20,he*d-IP: %v[state.receivers.i.max.he*d.word-id.word-name]]]%ifdef[%left[20,he*d-IP: %v[state.receivers2.i.max.he*d.word-id.word-name]]]%ifdef[%left[20,adjo*n-IP: %v[state.receivers.i.max.adjo*n.word-id.word-name]]]%ifdef[%left[20,adjo*n-IP: %v[state.receivers2.i.max.adjo*n.word-id.word-name]]]%ifdef[%left[20,comp-I': %v[state.receivers.i.one.comp.word-id.word-name]]]%ifdef[%left[20,comp-I': %v[state.receivers2.i.one.comp.word-id.word-name]]]%ifdef[%left[20,he*d-I': %v[state.receivers.i.one.he*d.word-id.word-name]]]%ifdef[%left[20,he*d-I': %v[state.receivers2.i.one.he*d.word-id.word-name]]]%ifdef[%left[20,adjo*n-I': %v[state.receivers.i.one.adjo*n.word-id.word-name]]]%ifdef[%left[20,adjo*n-I': %v[state.receivers2.i.one.adjo*n.word-id.word-name]]]%ifdef[%left[20,adjo*n-I: %v[state.receivers.i.zero.adjo*n.word-id.word-name]]]%ifdef[%left[20,adjo*n-I: %v[state.receivers2.i.zero.adjo*n.word-id.word-name]]]%ifdef[%left[20,spec-NP: %v[state.receivers.n.max.spec.word-id.word-name]]]%ifdef[%left[20,spec-NP: %v[state.receivers2.n.max.spec.word-id.word-name]]]%ifdef[%left[20,he*d-NP: %v[state.receivers.n.max.he*d.word-id.word-name]]]%ifdef[%left[20,he*d-NP: %v[state.receivers2.n.max.he*d.word-id.word-name]]]%ifdef[%left[20,adjo*n-NP: %v[state.receivers.n.max.adjo*n.word-id.word-name]]]%ifdef[%left[20,adjo*n-NP: %v[state.receivers2.n.max.adjo*n.word-id.word-name]]]%ifdef[%left[20,comp-N': %v[state.receivers.n.one.comp.word-id.word-name]]]%ifdef[%left[20,comp-N': %v[state.receivers2.n.one.comp.word-id.word-name]]]%ifdef[%left[20,he*d-N': %v[state.receivers.n.one.he*d.word-id.word-name]]]%ifdef[%left[20,he*d-N': %v[state.receivers2.n.one.he*d.word-id.word-name]]]%ifdef[%left[20,adjoin-N': %v[state.receivers.n.one.adjoin.word-id.word-name]]]%ifdef[%left[20,adjoin-N': %v[state.receivers2.n.one.adjoin.word-id.word-name]]]%ifdef[%left[20,adjoin-N: %v[state.receivers.n.zero.adjoin.word-id.word-name]]]%ifdef[%left[20,adjoin-N: %v[state.receivers2.n.zero.adjoin.word-id.word-name]]]%ifdef[%left[20,spec-PP: %v[state.receivers.p.max.spec.word-id.word-name]]]%ifdef[%left[20,spec-PP: %v[state.receivers2.p.max.spec.word-id.word-name]]]%ifdef[%left[20,he*d-PP: %v[state.receivers.p.max.he*d.word-id.word-name]]]%ifdef[%left[20,he*d-PP: %v[state.receivers2.p.max.he*d.word-id.word-name]]]%ifdef[%left[20,adjo*n-PP: %v[state.receivers.p.max.adjo*n.word-id.word-name]]]%ifdef[%left[20,adjo*n-PP: %v[state.receivers2.p.max.adjo*n.word-id.word-name]]]%ifdef[%left[20,comp-P': %v[state.receivers.p.one.comp.word-id.word-name]]]%ifdef[%left[20,comp-P': %v[state.receivers2.p.one.comp.word-id.word-name]]]%ifdef[%left[20,he*d-P': %v[state.receivers.p.one.he*d.word-id.word-name]]]%ifdef[%left[20,he*d-P': %v[state.receivers2.p.one.he*d.word-id.word-name]]]%ifdef[%left[20,adjo*n-P': %v[state.receivers.p.one.adjo*n.word-id.word-name]]]%ifdef[%left[20,adjo*n-P': %v[state.receivers2.p.one.adjo*n.word-id.word-name]]]%ifdef[%left[20,adjo*n-P: %v[state.receivers.p.zero.adjo*n.word-id.word-name]]]%ifdef[%left[20,adjo*n-P: %v[state.receivers2.p.zero.adjo*n.word-id.word-name]]]%ifdef[%left[20,spec-VP: %v[state.receivers.v.max.spec.word-id.word-name]]]%ifdef[%left[20,spec-VP: %v[state.receivers2.v.max.spec.word-id.word-name]]]%ifdef[%left[20,he*d-VP: %v[state.receivers.v.max.he*d.word-id.word-name]]]%ifdef[%left[20,he*d-VP: %v[state.receivers2.v.max.he*d.word-id.word-name]]]%ifdef[%left[20,adjo*n-VP: %v[state.receivers.v.max.adjo*n.word-id.word-name]]]%ifdef[%left[20,adjo*n-VP: %v[state.receivers2.v.max.adjo*n.word-id.word-name]]]%ifdef[%left[20,comp-V': %v[state.receivers.v.one.comp.word-id.word-name]]]%ifdef[%left[20,comp-V': %v[state.receivers2.v.one.comp.word-id.word-name]]]%ifdef[%left[20,he*d-V': %v[state.receivers.v.one.he*d.word-id.word-name]]]%ifdef[%left[20,he*d-V': %v[state.receivers2.v.one.he*d.word-id.word-name]]]%ifdef[%left[20,adjo*n-V': %v[state.receivers.v.one.adjo*n.word-id.word-name]]]%ifdef[%left[20,adjo*n-V': %v[state.receivers2.v.one.adjo*n.word-id.word-name]]]%ifdef[%left[20,adjo*n-V: %v[state.receivers.v.zero.adjo*n.word-id.word-name]]]%ifdef[%left[20,adjo*n-V: %v[state.receivers2.v.zero.adjo*n.word-id.word-name]]] ") ; Simple version without utterance model. ; LEARN-COMPREHENSION (ghn) ; (object-trace-format :add o learn-comprehension "%id (learn-comprehension up to %v[up-to])") ; READ-OMI-STEP (steier) ;(object-trace-format :add o read-omi-step "(%id %v[name] %v[info])") ; FLIP-PAGE (steier) (object-trace-format :add o flip-page "%id (%v[name] %v[direction] by %v[number-of-pages])")