(=> (Time-Range.Start-Time $X $Y) (Time-Point $Y))
(=> (Time-Range.End-Time $X $Y) (Time-Point $Y))
(=> (Time-Point.Year $X $Y) (Time-Point $X))
(=> (Time-Point.Month $X $Y) (Time-Point $X))
(=> (Time-Point.Month-Name $X $Y) (Time-Point $X))
(=> (Time-Point.Day $X $Y) (Time-Point $X))
(=> (Time-Point.Day-Name $X $Y) (Time-Point $X))
(=> (Time-Point.Hour $X $Y) (Time-Point $X))
(=> (Time-Point.Minute $X $Y) (Time-Point $X))
(=> (Time-Point.Second $X $Y) (Time-Point $X))
(=> (Time-Point.Unit $X $Y) (Time-Point $X))
(Nth-Domain Tp+ 3 Time-Point)
(Nth-Domain Tp+ 1 Time-Point)