Notation corestepN := (corestepN (AsmContext.coarse_semantics initU)).

Lemma weak_mem_obs_eq_restrEq: forall f f' mc mf mc' mf' pmap pmapF (Hlt: permMapLt pmap (getMaxPerm mc)) (HltF: permMapLt pmapF (getMaxPerm mf)) (Hlt': permMapLt pmap (getMaxPerm mc')) (HltF': permMapLt pmapF (getMaxPerm mf')) (Hobs_eq: weak_mem_obs_eq f (restrPermMap Hlt) (restrPermMap HltF)) (Hobs_eq': weak_mem_obs_eq f' mc' mf') (Hincr: ren_incr f f') (Hsep: ren_separated f f' mc mf), weak_mem_obs_eq f' (restrPermMap Hlt') (restrPermMap HltF').