;;; This work is licensed under the Creative Commons
;;; Attribution-NonCommercial-ShareAlike 4.0 International License.
;;; To view a copy of this license, visit
;;; http://creativecommons.org/licenses/by-nc-sa/4.0/ or send a letter to
;;; Creative Commons, PO Box 1866, Mountain View, CA 94042, USA.

;;;  Variables holding test material for lfgmodel.lisp

;;; English test sentences

(setf *testtrans1* '(E003 "the senator admitted the error *"))
(setf *testintrobl1* '(E005 "the reporter hoped for a story *"))
(setf *testtrobl1* '(E006 "the photographer sent the reporter to the editor *"))

(setf *ditr-objth* '(E035 "the conductor gave the senator a gift *"))
(setf *ditr-datalt* '(E036 "the conductor gave a gift to the senator *"))

(setf *testrc7* '(E009 "the senator who admitted the error attacked the reporter *"))
(setf *testrc8* '(E010 "the senator who the error embarrassed attacked the reporter *"))
(setf *testrc1* '(E007 "the reporter attacked the senator who admitted the error *"))
(setf *testrc9* '(E011 "the reporter attacked the senator who the error embarrassed *"))

(setf *kwoneng01a* '(E034 "the conductor who the famous vocalist invited to the festival insulted the senator *"))

(setf *tr-rrc-on-subj* '(E042 "the boy the dog bit attacked the vet *"))
(setf *tr-rrc-on-obj* '(E041 "the vet attacked the boy the dog bit *"))
(setf *ditr-rrc-on-subj* '(E051 "the boy the dog bit gave the vet a gift *"))
(setf *ditr-rrc-gpath* '(E043 "the vet gave the boy the dog bit a gift *"))
(setf *ditr-rrc-on-objth* '(E052 "the photographer sent the vet the boy the dog bit *"))

;;; Korean test sentences

(setf *testktrans0* '(K995 "sengakkaka uywonul moyokhayssta *"))
(setf *testktrans1* '(K996 "uywonul sengakkaka moyokhayssta *"))
(setf *testkditrans0* '(K996 "sengakkaka chwukceney uywonul chotayhayssta *"))

(setf *kwon-smodorc* '(K003 "yumyenghan sengakkaka chwukceney chotayhan cihwuycaka uywonul kongkongyenhi moyokhayssta *"))
(setf *kwon-smodsrc* '(K002 "yumyenghan sengakkalul chwukceney chotayhan cihwuycaka uywonul kongkongyenhi moyokhayssta *"))

(setf *kwon-scram-omodorc* '(K006 "yumyenghan sengakkaka chwukceney chotayhan cihwuycalul uywoni kongkongyenhi moyokhayssta *"))
(setf *kwon-scram-omodsrc* '(K005 "yumyenghan sengakkalul chwukceney chotayhan cihwuycalul uywoni kongkongyenhi moyokhayssta *"))

(setf *kwon-insitu-omodorc* '(K008 "yumyenghan cihwuycaka sengakkaka chwukceney chotayhan uywonul kongkongyenhi moyokhayssta *"))
(setf *kwon-insitu-omodsrc* '(K007 "yumyenghan cihwuycaka sengakkalul chwukceney chotayhan uywonul kongkongyenhi moyokhayssta *"))

(setf *kwon-smodorc-prosody* '(K011 "yumyenghan sengakkaka || chwukceney chotayhan cihwuycaka uywonul kongkongyenhi moyokhayssta *"))
(setf *kwon-smodsrc-prosody* '(K010 "yumyenghan sengakkalul || chwukceney chotayhan cihwuycaka uywonul kongkongyenhi moyokhayssta *"))

(setf *kwon-scram-omodorc-prosody* '(K013 "yumyenghan sengakkaka || chwukceney chotayhan cihwuycalul uywoni kongkongyenhi moyokhayssta *"))
(setf *kwon-scram-omodsrc-prosody* '(K012 "yumyenghan sengakkalul || chwukceney chotayhan cihwuycalul uywoni kongkongyenhi moyokhayssta *"))

(setf *kwon-insitu-omodorc-prosody* '(K015 "yumyenghan cihwuycaka || sengakkaka chwukceney chotayhan uywonul kongkongyenhi moyokhayssta *"))
(setf *kwon-insitu-omodsrc-prosody* '(K014 "yumyenghan cihwuycaka || sengakkalul chwukceney chotayhan uywonul kongkongyenhi moyokhayssta *"))
