(Forall (?I)
(=> (Instance-Of ?I ?Class)
(And (Measured-By (Time-Range.Start-Time ?I)
(Time-Range-Unit ?Class))
(Measured-By (Time-Range.End-Time ?I)
(Time-Range-Unit ?Class)))))
(<=> (Discrete-Time-Range-Class ?Class)
(And (Class ?Class)
(Value-Cardinality ?Class Time-Range-Unit 1)
(Forall (?I)
(=> (Instance-Of ?I ?Class)
(And (Measured-By (Time-Range.Start-Time ?I)
(Time-Range-Unit ?Class))
(Measured-By (Time-Range.End-Time ?I)
(Time-Range-Unit ?Class)))))))
(=> (Measured-By $X $Y) (Duration $Y))
(=> (Measured-By $X $Y) (Time-Point $X))