msyds/gf-core
1
0
Fork 0
forked from GitHub/gf-core
Code Pull Requests Activity

olga_patch1

Browse Source
This commit is contained in:
olga.caprotti
2010-04-19 15:23:33 +00:00
parent ee9acfc772
commit 1d7706be72
1 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
examples/phrasebook/WordsIta.gf
View File

@@ -69,7 +69,7 @@ lin
-- nationalities
Belgian = mkA "belgo" ;
Belgian = mkA "belga" ;
Belgium = mkNP (mkPN "Belgio") ;
English = mkNat "inglese" "Inghilterra" ;
Finnish = mkNat "finlandese" "Finlandia" ;
@@ -124,9 +124,9 @@ lin
-- Building phrases from strings is complicated: the solution is to use
-- mkText : Text -> Text -> Text ;
PSeeYou d = mkText (lin Text (ss ("arrivederci"))) (mkPhrase (mkUtt d)) ;
PSeeYou d = mkText (lin Text (ss ("ci vediamo"))) (mkPhrase (mkUtt d)) ;
PSeeYouPlace p d =
mkText (lin Text (ss ("arrivederci")))
mkText (lin Text (ss ("ci vediamo")))
(mkText (mkPhrase (mkUtt p.at)) (mkPhrase (mkUtt d))) ;
-- Relations are expressed as "my wife" or "the wife of my son", as defined by $xOf$