Spanish partitive; German VP conj zu

This commit is contained in:
aarne
2006-12-13 21:10:11 +00:00
parent d0e784e699
commit ed4bf5c52f
7 changed files with 19 additions and 12 deletions

View File

@@ -38,10 +38,14 @@ instance DiffSpa of DiffRomance = open CommonRomance, PhonoSpa, BeschSpa, Prelud
possCase = \_,_,c -> prepCase c ;
partitive = \_,c -> prepCase c ;
{-
partitive = \g,c -> case c of {
CPrep P_de => "de" ;
_ => prepCase c ++ artDef g Sg (CPrep P_de)
} ;
-}
conjunctCase : NPForm -> NPForm = \c -> case c of {
Ton Nom | Aton Nom => Ton Nom ;