diff options
| author | aarne <aarne@chalmers.se> | 2010-03-26 22:07:17 +0000 |
|---|---|---|
| committer | aarne <aarne@chalmers.se> | 2010-03-26 22:07:17 +0000 |
| commit | 691620346ccdae242ce8b203fc04d3ffeeea6247 (patch) | |
| tree | c480f98b2615bf16236d0a89e052f0dd0c59712a /examples/phrasebook/WordsRon.gf | |
| parent | c24440d1346a01d660f83359d8ef72a2ef1b0c13 (diff) | |
change Food to Words in Phrasebook, since it's unpractical to have many small modules; added syntactic forms and words
Diffstat (limited to 'examples/phrasebook/WordsRon.gf')
| -rw-r--r-- | examples/phrasebook/WordsRon.gf | 34 |
1 files changed, 34 insertions, 0 deletions
diff --git a/examples/phrasebook/WordsRon.gf b/examples/phrasebook/WordsRon.gf new file mode 100644 index 000000000..673eead8f --- /dev/null +++ b/examples/phrasebook/WordsRon.gf @@ -0,0 +1,34 @@ +-- (c) 2009 Ramona Enache under LGPL
+
+concrete WordsRon of Words = SentencesRon ** open
+ SyntaxRon,
+ ParadigmsRon in
+{
+flags coding=utf8 ;
+
+lin
+
+Wine = mkCN (mkN "vin" "vinuri" neuter) ;
+Cheese = mkCN (mkN "brânză" "brânzeturi" feminine) ;
+Fish = mkCN (mkN "peşte" "peşti" masculine) ;
+Pizza = mkCN (mkN "pizza" "pizze" feminine) ;
+
+Fresh = mkAPA "proaspăt" "proaspătă" "proaspeţi" "proaspete" ;
+Warm = mkAPA "cald" "caldă" "calzi" "calde" ;
+Italian = mkAPA "italian" "italiană" "italieni" "italiene" ;
+Expensive = mkAPA "scump" "scumpă" "scumpi" "scumpe" ;
+Delicious = mkAPA "delicios" "delcioasă" "delicioşi" "delicioase" ;
+Boring = mkAPA "plictisitor" "plictisitoare" "plictisitori" "plictisitoare" ;
+
+ Restaurant = mkCN (mkN "restaurant") ;
+ Bar = mkCN (mkN "bar") ;
+ Toilet = mkCN (mkN "toaleta") ;
+
+ Euro = mkCN (mkN "euro") ;
+ Dollar = mkCN (mkN "dollar") ;
+ Lei = mkCN (mkN "leu" "lei") ;
+
+oper
+mkAPA : (_,_,_,_ : Str) -> AP = \x,y,z,u -> mkAP (mkA x y z u) ;
+
+}
|