VPI chunks linearized ; nouns with ión in Spanish and zione in Italian marked as feminine

lib/src/chunk/ChunkBul.gf

@@ -8,6 +8,7 @@ concrete ChunkBul of Chunk = CatBul, ExtensionsBul [VPS,VPI] **
     SyntaxBul, (E = ExtensionsBul), Prelude, 
     ResBul, MorphoFunsBul, (P = ParadigmsBul) in {
 
+lin VPI_Chunk vpi = {s = vpi.s ! {gn = GSg allGender ; p = P3}} ;
 
 lin CN_Pl_Chunk, CN_Pl_Gen_Chunk = \cn -> {s = cn.s ! (NF Pl allSpecies | NFPlCount)} ;
 lin CN_Sg_Chunk, CN_Sg_Gen_Chunk = \cn -> {s = cn.s ! (NF Sg allSpecies | NFSgDefNom)} ;

lib/src/chunk/ChunkChi.gf

@@ -24,6 +24,8 @@ lin
   NP_Acc_Chunk np = np ;
   NP_Gen_Chunk np = ss (np.s ++ de_s) ;
 
+  VPI_Chunk vpi = vpi ;
+
   copula_inf_Chunk = ss copula_s ;
 
   refl_SgP1_Chunk = ss reflPron ;

lib/src/chunk/ChunkEng.gf

@@ -8,6 +8,8 @@ lin
   NP_Acc_Chunk np = ss (np.s ! R.NPAcc) ;
   NP_Gen_Chunk np = ss (np.s ! R.NCase R.Gen) | ss (np.s ! R.NPNomPoss) ;
 
+  VPI_Chunk vpi = {s = vpi.s ! (R.VVInf | R.VVPresPart) ! R.AgP3Sg R.Masc} ; ----
+
 oper
   emptyNP = mkNP (P.mkPN []) ;
 

lib/src/chunk/ChunkFin.gf

@@ -11,6 +11,8 @@ lin
   NP_Acc_Chunk np = ss (np.s ! NPAcc) ;
   NP_Gen_Chunk np = ss (np.s ! NPCase Gen) ;
 
+  VPI_Chunk vpi = {s = vpi.s ! (VVIllat | VVInf)} ;
+
 lin
   copula_inf_Chunk = ss "olla" ;
 

lib/src/chunk/ChunkFre.gf

@@ -12,6 +12,8 @@ lin
   NP_Acc_Chunk np = ss (np.s ! Acc).ton ;
   NP_Gen_Chunk np = ss (np.s ! genitive).comp ;
 
+  VPI_Chunk vpi = vpi ;
+
 oper
   emptyNP = mkNP (P.mkPN []) ;
 

lib/src/chunk/ChunkGer.gf

@@ -11,6 +11,8 @@ lin
   NP_Acc_Chunk np = ss (np.s ! NPC Acc) ;
   NP_Gen_Chunk np = ss (np.s ! NPC Gen) ;
 
+  VPI_Chunk vpi = {s = vpi.s ! (True | False)} ;
+
 lin
   copula_inf_Chunk = ss "sein" ;
 

lib/src/chunk/ChunkHin.gf

@@ -17,6 +17,8 @@ lin
   NP_Acc_Chunk np = mkUtt np ;
   NP_Gen_Chunk np = mkUtt (mkAdv possess_Prep np) ;
 
+----  VPI_Chunk vpi = vpi ;
+
   copula_inf_Chunk = pss " है " ;
 
   refl_SgP1_Chunk,

lib/src/chunk/ChunkIta.gf

@@ -12,6 +12,8 @@ lin
   NP_Acc_Chunk np = ss (np.s ! Acc).ton ;
   NP_Gen_Chunk np = ss (np.s ! genitive).comp ;
 
+  VPI_Chunk vpi = vpi ;
+
 oper
   emptyNP = mkNP (P.mkPN []) ;
 

lib/src/chunk/ChunkSpa.gf

@@ -12,6 +12,8 @@ lin
   NP_Acc_Chunk np = ss (np.s ! Acc).ton ;
   NP_Gen_Chunk np = ss (np.s ! genitive).comp ;
 
+  VPI_Chunk vpi = vpi ;
+
 oper
   emptyNP = mkNP (P.mkPN []) ;
 

lib/src/chunk/ChunkSwe.gf

@@ -8,6 +8,8 @@ lin
   NP_Acc_Chunk np = ss (np.s ! C.NPAcc) ;
   NP_Gen_Chunk np = ss (np.s ! C.NPPoss (C.GSg C.Utr) C.Nom) ;
 
+  VPI_Chunk vpi = {s = optStr "att" ++ vpi.s ! R.VPIInf ! R.agrP3 (C.Utr | C.Neutr) C.Sg} ;
+
 oper
   emptyNP = mkNP (P.mkPN []) ;