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

Close issue #218.

parent 8fd4b0ac
No related branches found
No related tags found
No related merge requests found
......@@ -10,11 +10,11 @@ Implicit Types P Q R : PROP.
Implicit Types mP : option PROP.
(** AsEmpValid *)
Global Instance as_emp_valid_emp_valid {PROP : bi} (P : PROP) : AsEmpValid0 (bi_emp_valid P) P | 0.
Global Instance as_emp_valid_emp_valid (P : PROP) : AsEmpValid0 (bi_emp_valid P) P | 0.
Proof. by rewrite /AsEmpValid. Qed.
Global Instance as_emp_valid_entails {PROP : bi} (P Q : PROP) : AsEmpValid0 (P Q) (P -∗ Q).
Global Instance as_emp_valid_entails (P Q : PROP) : AsEmpValid0 (P Q) (P -∗ Q).
Proof. split. apply bi.entails_wand. apply bi.wand_entails. Qed.
Global Instance as_emp_valid_equiv {PROP : bi} (P Q : PROP) : AsEmpValid0 (P Q) (P ∗-∗ Q).
Global Instance as_emp_valid_equiv (P Q : PROP) : AsEmpValid0 (P Q) (P ∗-∗ Q).
Proof. split. apply bi.equiv_wand_iff. apply bi.wand_iff_equiv. Qed.
Global Instance as_emp_valid_forall {A : Type} (φ : A Prop) (P : A PROP) :
......
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