msyds/gf-rgl
1
0
Fork 0
forked from GitHub/gf-rgl
Code Pull Requests Activity

(Ger) oper asQuant in StructuralGer removed

Browse Source
This commit is contained in:
Hans Leiss
2023-12-27 11:18:50 +01:00
parent 21db782ef5
commit 5520f7b081
1 changed files with 0 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/german/StructuralGer.gf
View File

@@ -167,8 +167,6 @@ concrete StructuralGer of Structural = CatGer **
lin language_title_Utt = ss "Deutsch" ; lin language_title_Utt = ss "Deutsch" ;
oper oper
asQuant : (Gender => Case => Str) -> (Bool => Gender => Case => Str) =
\tab -> \\_,g,c => tab ! g ! c ;
asNum : (Gender => Case => Str) -> (Gender => Case => {quant,num:Str}) = asNum : (Gender => Case => Str) -> (Gender => Case => {quant,num:Str}) =
\tab -> \\g,c => {quant = []; num = tab ! g ! c} ; \tab -> \\g,c => {quant = []; num = tab ! g ! c} ;
pairTable : (Gender => Case => Str) -> (Gender => Case => Str) -> (Gender => Case => {quant,num:Str}) pairTable : (Gender => Case => Str) -> (Gender => Case => Str) -> (Gender => Case => {quant,num:Str})