diff --git a/theories/proofmode/coq_tactics.v b/theories/proofmode/coq_tactics.v index 50073499e5f7c4aeca7af50108543ca65161ed0a..b75575865cf64dc2d6d1553ceaf6746f549de968 100644 --- a/theories/proofmode/coq_tactics.v +++ b/theories/proofmode/coq_tactics.v @@ -694,10 +694,6 @@ Proof. Qed. (** * Implication and wand *) -Lemma envs_app_singleton_sound_foo Δ Δ' p j Q : - envs_app p (Esnoc Enil j Q) Δ = Some Δ' → of_envs Δ ∗ □?p Q ⊢ of_envs Δ'. -Proof. intros. apply wand_elim_l'. eapply envs_app_singleton_sound. eauto. Qed. - Lemma tac_impl_intro Δ Δ' i P P' Q R : FromImpl R P Q → (if env_spatial_is_nil Δ then TCTrue else Persistent P) →