End Csafety_Clight. *)
(*Infinite safety*)
Section safety_Clight.

Lemma safe_new_step_bound_safe_new_step: forall sch ds m,
new_valid_bound (nil, ds, m) sch ->
safe_new_step_bound  (globalenv prog) (sch, nil, ds) m ->
safe_new_step  (globalenv prog) (sch, nil, ds) m.