Commit 8c94e3fb authored by Ralf Jung's avatar Ralf Jung
Browse files

add test for iNext with evars

parent 1e241cca
......@@ -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.
iIntros "HP". iAssert ( _ - P)%I as "?"; last done.
iIntros "?". iNext. iAssumption.
Supports Markdown
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