mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-06-30 11:08:35 -06:00
(Pes) WIP: more fine-grained rules about definiteness in NPs
This commit is contained in:
@@ -135,7 +135,8 @@ oper
|
||||
--------------------
|
||||
BaseQuant : Type = {
|
||||
mod : Mod ;
|
||||
isNeg : Bool
|
||||
isNeg : Bool ;
|
||||
isDef : Bool
|
||||
} ;
|
||||
|
||||
Determiner : Type = BaseQuant ** {
|
||||
@@ -146,13 +147,13 @@ oper
|
||||
} ;
|
||||
|
||||
Quant : Type = BaseQuant ** {
|
||||
s : Number => CmpdStatus => Str ;
|
||||
isDef : Bool } ;
|
||||
s : Number => CmpdStatus => Str} ;
|
||||
|
||||
makeDet : Str -> Number -> (isNum, isNeg : Bool) -> Determiner = \str,n,isNum,isNeg -> {
|
||||
s,sp = str;
|
||||
isNum = isNum;
|
||||
isNum = isNum ;
|
||||
isNeg = isNeg ;
|
||||
isDef = True ;
|
||||
mod = Bare ;
|
||||
n = n
|
||||
};
|
||||
|
||||
Reference in New Issue
Block a user