small fixes in Phrasebook, particularly PSeeYouPlaceDate

This commit is contained in:
aarne
2010-04-30 06:55:15 +00:00
parent 62dd93f728
commit a47df1d54e
9 changed files with 34 additions and 23 deletions

View File

@@ -110,8 +110,8 @@ concrete WordsGer of Words = SentencesGer **
-- Building phrases from strings is complicated: the solution is to use
-- mkText : Text -> Text -> Text ;
-- PSeeYou d = mkText (lin Text (ss ("auf Wiedersehen"))) (mkPhrase (mkUtt d)) ;
-- PSeeYouPlace p d =
-- PSeeYouDate d = mkText (lin Text (ss ("auf Wiedersehen"))) (mkPhrase (mkUtt d)) ;
-- PSeeYouPlaceDate p d =
-- mkText (lin Text (ss ("auf Wiedersehen")))
-- (mkText (mkPhrase (mkUtt p.at)) (mkPhrase (mkUtt d))) ;