Commit e96d5cf8 authored by Robbert Krebbers's avatar Robbert Krebbers

Flipped Proper for uPred_valid.

parent dba0b479
......@@ -322,6 +322,9 @@ Global Instance uPred_valid_proper : Proper ((⊣⊢) ==> iff) (@uPred_valid M).
Proof. solve_proper. Qed.
Global Instance uPred_valid_mono : Proper (() ==> impl) (@uPred_valid M).
Proof. solve_proper. Qed.
Global Instance uPred_valid_flip_mono :
Proper (flip () ==> flip impl) (@uPred_valid M).
Proof. solve_proper. Qed.
(** Introduction and elimination rules *)
Lemma pure_intro φ P : φ P ⌜φ⌝.
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment