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

floating point numerals

Browse Source
This commit is contained in:
Krasimir Angelov
2023-07-24 20:06:01 +02:00
parent cb26429655
commit 5d912f78a4
17 changed files with 50 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/russian/NounRus.gf
+2
View File
@@ -87,6 +87,8 @@ lin
-- : Digits -> Card ; -- 51
NumDigits n = {s = \\_,_,_ => n.s ; size = n.size } ;
NumFloat n1 n2 = {s = \\_,_,_ => n1.s ++ BIND ++ "." ++ BIND ++ n2.s ; size = n1.size } ;
-- : Quant -> Num -> Det ; -- these five
DetQuant quant num = {
s=\\g,anim,cas => quant.s ! (gennum g (numSizeNumber num.size)) ! anim ! cas ++ num.s ! g ! anim ! cas ;