mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-06-24 02:31:10 -06:00
add correct negation for AP
This commit is contained in:
@@ -292,8 +292,11 @@ oper
|
||||
useV : Verb -> VerbPhrase = \v -> v ** {
|
||||
s = \\vf,pol => verbneg pol ++ v.s ! vf
|
||||
} ;
|
||||
|
||||
|
||||
useComp : Str -> VerbPhrase = \s -> {
|
||||
s = \\vf,pol => verbneg pol ++ s ;
|
||||
} ;
|
||||
useCompN : Str -> VerbPhrase = \s -> {
|
||||
s = \\vf,pol => nounneg pol ++ s ;
|
||||
} ;
|
||||
|
||||
|
||||
Reference in New Issue
Block a user