agreement in German Predet

This commit is contained in:
aarne
2010-01-05 13:35:24 +00:00
parent ae7a568c07
commit 1125dabaf8
5 changed files with 39 additions and 14 deletions

View File

@@ -46,8 +46,14 @@ resource ResGer = ParamX ** open Prelude in {
param NPForm = NPCase Case | NPPoss GenNum Case ;
-- Predeterminers sometimes require a case ("ausser mir"), sometimes not ("nur ich").
-- A number is sometimes inherited ("alle Menschen"),
-- sometimes forced ("jeder von Mwnschen").
param PredetCase = NoCase | PredCase Case ;
param
PredetCase = NoCase | PredCase Case ;
PredetAgr = PAg Number | PAgNone ;
oper
noCase : {p : Str ; k : PredetCase} = {p = [] ; k = NoCase} ;
--2 For $Adjective$