typo False -> True

This commit is contained in:
krasimir
2008-02-20 16:58:31 +00:00
parent 10ac938d12
commit d5c53ccb7e

View File

@@ -45,8 +45,8 @@ concrete NounBul of Noun = CatBul ** open ResBul, Prelude in {
NoNum = {s = \\_ => []; n = Pl; nonEmpty = False} ;
NoOrd = {s = \\_ => []; nonEmpty = False} ;
NumNumeral numeral = {s = \\gspec => numeral.s ! NCard gspec; n = numeral.n; nonEmpty = False} ;
OrdNumeral numeral = {s = \\aform => numeral.s ! NOrd aform; nonEmpty = False} ;
NumNumeral numeral = {s = \\gspec => numeral.s ! NCard gspec; n = numeral.n; nonEmpty = True} ;
OrdNumeral numeral = {s = \\aform => numeral.s ! NOrd aform; nonEmpty = True} ;
DefArt = {
s = \\_ => [] ;