French almost complete (reflexives, ordinals missing)

This commit is contained in:
aarne
2006-01-23 17:49:09 +00:00
parent 7364373223
commit a9191c404f
14 changed files with 73 additions and 177 deletions

View File

@@ -12,25 +12,24 @@ incomplete concrete AdjectiveRomance of Adjective =
isPre = False
} ;
{-
-- $SuperlA$ belongs to determiner syntax in $Noun$.
ComplA2 a np = {
s = \\ap => a.s ! AF (APosit ap) Nom ++ a.c2 ++ np.s ! accusative ;
ComplA2 adj np = {
s = \\af => adj.s ! Posit ! af ++ appCompl adj.c2 np.s ;
isPre = False
} ;
{-
ReflA2 a = {
s = \\ap => a.s ! AF (APosit ap) Nom ++ a.c2 ++
reflPron (agrP3 Utr Sg) ; ----
isPre = False
} ;
-}
SentAP ap sc = {
s = \\a => ap.s ! a ++ sc.s ;
s = \\a => ap.s ! a ++ sc.s ; --- mood
isPre = False
} ;
-}
AdAP ada ap = {
s = \\a => ada.s ++ ap.s ! a ;
isPre = ap.isPre