TIME-POINT.MONTH-NAME denotes a name of a month of a time point.
(=> (Time-Point.Month-Name $X $Y) (Month-Name $Y)) (=> (Time-Point.Month-Name $X $Y) (Time-Point $X))