a time range ?tr1 is properly included in a time range ?tr2.
(<=> (During ?Tr1 ?Tr2)
(And (Tp> (Time-Range.Start-Time ?Tr1)
(Time-Range.Start-Time ?Tr2))
(Tp< (Time-Range.End-Time ?Tr1) (Time-Range.End-Time ?Tr2))))
(<=> (During ?Tr1 ?Tr2)
(And (Tp> (Time-Range.Start-Time ?Tr1)
(Time-Range.Start-Time ?Tr2))
(Tp< (Time-Range.End-Time ?Tr1) (Time-Range.End-Time ?Tr2))))
(<=> (During= ?Tr1 ?Tr2)
(Or (During ?Tr1 ?Tr2)
(Starts ?Tr1 ?Tr2)
(Finishes ?Tr1 ?Tr2)
(Equals ?Tr1 ?Tr2)))