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

added pot5art and fixed inflection for large numerals

Browse Source
This commit is contained in:
Krasimir Angelov
2023-08-30 21:03:37 +02:00
parent b72ea1e2f1
commit 28afb4d0dc
4 changed files with 31 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/bulgarian/NumeralBul.gf
+7 -3
View File
@@ -112,7 +112,7 @@ lin pot41 = {
lin pot4 n = {
s = \\c,nf => case n.n of {
Sg => mkCardOrd100 "милион" "милионите" "милионен" ! c ;
Pl => n.s ! NCard (CFFem Indef) ! nf ++ mkCardOrd100 "милиони" "милионите" "милионен" ! c
Pl => n.s ! NCard (CFFem Indef) ! nf ++ mkCardOrd100 "милиона" "милионите" "милионен" ! c
} ;
n = Pl
} ;
@@ -142,10 +142,14 @@ lin pot51 = {
lin pot5 n = {
s = \\c,nf => case n.n of {
Sg => mkCardOrd100 "милиярд" "милиярдите" "милиярден" ! c ;
Pl => n.s ! NCard (CFFem Indef) ! nf ++ mkCardOrd100 "милиярд" "милиярдите" "милиярден" ! c
Pl => n.s ! NCard (CFFem Indef) ! nf ++ mkCardOrd100 "милиярда" "милиярдите" "милиярден" ! c
} ;
n = Pl
} ;
lin pot5art = {
s = \\o,_ => "" ;
n = Sg
} ;
lin pot5plus n1 n2 = {
s = \\o,f => (pot5 n1).s ! o ! f ++ "и" ++ n2.s ! o ! f;
n = Pl
@@ -154,7 +158,7 @@ lin pot5decimal d = {
s = \\c,nf => d.s ! NCard (CFFem Indef) ++
case d.n of {
Sg => mkCardOrd100 "милиярд" "милиярда" "милиярден" ! c ;
Pl => mkCardOrd100 "милиярди" "милиярдите" "милиярден" ! c
Pl => mkCardOrd100 "милиярда" "милиярдите" "милиярден" ! c
} ;
n = Pl
} ;