GitHub/gf-rgl
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-rgl.git synced 2026-06-21 01:06:21 -06:00
Code Issues Packages Projects Releases Wiki Activity

allow for negated CAdv

Browse Source
This commit is contained in:
Krasimir Angelov
2018-07-15 10:55:03 +02:00
parent 4c203cfd81
commit 19e8bab1a4
6 changed files with 16 additions and 15 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
src/english/StructuralEng.gf
View File

@@ -1,6 +1,5 @@
concrete StructuralEng of Structural = CatEng **
open MorphoEng, ResEng, ParadigmsEng, MakeStructuralEng,
(C = ConstructX), Prelude in {
open MorphoEng, ResEng, ParadigmsEng, MakeStructuralEng, Prelude in {
flags optimize=all ;
@@ -73,9 +72,9 @@ concrete StructuralEng of Structural = CatEng **
i_Pron = mkPron "I" "me" "my" "mine" singular P1 human ;
in_Prep = mkPrep "in" ;
it_Pron = mkPron "it" "it" "its" "its" singular P3 nonhuman ;
less_CAdv = C.mkCAdv "less" "than" ;
less_CAdv = mkCAdv "less" "no less" "than" ;
many_Det = mkDeterminer plural "many" ;
more_CAdv = C.mkCAdv "more" "than" ;
more_CAdv = mkCAdv "more" "no more" "than" ;
most_Predet = ss "most" ;
much_Det = mkDeterminer singular "much" ;
must_VV = {
@@ -153,7 +152,7 @@ concrete StructuralEng of Structural = CatEng **
except_Prep = mkPrep "except" ;
as_CAdv = C.mkCAdv "as" "as" ;
as_CAdv = mkCAdv "as" "not as" "as" ;
have_V2 = dirV2 (mk5V "have" "has" "had" "had" "having") ;
that_Subj = ss "that" ;