Proof with trivial.
intros intr evad T hyp_intr hyp_evad; intros;
apply
Rle_trans with (RR (measure2state intr 0) (measure2state (tr evad) 0) T)...
generalize
(derivative_eq_zero_min (measure2state intr 0) (measure2state (tr evad) 0) 0
T); repeat rewrite Rplus_0_l; intro...
apply (alarm_NOT_Omega_T intr evad T hyp_intr hyp_evad H H0 H1 H2)...
Qed.

(* Specifications: *)
Lemma alarm_NOT_Omega_AlertTime :
forall (intr : Trajectory) (evad : EvaderTrajectory) (T : TimeT),
h intr = V ->
h (tr evad) = V ->
(MinDistance T <= l intr evad T)%R ->
(l intr evad T <= MaxDistance T)%R ->
Omega (beta intr evad T + thetat intr 0) = false ->
conflict intr evad T = true ->
(AlertTime < tau (measure2state intr 0) (measure2state (tr evad) 0) 0)%R ->
(RR (measure2state intr 0) (measure2state (tr evad) 0) AlertTime <=
AlertRange)%R.