forked from GitHub/gf-core
some missing functions in wide-coverage Dut and Ger added
This commit is contained in:
@@ -144,7 +144,14 @@ lin
|
||||
lin
|
||||
that_RP = which_RP ;
|
||||
|
||||
---- UttAdV adv = adv;
|
||||
UttAdV adv = adv ;
|
||||
|
||||
ApposNP np1 np2 = {
|
||||
s = \\c => np1.s ! c ++ SOFT_BIND ++ "," ++ np2.s ! NPNom ;
|
||||
a = np1.a ;
|
||||
isPron = False
|
||||
} ;
|
||||
|
||||
AdAdV = cc2 ;
|
||||
|
||||
}
|
||||
|
||||
@@ -158,6 +158,17 @@ lin
|
||||
|
||||
UttAdV adv = adv;
|
||||
|
||||
ApposNP np1 np2 = {
|
||||
s = \\c => np1.s ! c ++ bigNP np1 ++ SOFT_BIND ++ "," ++ np2.s ! NPNom ;
|
||||
ext = np2.ext ;
|
||||
rc = np2.rc ;
|
||||
adv = np2.adv ;
|
||||
a = np1.a ;
|
||||
isPron = False
|
||||
} ;
|
||||
|
||||
AdAdV = cc2 ;
|
||||
|
||||
DirectComplVS t np vs utt =
|
||||
mkS (lin Adv (optCommaSS utt)) (mkS t positivePol (mkCl np (lin V vs))) ;
|
||||
|
||||
|
||||
Reference in New Issue
Block a user