commit 691b88bd8622a20ce8d280639262e10b19915d41
Author: hectoralos <hectoralos@gmail.com>
Date:   Sun Jul 12 21:01:28 2020 +0300

    disamb n/adj/pp

diff --git a/apertium-frp.frp.rlx b/apertium-frp.frp.rlx
index 0aa89f3..f990abd 100644
--- a/apertium-frp.frp.rlx
+++ b/apertium-frp.frp.rlx
@@ -48,6 +48,9 @@ SET Ant_Cog = Ant OR Cog ;
 LIST Al = al ;
 LIST Acr = acr ;
 
+SET DetDef = (det def) ;
+SET DetInd = (det ind) ;
+
 LIST Fin = pri prs pii ifi pis cni imp ;
 LIST Ind = pri pii ifi ;
 LIST Subjunc = prs pis ;
@@ -149,6 +152,8 @@ LIST Que = "que" ;
 LIST Qui = "qui" ;
 LIST Etre = "étre" ;
 
+SET Barrera_Final_Estrict_SN = EOS OR (":") OR Prep OR Det OR CnjSub OR CnjAdv OR Rel OR Pro ;
+
 SECTION
 
 # mots individuels
@@ -334,6 +339,25 @@ SELECT A IF (-2 Noun_Adj + &&GenderNumber) (-1 ("més") OR ("ples") OR ("peca")
 
 REMOVE A IF (-2 Verb) (-1 Det + &&GenderNumber)  (0 N + &&GenderNumber) (1 Prep OR Rel OR CnjAdv) ;
 
+
+REMOVE A OR PP IF (NOT -2 ("coment")) (-1 Det + &&GenderNumber) (0 Noun_Adj_PP + &&GenderNumber LINK 0 N OR NP) (1 Barrera_Final_Estrict_SN OR Ant_Cog) ;
+REMOVE A OR PP IF (NOT -3 ("coment")) (-2 Det + &&GenderNumber) (-1 Num OR A LINK NOT 0 N) (0 Noun_Adj_PP + &&GenderNumber LINK 0 N OR NP) (1 Barrera_Final_Estrict_SN OR Ant_Cog) ;
+REMOVE A OR PP IF (NOT -2 ("coment")) (-1 Det + &&GenderNumber) (0 Noun_Adj_PP + &&GenderNumber LINK 0 N OR NP) (1C Verb) ;
+REMOVE A OR PP IF (NOT -3 ("coment")) (-2 Det + &&GenderNumber) (-1 Num OR A LINK NOT 0 N) (0 Noun_Adj_PP + &&GenderNumber LINK 0 N OR NP) (1C Verb) ;
+REMOVE A OR PP IF (NOT -2 ("coment")) (-1 Det + &&GenderNumber) (0 Noun_Adj_PP + &&GenderNumber LINK 0 N OR NP) (1 Ser) ;
+REMOVE A OR PP IF (NOT -3 ("coment")) (-2 Det + &&GenderNumber) (-1 Num OR A LINK NOT 0 N) (0 Noun_Adj_PP + &&GenderNumber LINK 0 N OR NP) (1 Ser) ;
+REMOVE A OR PP IF (NOT -2 ("coment")) (-1 Det + &&GenderNumber) (0 Noun_Adj_PP + &&GenderNumber LINK 0 N OR NP) (1 CM OR CnjCoo) (2 Barrera_Final_Estrict_SN) ;
+REMOVE A OR PP IF (NOT -3 ("coment")) (-2 Det + &&GenderNumber) (-1 Num OR A LINK NOT 0 N) (0 Noun_Adj_PP + &&GenderNumber LINK 0 N OR NP) (1 CM OR CnjCoo) (2 Barrera_Final_Estrict_SN) ;
+REMOVE A OR PP IF (NOT -2 ("coment")) (-1 Num) (0 Noun_Adj_PP LINK 0 N OR NP) (1 CM OR CnjCoo) (2 Barrera_Final_Estrict_SN) ;
+
+REMOVE A OR PP IF (-2 ("coment")) (-1 Det + &&GenderNumber) (0 Noun_Adj_PP + &&GenderNumber LINK 0 N OR NP) (1 Barrera_Final_Estrict_SN OR Ant_Cog) (NOT -1 DetDef) ;
+REMOVE A OR PP IF (-2 ("coment")) (-1 Det + &&GenderNumber) (0 Noun_Adj_PP + &&GenderNumber LINK 0 N OR NP) (1C Verb) (NOT -1 DetDef) ;
+REMOVE A OR PP IF (-2 ("coment")) (-1 Det + &&GenderNumber) (0 Noun_Adj_PP + &&GenderNumber LINK 0 N OR NP) (1 Ser) (NOT -1 DetDef) ;
+REMOVE A OR PP IF (-2 ("coment")) (-1 Det + &&GenderNumber) (0 Noun_Adj_PP + &&GenderNumber LINK 0 N OR NP) (1 CM OR CnjCoo) (2 Barrera_Final_Estrict_SN) (NOT -1 DetDef) ;
+
+REMOVE A OR PP IF (NOT -2 ("coment")) (-1 Det + &&GenderNumber) (0 Noun_Adj_PP + &&GenderNumber LINK 0 N OR NP) (1 Adv) (2 Adj_PP + &&GenderNumber) ;
+
+
 # mots individuels (mais après la selection n/adj)
 
 REMOVE ("franc") IF (0C N) (0 ("Franc_poplo")) ;