forked from GitHub/gf-core
refinements-2010-12-16
This commit is contained in:
@@ -170,7 +170,7 @@ oper
|
||||
(bhao) (bhao) (bhao)
|
||||
Masc ;
|
||||
----2 Determiners
|
||||
IDeterminer = {s:Gender => Str ; n : Number};
|
||||
IDeterminer = {s:Gender => Case => Str ; n : Number};
|
||||
makeDet : Str -> Str -> Str -> Str -> Number -> Determiner = \s1,s2,s3,s4,n -> {
|
||||
s = table {
|
||||
Sg => table {
|
||||
@@ -188,11 +188,37 @@ oper
|
||||
|
||||
makeIDet : Str -> Str -> Number -> IDeterminer = \s1,s2,n -> {
|
||||
s = table {
|
||||
Masc => s1;
|
||||
Fem => s2
|
||||
Masc => table {_ =>s1};
|
||||
Fem => table {_ =>s2}
|
||||
};
|
||||
n = n
|
||||
};
|
||||
};
|
||||
|
||||
-- IQuant
|
||||
|
||||
makeIQuant : Str -> {s : Number => Gender => Case => Str} = \str -> {
|
||||
s = table {
|
||||
Sg => table {
|
||||
Masc => table {
|
||||
Dir => str ++ "سا" ;
|
||||
_ => str ++ "سے"
|
||||
|
||||
};
|
||||
Fem => table {
|
||||
_ => str ++ "سی"
|
||||
}
|
||||
};
|
||||
Pl => table {
|
||||
Masc => table {
|
||||
_ => str ++ "سے"
|
||||
};
|
||||
Fem => table {
|
||||
_ => str ++ "سی"
|
||||
}
|
||||
}
|
||||
}
|
||||
};
|
||||
|
||||
|
||||
-- Proposition
|
||||
|
||||
@@ -379,7 +405,7 @@ oper
|
||||
<Imperf,Pers2_Respect,Pl,Fem> => root+"تیں";
|
||||
<Imperf,_,Sg,Masc> => root+"تا";
|
||||
<Imperf,_,Sg,Fem> => root+"تی";
|
||||
<Imperf,_,Pl,Masc> => root+"تع";
|
||||
<Imperf,_,Pl,Masc> => root+"تے";
|
||||
<Imperf,_,Pl,Fem> => root+"تیں"
|
||||
}
|
||||
|
||||
|
||||
Reference in New Issue
Block a user