(Hun) Adjust types for numerals

This commit is contained in:
Inari Listenmaa
2020-03-30 21:51:42 +02:00
parent 4a8668fce9
commit 60500231d8
3 changed files with 14 additions and 12 deletions
+3 -1
View File
@@ -82,7 +82,9 @@ concrete NounHun of Noun = CatHun ** open ResHun, Prelude in {
NumPl = baseNum ** {n = Pl} ;
-- : Card -> Num ;
NumCard card = card ;
NumCard card = card ** {
n = Sg -- Numerals take noun in Sg: e.g. öt város, literally 'five city'
} ;
-- : Digits -> Card ;
-- NumDigits dig =