(Forall (?I)
(=> (Instance-Of ?I ?Class)
(And (=< (I-Lower-Bound ?Class) ?I)
(=< ?I (I-Upper-Bound ?Class)))))
(Inherited-Facet-Value Slot-Cardinality
Integer-Range
I-Upper-Bound
1)
(<=> (Integer-Range ?Class)
(And (Class ?Class)
(Subclass-Of ?Class Integer)
(Value-Cardinality ?Class I-Lower-Bound 1)
(Value-Cardinality ?Class I-Upper-Bound 1)
(Forall (?I)
(=> (Instance-Of ?I ?Class)
(And (=< (I-Lower-Bound ?Class) ?I)
(=< ?I (I-Upper-Bound ?Class)))))))
(=> (I-Upper-Bound $X $Y) (Integer $Y))
(=> (I-Upper-Bound $X $Y) (Integer-Range $X))
(= (I-Upper-Bound Month-Number) 12)
(= (I-Upper-Bound Day-Number) 31)
(= (I-Upper-Bound Hour-Number) 23)
(= (I-Upper-Bound Minute-Number) 59)