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

added gender to nouns

Browse Source
This commit is contained in:
Krasimir Angelov
2026-04-22 13:25:04 +02:00
parent 4a3e30a1cd
commit 41e3b8280b
3 changed files with 351 additions and 176 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
src/faroese/DocumentationFao.gf
View File

@@ -10,7 +10,11 @@ lincat
lin
InflectionN,InflectionN2,InflectionN3 = \x -> {
t="n" ;
s1="" ;
s1 = heading1 ("Noun" ++ case x.g of {
Neutr => "(neuter)";
Masc => "(masc)";
Fem => "(fem)"
}) ;
s2=frameTable (
tr (intagAttr "th" "colspan=\"2\"" "" ++ th "Indef" ++ th "Def") ++
tr (intagAttr "th" "rowspan=\"4\"" "Sg" ++

510
src/faroese/MorphoFao.gf
View File

File diff suppressed because it is too large Load Diff

11
src/faroese/ResFao.gf
View File

@@ -3,10 +3,10 @@ resource ResFao = {
param Species = Indef | Def ;
param Number = Sg | Pl ;
param Case = Nom | Acc | Dat | Gen ;
param Gender = Neutr | Fem | Masc ;
oper Noun = {s: Species => Number => Case => Str} ; -- 2135
oper mkNoun : (_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_ : Str) -> Noun =
\f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,f14,f15,f16 ->
param Gender = Masc | Fem | Neutr ;
oper Noun = {s: Species => Number => Case => Str; g : Gender} ; -- 2135
oper mkNoun : (_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_ : Str) -> Gender -> Noun =
\f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,f14,f15,f16,g ->
{ s = table {
Indef => table {
Sg => table {
@@ -36,7 +36,8 @@ oper mkNoun : (_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_ : Str) -> Noun =
Gen => f16
}
}
}
} ;
g = g
} ;