diff options
| author | aarne <aarne@chalmers.se> | 2010-03-21 19:57:53 +0000 |
|---|---|---|
| committer | aarne <aarne@chalmers.se> | 2010-03-21 19:57:53 +0000 |
| commit | 9d98177e65970dae560d871245ab5d0adbe72d50 (patch) | |
| tree | a6134b8f5908ce01f6ecc22d7e0ed1d720347613 /examples/phrasebook/FoodFre.gf | |
| parent | df0c6fb8d3acb525e7cdf520b5c51d967d12567e (diff) | |
French phrasebook
Diffstat (limited to 'examples/phrasebook/FoodFre.gf')
| -rw-r--r-- | examples/phrasebook/FoodFre.gf | 26 |
1 files changed, 26 insertions, 0 deletions
diff --git a/examples/phrasebook/FoodFre.gf b/examples/phrasebook/FoodFre.gf new file mode 100644 index 000000000..0c7c1af1c --- /dev/null +++ b/examples/phrasebook/FoodFre.gf @@ -0,0 +1,26 @@ +-- (c) 2009 Ramona Enache and Aarne Ranta under LGPL
+
+concrete FoodFre of Food = SentencesFre ** open
+ SyntaxFre,
+ ParadigmsFre in
+{
+flags coding=utf8 ;
+
+lin
+
+Wine = mkCN (mkN "vin") ;
+Cheese = mkCN (mkN "fromage" masculine) ;
+Fish = mkCN (mkN "poisson" masculine) ;
+Pizza = mkCN (mkN "pizza" feminine) ;
+
+Fresh = mkAP (mkA "frais" "fraîche") ;
+Warm = mkAPA "chaud" ;
+Italian = mkAPA "italien" ;
+Expensive = mkAPA "cher" ;
+Delicious = mkAPA "délicieux" ;
+Boring = mkAPA "ennuyeux" ;
+
+oper
+mkAPA : (_ : Str) -> AP = \x -> mkAP (mkA x) ;
+
+}
|