summaryrefslogtreecommitdiff
path: root/examples/tram/TramI.gf
diff options
context:
space:
mode:
authoraarne <aarne@cs.chalmers.se>2005-12-09 16:28:45 +0000
committeraarne <aarne@cs.chalmers.se>2005-12-09 16:28:45 +0000
commit5766d566a8477cd8d651eb51cd6fb2359a976be5 (patch)
tree2cc3b1d1a709cf3941892e82889117305616436f /examples/tram/TramI.gf
parentf63542c17fd5494166e7ed75809f4bc5516c0cd1 (diff)
multimodal for Swedish
Diffstat (limited to 'examples/tram/TramI.gf')
-rw-r--r--examples/tram/TramI.gf44
1 files changed, 0 insertions, 44 deletions
diff --git a/examples/tram/TramI.gf b/examples/tram/TramI.gf
deleted file mode 100644
index 384cdbf3b..000000000
--- a/examples/tram/TramI.gf
+++ /dev/null
@@ -1,44 +0,0 @@
-incomplete concrete TramI of Tram = open Multimodal, Math in {
-
-flags startcat=Query ; lexer=textlit ;
-
-lincat
- Dep, Dest = DAdv ;
- Query = Phr ; -- top level, plain string
- Input = MS ; -- two parallel sequences (text and clicks)
- Click = Point ;
-
-lin
- QInput i = SentMS PPos i ;
-
- GoFromTo x y =
- ModDemV want_VV go_V (DemNP i_NP)
- (ConsDAdv x (ConsDAdv y BaseDAdv)) ;
-
- GoToFrom x y =
- ModDemV want_VV go_V (DemNP i_NP)
- (ConsDAdv x (ConsDAdv y BaseDAdv)) ;
-
- ComeFrom x =
- ModDemV want_VV come_V (DemNP i_NP)
- (ConsDAdv x BaseDAdv) ;
-
- GoTo x =
- ModDemV want_VV go_V (DemNP i_NP)
- (ConsDAdv x BaseDAdv) ;
-
- DepClick c = here7from_DAdv c ;
- DestClick c = here7to_DAdv c ;
- DepHere = DemAdv here7from_Adv ;
- DestHere = DemAdv here7to_Adv ;
- DepNamed s = PrepDNP from_Prep (DemNP (UsePN (SymbPN s))) ;
- DestNamed s = PrepDNP to_Prep (DemNP (UsePN (SymbPN s))) ;
-
- CCoord x y = {s5 = "(" ++ x.s ++ "," ++ y.s ++ ")" ; lock_Point = <>} ;
-
--- Place = DNP ; -- name + click - not possible for "here"
--- PClick c = this_DNP c ;
--- PHere = DemNP this_NP ;
--- PNamed s = DemNP (UsePN (SymbPN s)) ;
-
-}