From b5bb4fc2b5b1d7e8ce17eb87722ba11e46a2ab2b Mon Sep 17 00:00:00 2001
From: aarne <unknown>
Date: Thu, 29 Apr 2004 04:03:19 +0000
Subject: multimodality exx

---
 grammars/timetable/TimetableEng.gf | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

(limited to 'grammars/timetable/TimetableEng.gf')

diff --git a/grammars/timetable/TimetableEng.gf b/grammars/timetable/TimetableEng.gf
index 2800ce010..498f96975 100644
--- a/grammars/timetable/TimetableEng.gf
+++ b/grammars/timetable/TimetableEng.gf
@@ -3,9 +3,10 @@
 concrete TimetableEng of Timetable = open Prelude in {
 
   lin
-    MkTable cs ts = ss (["trains on the line from"] ++ cs.s ++ ":" ++ ts.s) ;
+    MkTable cs ts = 
+      ss (["The following trains run on the line from"] ++ cs.s ++ "." ++ ts.s) ;
     NilTrain _ = ss [] ;
-    ConsTrain cs n t ts = ss (n.s ++ ":" ++ t.s ++ ";") ;
+    ConsTrain cs n t ts = ss (n.s ++ ":" ++ t.s ++ "." ++ ts.s) ;
     OneCity c = c ;
     ConsCity c cs = ss (c.s ++ "to" ++ cs.s) ;
 
@@ -16,7 +17,7 @@ concrete TimetableEng of Timetable = open Prelude in {
     CityTrain c s cs t = ss (c.s ++ s.s ++ "," ++ t.s) ;
 
     T i = prefixSS "at" i ;
-    N n = prefixSS "train" n ;
+    N n = prefixSS "Train" n ;
     C s = s ;
 
 }
-- 
cgit v1.2.3