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

(Eng) Remove more+most from inflection table of A*

Browse Source 
A* has a parameter and the string more/most is added later if needed.
This commit is contained in:
Inari Listenmaa
2021-06-17 20:26:55 +08:00
parent 60533ef002
commit 70eee40ae8
7 changed files with 51 additions and 26 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/english/CatEng.gf
+4 -4
View File
@@ -97,8 +97,8 @@ concrete CatEng of Cat = CommonX - [Pol,CAdv] ** open ResEng, Prelude in {
VV = {s : VVForm => Str ; p : Str ; typ : VVType} ;
V2V = Verb ** {c2,c3 : Str ; typ : VVType} ;
A = {s : AForm => Str ; isPre : Bool} ;
A2 = {s : AForm => Str ; c2 : Str ; isPre : Bool} ;
A = ResEng.Adjective ;
A2 = ResEng.Adjective ** {c2 : Str} ;
N = {s : Number => Case => Str ; g : Gender} ;
N2 = {s : Number => Case => Str ; g : Gender} ** {c2 : Str} ;
@@ -118,8 +118,8 @@ concrete CatEng of Cat = CommonX - [Pol,CAdv] ** open ResEng, Prelude in {
VV = \s -> {s = \\_ => s; p = ""; isRefl = False; typ = VVInf} ;
V2V = \s -> {s = \\_ => s; p = ""; isRefl = False; c2,c3="" ; typ = VVInf} ;
A = \s -> {s = \\_ => s; isPre = True} ;
A2 = \s -> {s = \\_ => s; c2 = ""; isPre = True} ;
A = \s -> {s = \\_ => s; isPre = True ; isMost = False} ;
A2 = \s -> {s = \\_ => s; c2 = ""; isPre = True ; isMost = False} ;
N = \s -> {s = \\_,_ => s; g = Neutr} ;
N2 = \s -> {s = \\_,_ => s; c2 = ""; g = Neutr} ;