multimodal resource

This commit is contained in:
aarne
2005-11-06 21:00:36 +00:00
parent 4f6afbab98
commit a4dbad93a1
11 changed files with 200 additions and 5 deletions

View File

@@ -0,0 +1,15 @@
incomplete concrete MultimodalI of Multimodal =
open Prelude, Resource, Basic, Lang, DemRes in {
lin
DemNP np = np ** {s5 = [] ; lock_NP = <>} ;
DemAdv adv = addDAdv (adv ** {lock_Adv = <>}) {s5 = []} ;
SentMS ms = {s = ms.s ! MInd ++ ";" ++ ms.s5} ;
QuestMS ms = {s = ms.s ! MQuest ++ ";" ++ ms.s5} ;
QuestMQ ms = {s = ms.s ++ ";" ++ ms.s5} ;
AdvDate = AdvDate ;
AdvTime = AdvTime ;
}