forked from GitHub/gf-rgl
added Extend.AdAdV in Eng,Swe,Bul
This commit is contained in:
@@ -2,6 +2,8 @@
|
|||||||
concrete ExtendBul of Extend = CatBul ** open Prelude, ResBul in {
|
concrete ExtendBul of Extend = CatBul ** open Prelude, ResBul in {
|
||||||
|
|
||||||
lin
|
lin
|
||||||
|
AdAdV = cc2 ;
|
||||||
|
|
||||||
EmptyRelSlash slash = {
|
EmptyRelSlash slash = {
|
||||||
s = \\t,a,p,agr => slash.c2.s ++ whichRP ! agr.gn ++ slash.s ! agr ! t ! a ! p ! Main ;
|
s = \\t,a,p,agr => slash.c2.s ++ whichRP ! agr.gn ++ slash.s ! agr ! t ! a ! p ! Main ;
|
||||||
role = RObj Acc
|
role = RObj Acc
|
||||||
|
|||||||
@@ -282,6 +282,8 @@ concrete ExtendEng of Extend =
|
|||||||
|
|
||||||
|
|
||||||
lin
|
lin
|
||||||
|
AdAdV = cc2 ;
|
||||||
|
|
||||||
AdjAsCN ap = let cn = mkNoun "one" "one's" "ones" "ones'" ** {g = Neutr}
|
AdjAsCN ap = let cn = mkNoun "one" "one's" "ones" "ones'" ** {g = Neutr}
|
||||||
in {
|
in {
|
||||||
s = \\n,c => preOrPost ap.isPre (ap.s ! agrgP3 n cn.g) (cn.s ! n ! c) ;
|
s = \\n,c => preOrPost ap.isPre (ap.s ! agrgP3 n cn.g) (cn.s ! n ! c) ;
|
||||||
|
|||||||
@@ -7,7 +7,7 @@ concrete ExtendSwe of Extend = CatSwe **
|
|||||||
MkVPI, BaseVPI, ConsVPI, ConjVPI, ComplVPIVV,
|
MkVPI, BaseVPI, ConsVPI, ConjVPI, ComplVPIVV,
|
||||||
MkVPS, BaseVPS, ConsVPS, ConjVPS, PredVPS,
|
MkVPS, BaseVPS, ConsVPS, ConjVPS, PredVPS,
|
||||||
ICompAP,
|
ICompAP,
|
||||||
PositAdVAdj, PresPartAP, PastPartAP, PastPartAgentAP,
|
AdAdV, PositAdVAdj, PresPartAP, PastPartAP, PastPartAgentAP,
|
||||||
RNP, RNPList, ReflRNP, ReflPron, ReflPoss, PredetRNP, ConjRNP,
|
RNP, RNPList, ReflRNP, ReflPron, ReflPoss, PredetRNP, ConjRNP,
|
||||||
Base_rr_RNP, Base_nr_RNP, Base_rn_RNP, Cons_rr_RNP, Cons_nr_RNP,
|
Base_rr_RNP, Base_nr_RNP, Base_rn_RNP, Cons_rr_RNP, Cons_nr_RNP,
|
||||||
CompoundN
|
CompoundN
|
||||||
@@ -152,6 +152,8 @@ concrete ExtendSwe of Extend = CatSwe **
|
|||||||
} ;
|
} ;
|
||||||
|
|
||||||
lin
|
lin
|
||||||
|
AdAdV = cc2 ;
|
||||||
|
|
||||||
PositAdVAdj a = {s = a.s ! AAdv} ;
|
PositAdVAdj a = {s = a.s ! AAdv} ;
|
||||||
|
|
||||||
PresPartAP vp = {
|
PresPartAP vp = {
|
||||||
|
|||||||
Reference in New Issue
Block a user