rearranging resource-1.0

This commit is contained in:
aarne
2005-12-01 21:18:42 +00:00
parent c3756fddd1
commit 3400486b5e
69 changed files with 2 additions and 2 deletions

View File

@@ -0,0 +1,27 @@
resource ParamX = {
param
Number = Sg | Pl ;
Person = P1 | P2 | P3 ;
Degree = Posit | Compar | Superl ;
Anteriority = Simul | Anter ;
Tense = Pres | Past | Fut | Cond ;
Polarity = Pos | Neg ;
QForm = QDir | QIndir ;
oper
conjNumber : Number -> Number -> Number = \m,n ->
case <m,n> of {
<Sg,Sg> => Sg ;
_ => Pl
} ;
-- For persons, we let the latter argument win ("either you or I am absent"
-- but "either I or you are absent"). This is not quite clear.
conjPerson : Person -> Person -> Person = \_,p ->
p ;
}