mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-10-28 18:13:17 -06:00
extended Numerals API. moved from the WordNet grammar
This commit is contained in:
1 parent
96f4543c4c
commit
b066fb4d35
29 files changed
+351
-69
No files matched your search
@@ -21,6 +21,8 @@ lincat Sub10 = LinDigit ;
|
||||
lincat Sub100 = LinNumeral ;
|
||||
lincat Sub1000 = LinNumeral ;
|
||||
lincat Sub1000000 = LinNumeral ;
|
||||
lincat Sub1000000000 = LinNumeral ;
|
||||
lincat Sub1000000000000 = LinNumeral ;
|
||||
|
||||
oper mkNum : Determiner -> Str -> Str -> Str -> LinDigit =
|
||||
\dva, dvanast, dvadsat, dveste -> {
|
||||
@@ -85,6 +87,9 @@ lin pot3plus n m = {
|
||||
size = tfSize m.size
|
||||
} ;
|
||||
|
||||
lin pot3as4 n = n ;
|
||||
lin pot4as5 n = n ;
|
||||
|
||||
oper tfSize : NumSize -> NumSize = \sz ->
|
||||
table {Num1 => Num5 ; other => other} ! sz ;
|
||||
|
||||
|
||||
Reference in new issue
Block a user