Commit 379aa18e authored by Jacques-Henri Jourdan's avatar Jacques-Henri Jourdan

Add test.

parent 88138cf6
......@@ -64,4 +64,9 @@ Section tests.
Proof.
iStartProof. iIntros (n) "$".
Qed.
Lemma test_embed_wand (P Q : PROP) : (P - Q) - P - Q : monPred.
Proof.
iIntros "H HP". by iApply "H".
Qed.
End tests.
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