added mkCard to resource 1.4

This commit is contained in:
aarne
2008-10-03 13:18:46 +00:00
parent 54d5b2cd71
commit d48208dabd

View File

@@ -1618,6 +1618,13 @@ incomplete resource Constructors = open Grammar in {
mkListNP : NP -> ListNP -> ListNP = ConsNP mkListNP : NP -> ListNP -> ListNP = ConsNP
} ; } ;
mkCard = overload {
mkCard : Numeral -> Card
= NumNumeral ;
mkNum : Digits -> Card -- 51
= NumDigits ;
} ;
------------ for backward compatibility ------------ for backward compatibility