20071202_AD

This commit is contained in:
ali.eldada
2007-12-02 20:59:45 +00:00
parent e7b03c9446
commit 01e50c45e4
8 changed files with 85 additions and 35 deletions

View File

@@ -48,7 +48,8 @@ concrete CatAra of Cat = CommonX - [Utt] ** open ResAra, Prelude, ParamX in {
NP, Pron = ResAra.NP; --{s : Case => Str ; a : Agr } ;
Num, Ord = {s : Gender => State => Case => Str ;
n : Size };
Predet, QuantSg, QuantPl =
Predet = ResAra.Predet ;
QuantSg, QuantPl =
{s : Species => Gender => Case => Str;
n : ResAra.Number; d : State; isNum : Bool} ;
Det = ResAra.Det ;
@@ -87,6 +88,6 @@ concrete CatAra of Cat = CommonX - [Utt] ** open ResAra, Prelude, ParamX in {
N, N2 = ResAra.Noun ; --{s : ResAra.Number => State => Case => Str; g : Gender ; h = Species} ;
-- N2 = {s : ResAra.Number => Case => Str} ** {c2 : Str} ;
N3 = ResAra.Noun ** {c2,c3 : Str} ;
PN = {s : Case => Str} ;
PN = {s : Case => Str; g : Gender; h : Species} ;
}