romance Inf ; %, included

This commit is contained in:
aarne
2005-05-26 13:18:17 +00:00
parent 0cc8911950
commit 63ee4ef12d
10 changed files with 522 additions and 490 deletions

View File

@@ -161,6 +161,16 @@ incomplete concrete ClauseRomance of Clause = CategoriesRomance **
QPredAdv subj adv =
sats2quest (mkSatsCopula (intNounPhrase subj) adv.s) ;
----- anteriority _ ; gender and number of Adj
IPredV _ v =
sats2verbPhrase (mkSats pronImpers v) ;
IPredV2 _ v y =
sats2verbPhrase (mkSatsObject pronImpers v y) ;
IPredAP _ adj =
sats2verbPhrase (mkSatsCopula pronImpers (adj.s ! AF Masc Sg)) ;
{-
-- Use VPs