diff options
| author | aarne <aarne@cs.chalmers.se> | 2008-06-25 16:54:35 +0000 |
|---|---|---|
| committer | aarne <aarne@cs.chalmers.se> | 2008-06-25 16:54:35 +0000 |
| commit | e9e80fc389365e24d4300d7d5390c7d833a96c50 (patch) | |
| tree | f0b58473adaa670bd8fc52ada419d8cad470ee03 /old-examples/wiki/LexRestaurantFin.gf | |
| parent | b96b36f43de3e2f8b58d5f539daa6f6d47f25870 (diff) | |
changed names of resource-1.3; added a note on homepage on release
Diffstat (limited to 'old-examples/wiki/LexRestaurantFin.gf')
| -rw-r--r-- | old-examples/wiki/LexRestaurantFin.gf | 70 |
1 files changed, 70 insertions, 0 deletions
diff --git a/old-examples/wiki/LexRestaurantFin.gf b/old-examples/wiki/LexRestaurantFin.gf new file mode 100644 index 000000000..0e5853797 --- /dev/null +++ b/old-examples/wiki/LexRestaurantFin.gf @@ -0,0 +1,70 @@ + +instance LexRestaurantFin of LexRestaurant = open SyntaxFin,GrammarFin,ParadigmsFin in { + + oper + restaurant_N = mkN "ravintola" ; + food_N = mkN "ruoka" ; + staff_N = mkN "henkilökunta" ; + wine_N = mkN "viini" ;
+ pizza_N = mkN "pizza" ;
+ cheese_N = mkN "juusto" ; + fish_N = mkN "kala" ; + dish_N = mkN "ruokalaji" ; + drink_N = mkN "juoma" ; + dessert_N = mkN "jälkiruoka" ; + + recommend_V2 = mkV2 (mkV "suositella") ; + + chinese_A = mkA "kiinalainen" ; + french_A = mkA "ranskalainen" ; + italian_A = mkA "italialainen" ; + japanese_A = mkA "japanilainen" ; + mexican_A = mkA "meksikolainen" ; + thai_A = mkA "thaimaalainen" ; + expensive_A = mkA "kallis" ; + cheap_A = mkA "halpa" ; + nice_A = mkA "mukava" ; + clean_A = mkA "siisti" ; + dirty_A = mkA "likainen" ; + fresh_A = mkA "raikas" ; + delicious_A = mkA "herkullinen" ; + fatty_A = mkA "rasvainen" ; + tasteless_A = mkA "mauton"; + authentic_A = mkA "autenttinen" ; + efficient_A = mkA "tehokas" ; + courteous_A = mkA "kohtelias" ; + helpful_A = mkA "avulias" ; + friendly_A = mkA "ystävällinen" ; + personal_A = mkA "persoonallinen" ; + warm_A = mkA "lämmin" ; + prompt_A = mkA "nopea" ; + attentive_A = mkA "valpas" ; + inefficient_A = mkA "tehoton" ; + rude_A = mkA "tyly" ; + impersonal_A = mkA "persoonaton" ; + slow_A = mkA "hidas" ; + unattentive_A = mkA "unelias" ; + good_A = mkA "hyvä" ; + great_A = mkA "upea" ; + excellent_A = mkA "erinomainen" ; + bad_A = mkA "huono" ; + awful_A = mkA "kamala" ; + horrible_A = mkA "kauhea" ; + disgusting_A = mkA "vastenmielinen" ; + boring_A = mkA "tylsä" ; + diverse_A = mkA "erilainen" ; + + noAdv_AdV = mkAdV "" ;
+ strongly_AdV = mkAdV "vahvasti" ; + completely_AdV = mkAdV "täysin"; + certainly_AdV = mkAdV "varmasti" ; + honestly_AdV = mkAdV "vilpittömästi" ; + really_AdV = mkAdV "todella" ; + reluctantly_AdV = mkAdV "vastahakoisesti" ; + hardly_AdV = mkAdV "tuskin" ; + +-- but_Conj = ss "vaan" ** {n = Pl} ; + +oper mkAdV : Str -> AdV = \s -> {s = s ; lock_AdV = <>} ; + +} |
