(=> (And (Time-Range ?Time-Range-1) (Time-Range ?Time-Range-2))
(<=> (Equals ?Time-Range-1 ?Time-Range-2)
(And (Equals (Start-Time-Of ?Time-Range-1)
(Start-Time-Of ?Time-Range-2))
(Equals (End-Time-Of ?Time-Range-1)
(End-Time-Of ?Time-Range-2)))))
(=> (+ ?Time-Range-1 ?Duration)
(=> (And (Time-Range ?Time-Range-1) (Duration ?Duration))
(<=> (= (+ ?Time-Range-1 ?Duration) ?Time-Range-2)
(And (= (Start-Time-Of ?Time-Range-1)
(Start-Time-Of ?Time-Range-2))
(= (+ (End-Time-Of ?Time-Range-1) ?Duration)
(End-Time-Of ?Time-Range-2))))))