Skip to content
Snippets Groups Projects
Commit 72f54819 authored by Robbert Krebbers's avatar Robbert Krebbers
Browse files

Merge branch 'ralf/rewrite' into 'master'

avoid relying on rewrite's implicit revert

See merge request iris/iris!643
parents ffcaed52 a18b8e18
No related branches found
No related tags found
No related merge requests found
...@@ -539,7 +539,7 @@ Lemma tac_pose_proof_hyp Δ i j Q : ...@@ -539,7 +539,7 @@ Lemma tac_pose_proof_hyp Δ i j Q :
Proof. Proof.
destruct (envs_lookup_delete _ _ _) as [((p&P)&Δ')|] eqn:Hlookup; last done. destruct (envs_lookup_delete _ _ _) as [((p&P)&Δ')|] eqn:Hlookup; last done.
destruct (envs_app _ _ _) as [Δ''|] eqn:?; last done. destruct (envs_app _ _ _) as [Δ''|] eqn:?; last done.
rewrite envs_entails_eq. rewrite envs_lookup_delete_Some in Hlookup *. rewrite envs_entails_eq. move: Hlookup. rewrite envs_lookup_delete_Some.
intros [? ->] <-. intros [? ->] <-.
rewrite envs_lookup_sound' // envs_app_singleton_sound //=. rewrite envs_lookup_sound' // envs_app_singleton_sound //=.
by rewrite wand_elim_r. by rewrite wand_elim_r.
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment