From 6bbd4e423a7cda422a2e519453a41cef234506bd Mon Sep 17 00:00:00 2001 From: aarne Date: Tue, 16 May 2006 13:07:41 +0000 Subject: examples of dialogue system grammars --- examples/dialogue/AgendaEng.gf | 15 +++++++++++++++ 1 file changed, 15 insertions(+) create mode 100644 examples/dialogue/AgendaEng.gf (limited to 'examples/dialogue/AgendaEng.gf') diff --git a/examples/dialogue/AgendaEng.gf b/examples/dialogue/AgendaEng.gf new file mode 100644 index 000000000..5686e704e --- /dev/null +++ b/examples/dialogue/AgendaEng.gf @@ -0,0 +1,15 @@ +--# -path=.:present:prelude + +concrete AgendaEng of Agenda = + DialogueEng, WeekdayEng ** open LangEng, ParadigmsEng in { + + lin + Day = UseN (regN "day") ; + Meeting = UseN (regN "meeting") ; + Add = dirV3 (regV "add") (mkPreposition "on") ; + Remove = dirV2 (regV "remove") ; + Interrupt = regV "interrupt" ; + + day = UsePN ; + +} -- cgit v1.2.3