summaryrefslogtreecommitdiff
path: root/old-examples/wiki/LexRestaurantFin.gf
diff options
context:
space:
mode:
authoraarne <aarne@cs.chalmers.se>2008-06-25 16:54:35 +0000
committeraarne <aarne@cs.chalmers.se>2008-06-25 16:54:35 +0000
commite9e80fc389365e24d4300d7d5390c7d833a96c50 (patch)
treef0b58473adaa670bd8fc52ada419d8cad470ee03 /old-examples/wiki/LexRestaurantFin.gf
parentb96b36f43de3e2f8b58d5f539daa6f6d47f25870 (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.gf70
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 = <>} ;
+
+}