structural words needed for Attempto ; negative items are overgenerating

This commit is contained in:
aarne
2008-11-03 16:52:54 +00:00
parent 7f0b861ca9
commit e67587ae5b
11 changed files with 101 additions and 13 deletions

View File

@@ -1122,8 +1122,10 @@ incomplete resource Constructors = open Grammar in {
mkCard = overload {
mkCard : Numeral -> Card
= NumNumeral ;
mkNum : Digits -> Card -- 51
mkCard : Digits -> Card -- 51
= NumDigits ;
mkCard : AdN -> Card -> Card
= AdNum
} ;
mkNum = overload {