Commit 8ca83760 authored by Jacques-Henri Jourdan's avatar Jacques-Henri Jourdan

More instances for monPred.

parent 66a41586
......@@ -739,8 +739,8 @@ Qed.
Class MakeMorphism `{BiEmbedding PROP PROP'} P (Q : PROP') :=
make_embed : P Q.
Arguments MakeMorphism {_ _ _} _%I _%I.
Global Instance make_embed_true `{BiEmbedding PROP PROP'} :
MakeMorphism True True.
Global Instance make_embed_pure `{BiEmbedding PROP PROP'} φ :
MakeMorphism ⌜φ⌝ ⌜φ⌝.
Proof. by rewrite /MakeMorphism bi_embed_pure. Qed.
Global Instance make_embed_emp `{BiEmbedding PROP PROP'} :
MakeMorphism emp emp.
This diff is collapsed.
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