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

ongoing work on numerals

Browse Source
This commit is contained in:
Herbert Lange
2019-06-12 15:03:27 +02:00
parent 8dde0246c4
commit f725562f79
5 changed files with 133 additions and 80 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/latin/NounLat.gf
+2 -2
View File
@@ -111,8 +111,8 @@ concrete NounLat of Noun = CatLat ** open ResLat, Prelude, ConjunctionLat in {
-- OrdDigits n = {s = n.s ! NOrd} ;
--
lin
NumNumeral numeral = numeral.card ;
OrdNumeral numeral = numeral.ord ;
-- NumNumeral numeral = numeral.s ;
-- OrdNumeral numeral = numeral.ord ;
--
-- AdNum adn num = {s = adn.s ++ num.s ; n = num.n} ;
--