From 494acc41535132472b4287ef8c58f3176de87e8c Mon Sep 17 00:00:00 2001
From: Inari Listenmaa <inari.listenmaa@gmail.com>
Date: Thu, 31 Jan 2019 17:05:16 +0100
Subject: [PATCH] (Pes) Add ExtendPes, so far only GenNP implemented

---
 src/persian/ExtendPes.gf | 17 +++++++++++++++++
 1 file changed, 17 insertions(+)
 create mode 100644 src/persian/ExtendPes.gf

diff --git a/src/persian/ExtendPes.gf b/src/persian/ExtendPes.gf
new file mode 100644
index 000000000..9f657e541
--- /dev/null
+++ b/src/persian/ExtendPes.gf
@@ -0,0 +1,17 @@
+--# -path=.:../common:../abstract:../prelude
+
+concrete ExtendPes of Extend =
+  CatPes ** ExtendFunctor - [
+    GenNP
+    ]
+  with (Grammar=GrammarPes)
+  ** open Prelude, ResPes in {
+
+lin
+  -- NP -> Quant ; -- this man's
+  GenNP np = np ** { 
+    s = \\num => np.s ! NPC bEzafa ; -- the possessed will get aEzafa, possesser is just unmarked; https://sites.la.utexas.edu/persian_online_resources/language-specific-grammar/ezfe/
+    fromPron = True -- not necessarily from Pron, but it should come after the noun, and if fromPron=True, then DetCN places determiner after cn.
+  } ;
+
+}
\ No newline at end of file