HOUR-NUMBER denotes an hour of a day.
(= (I-Upper-Bound Hour-Number) 23) (= (I-Lower-Bound Hour-Number) 0)
(=> (Time-Point.Hour $X $Y) (Hour-Number $Y))