From 65fd6edb6c57d4aed46f91d727ccf3b86b9bc982 Mon Sep 17 00:00:00 2001
From: aarne <aarne@cs.chalmers.se>
Date: Tue, 10 Oct 2006 16:43:41 +0000
Subject: started disambiguation example

---
 examples/disamb/ConversationEng.gf | 23 +++++++++++++++++++++++
 1 file changed, 23 insertions(+)
 create mode 100644 examples/disamb/ConversationEng.gf

(limited to 'examples/disamb/ConversationEng.gf')

diff --git a/examples/disamb/ConversationEng.gf b/examples/disamb/ConversationEng.gf
new file mode 100644
index 000000000..127ec54bd
--- /dev/null
+++ b/examples/disamb/ConversationEng.gf
@@ -0,0 +1,23 @@
+--# -path=.:prelude
+
+concrete ConversationEng of Conversation = open Prelude in {
+
+  lincat 
+    Q, NP, A = {s : Str} ;
+    Gender, Number, Politeness = {s : Str} ;
+
+  lin
+    PredA np a = ss ("are" ++ np.s ++ a.s) ;
+
+    GMasc = ss (optStr "man") ;
+    GFem  = ss (optStr "woman") ;
+    NSg   = ss (optStr "one") ;
+    NPl   = ss (optStr "many") ;
+    PFamiliar = ss (optStr "friend") ;
+    PPolite   = ss (optStr "respected") ;
+
+    You n p g = ss ("you" ++ n.s ++ p.s ++ g.s) ;
+
+    Ready = ss "ready" ;
+
+}
-- 
cgit v1.2.3