mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-06-30 02:58:35 -06:00
floating point numerals
This commit is contained in:
@@ -172,6 +172,9 @@ in {
|
||||
isPre = True
|
||||
};
|
||||
|
||||
NumFloat n1 n2 = {s,sp = \\g => n1.s ! NCard g ++ BIND ++ "." ++ BIND ++ n2.s ! NCard g ;
|
||||
size = n1.n; n = Pl };
|
||||
|
||||
NumNumeral nu = {s = \\g => nu.s ! ANomAcc ! (NCard g) ! Formal ;
|
||||
sp = \\g => nu.sp ! ANomAcc ! (NCard g) ! Formal ;
|
||||
n = getNumber nu.size ; size = nu.size };
|
||||
@@ -306,4 +309,4 @@ in {
|
||||
} ;
|
||||
|
||||
|
||||
};
|
||||
};
|
||||
|
||||
Reference in New Issue
Block a user