refinements-2011-05-10

1 files changed, 11 insertions, 2 deletions

diff --git a/examples/phrasebook/SentencesUrd.gf b/examples/phrasebook/SentencesUrd.gf
index e4040f2ab..be3538ba3 100644
--- a/examples/phrasebook/SentencesUrd.gf
+++ b/examples/phrasebook/SentencesUrd.gf
@@ -1,4 +1,13 @@
-concrete SentencesUrd of Sentences =  NumeralUrd ** SentencesI - [sing] with 
+concrete SentencesUrd of Sentences =  NumeralUrd ** SentencesI - [sing,YouFamFemale] with 
   (Syntax = SyntaxUrd),
   (Symbolic = SymbolicUrd),
-  (Lexicon = LexiconUrd) ;
+  (Lexicon = LexiconUrd)  **
+  open
+  (S=SyntaxUrd),
+  (P=ParadigmsUrd) in {
+lin YouFamFemale = mkPersonUrd youSg_Pron "تیری" ;
+  
+oper   
+  mkPersonUrd : Pron -> Str -> {name : NP ; isPron : Bool ; poss : Quant} = \p,s -> 
+    {name = mkNP (P.mkN s) ; isPron = True ; poss = mkQuant p} ;
+  } ;