From 55f8a80df7f9591475af5e42b2f50ced55d51d30 Mon Sep 17 00:00:00 2001
From: aarne <aarne@chalmers.se>
Date: Sun, 28 Mar 2010 20:13:46 +0000
Subject: version 0.2 of phrasebook

---
 examples/phrasebook/WordsIta.gf | 51 +++++++++++++++++++++++++++++++++++++++++
 1 file changed, 51 insertions(+)
 create mode 100644 examples/phrasebook/WordsIta.gf

(limited to 'examples/phrasebook/WordsIta.gf')

diff --git a/examples/phrasebook/WordsIta.gf b/examples/phrasebook/WordsIta.gf
new file mode 100644
index 000000000..a8caf0d58
--- /dev/null
+++ b/examples/phrasebook/WordsIta.gf
@@ -0,0 +1,51 @@
+-- (c) 2009 Ramona Enache and Aarne Ranta under LGPL
+
+concrete WordsIta of Words = SentencesIta ** open
+  SyntaxIta,
+  DiffPhrasebookIta,
+  BeschIta,
+  ParadigmsIta in {
+
+lin
+
+Wine = mkCN (mkN "vino") ;
+    Beer = mkCN (mkN "birra") ;
+    Water = mkCN (mkN "acqua") ;
+    Coffee = mkCN (mkN "caffè") ;
+    Tea = mkCN (mkN "té") ; ----
+
+Cheese = mkCN (mkN "formaggio") ;
+Fish = mkCN (mkN "pesce") ;
+Pizza = mkCN (mkN "pizza") ;
+
+Itash = mkAP (mkA "frasco") ;
+Warm = mkAPA "caldo" ;
+Italian = mkAPA "italiano" ;
+Expensive = mkAPA "caro" ;
+Delicious = mkAPA "delizioso" ;
+Boring = mkAPA "noioso" ;
+
+    Restaurant = mkCN (mkN "ristorante") ;
+    Bar = mkCN (mkN "bar") ;
+    Toilet = mkCN (mkN "bagno") ;
+
+    Euro = mkCN (mkN "euro" "euro" masculine) ;
+    Dollar = mkCN (mkN "dollar") ;
+    Lei = mkCN (mkN "lei") ; ---- ?
+
+    AWant p obj = mkCl p want_V2 obj ;
+    ALike p item = mkCl item (mkV2 (mkV (piacere_64 "piacere")) dative) p ;
+    AHave p kind = mkCl p have_V2 (mkNP kind) ;
+    ASpeak p lang = mkCl p  (mkV2 (mkV "parlare")) lang ;
+    ALove p q = mkCl p (mkV2 (mkV "amare")) q ;
+
+    English = mkNP (mkPN "inglese") ;
+    Finnish = mkNP (mkPN "finnico") ;
+    Itanch = mkNP (mkPN "francese") ; 
+    Romanian = mkNP (mkPN "romano") ;
+    Swedish = mkNP (mkPN "svedese") ;
+
+oper
+mkAPA : (_ : Str) -> AP = \x -> mkAP (mkA x) ;
+
+}
-- 
cgit v1.2.3