CBNB-RP-12-PURPS

(EXAMPLE
     :NAME                   CBNB-RP-12-PURPS
     :GENERATEDFORM          "Pro ukončení křivky se stisknout+VB-----3P-AA--- Enter."
     :GLOSS                  ( :ENGLISH
                               "For ending.cb/acc polyline.nb/gen refl press enter.nb"
                               )
     :TARGETFORM             "Pro ukončení křivky se stiskne ENTER."
     :LOGICALFORM
     (R / RST-PURPOSE
          :PREFER-MENTION-AGENT-Q WITHHOLD
          :DOMAIN
          (P / DM::PRESS
               :PREFER-MENTION-AGENT-Q WITHHOLD
               :ACTEE
               (D / OBJECT
                    :NAME GUI-RETURN
                    :CONTEXTUAL-BOUNDNESS NO )
               )

          :RANGE
          (E / DM::END-LINE
               :ACTEE
               (P2 / DM::POLYLINE
                    :CONTEXTUAL-BOUNDNESS NO )

               :CONTEXTUAL-BOUNDNESS YES )
          )
     :SET-NAME               |TBCbNb|
     )

Return to index. /font>