completed Multimodal and Tram with new languages

5 files changed, 41 insertions, 1 deletions

diff --git a/examples/tram/README b/examples/tram/README
new file mode 100644
index 000000000..f8753dfbb
--- /dev/null
+++ b/examples/tram/README
@@ -0,0 +1,25 @@
+Björn Bringert's tram grammars (user side, without place names)
+implemented as an example of lib/resource/abstract/Multimodal.
+
+For documentation of the original system, see 
+
+  http://www.cs.chalmers.se/~bringert/gf/tramdemo.html
+
+To try, do in gf
+
+  i TramEng.gf
+  gr | l -tr | p
+
+Clicks appear as coordinates on the right of the semicolon.
+This works in eight languages.
+
+Notice that the compilation of the grammars uses precompiled 
+resources, located in 
+
+  GF/lib/compiled
+
+To produce them, use 'make' and 'make install' in GF/lib/resource-1.0.
+
+AR 7/11/2005 -- 23/2/2006
+
+
diff --git a/examples/tram/TramI.gf b/examples/tram/TramI.gf
index 1d505fc58..242a7788d 100644
--- a/examples/tram/TramI.gf
+++ b/examples/tram/TramI.gf
@@ -1,6 +1,6 @@
 incomplete concrete TramI of Tram = open Multimodal, Symbol in {
 
-flags startcat=Query ; lexer=textlit ;
+flags startcat=Query ; lexer=literals ;
 
 lincat
   Query = Phr ;      -- top level, plain string
diff --git a/examples/tram/TramIta.gf b/examples/tram/TramIta.gf
new file mode 100644
index 000000000..656d64dbb
--- /dev/null
+++ b/examples/tram/TramIta.gf
@@ -0,0 +1,5 @@
+--# -path=.:compiled:prelude
+
+concrete TramIta of Tram = TramI with 
+  (Multimodal = MultimodalIta), 
+  (Symbol = SymbolIta) ;
diff --git a/examples/tram/TramNor.gf b/examples/tram/TramNor.gf
new file mode 100644
index 000000000..e7ba6aadd
--- /dev/null
+++ b/examples/tram/TramNor.gf
@@ -0,0 +1,5 @@
+--# -path=.:compiled:prelude
+
+concrete TramNor of Tram = TramI with 
+  (Multimodal = MultimodalNor), 
+  (Symbol = SymbolNor) ;
diff --git a/examples/tram/TramSpa.gf b/examples/tram/TramSpa.gf
new file mode 100644
index 000000000..7915a0331
--- /dev/null
+++ b/examples/tram/TramSpa.gf
@@ -0,0 +1,5 @@
+--# -path=.:compiled:prelude
+
+concrete TramSpa of Tram = TramI with 
+  (Multimodal = MultimodalSpa), 
+  (Symbol = SymbolSpa) ;