;;; File: process-qual-fix.lisp
;;; Last saved in emacs: Time-stamp: <97/01/22 23:05:13 jlitchfi>

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; added ability to say "I require {you, John} to go to the store."        ;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

(SYSTEM
 :NAME                   PROCESS-QUALIFICATION
 :INPUTS                 (OR NOMINAL PRONOMINAL-NONSPECIFIC
			     individual-name (and interactant oblique))
 :OUTPUTS                ((0.1 PROCESS-QUALIFIED (INSERT EVENT)
                               (PRESELECT EVENT DEPENDENT-CLAUSE))
			  (0.9 NOT-PROCESS-QUALIFIED))
 :CHOOSER                PROCESS-QUALIFICATION-CHOOSER
 :REGION                 QUALIFICATION
 :METAFUNCTION           IDEATIONAL
 )
