diff --git a/theories/bi/monpred.v b/theories/bi/monpred.v index aa2e54c84672077c229319633ad36e57f076089f..b20c1206d0d927360bf70ee37b0948520c58f58a 100644 --- a/theories/bi/monpred.v +++ b/theories/bi/monpred.v @@ -635,7 +635,7 @@ Global Instance plainly_absolute P : Absolute (bi_plainly P). Proof. apply emb_absolute. Qed. Global Instance absolutely_absolute P : Absolute (∀ᵢ P). Proof. apply emb_absolute. Qed. -Global Instance monPred_relatively_absolute P : Absolute (∃ᵢ P). +Global Instance relatively_absolute P : Absolute (∃ᵢ P). Proof. apply emb_absolute. Qed. Global Instance and_absolute P Q `{!Absolute P, !Absolute Q} : Absolute (P ∧ Q). @@ -653,7 +653,7 @@ Global Instance forall_absolute {A} Φ {H : ∀ x : A, Absolute (Φ x)} : @Absolute I PROP (∀ x, Φ x)%I. Proof. intros ??. unseal. do 2 f_equiv. by apply absolute_at. Qed. Global Instance exists_absolute {A} Φ {H : ∀ x : A, Absolute (Φ x)} : - @Absolute I PROP (∀ x, Φ x)%I. + @Absolute I PROP (∃ x, Φ x)%I. Proof. intros ??. unseal. do 2 f_equiv. by apply absolute_at. Qed. Global Instance sep_absolute P Q `{!Absolute P, !Absolute Q} : Absolute (P ∗ Q).