1
0
forked from GitHub/gf-core

romance under reconstruction

This commit is contained in:
aarne
2005-02-10 21:31:52 +00:00
parent a26eb8613c
commit bb6fe789bf
14 changed files with 366 additions and 270 deletions

View File

@@ -88,8 +88,7 @@ oper
negVerb = \va -> elisNe ++ va ++ "pas" ;
copula = \b,w -> let etre = (predVerb verbEtre).s in
etre ! b ! Masc ! w ;
copula = verbEtre ;
isClitCase = \c -> case c of {
Acc => True ;
@@ -161,7 +160,7 @@ oper
} ;
-- Questions
{- ----
questVerbPhrase = \jean,dort ->
{s = table {
DirQ => optStr (estCeQue Acc) ++ (predVerbPhrase jean dort).s ! Ind ;
@@ -211,7 +210,7 @@ oper
IndirQ => quand.s ++ jeandort
}
} ;
-}
----- moved from Morpho
--2 Articles