Skip to content
Snippets Groups Projects
Commit 8c94e3fb authored by Ralf Jung's avatar Ralf Jung
Browse files

add test for iNext with evars

parent 1e241cca
No related branches found
No related tags found
No related merge requests found
......@@ -146,3 +146,10 @@ Proof. eauto with iFrame. Qed.
Lemma demo_17 (M : ucmraT) (P Q R : uPred M) `{!PersistentP R} :
P -∗ Q -∗ R -∗ R Q P R False.
Proof. iIntros "HP HQ #HR". iCombine "HR HQ HP HR" as "H". auto. Qed.
Lemma test_iNext_evar (M : ucmraT) (P : uPred M) :
P -∗ True.
Proof.
iIntros "HP". iAssert ( _ -∗ P)%I as "?"; last done.
iIntros "?". iNext. iAssumption.
Qed.
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