Skip to content
Snippets Groups Projects
Commit dba0b479 authored by Robbert Krebbers's avatar Robbert Krebbers
Browse files

Introduction of stepping fancy updates.

parent ae88b35e
No related branches found
No related tags found
No related merge requests found
Hide whitespace changes
Inline Side-by-side
base_logic/lib/fancy_updates.v
+ 3
− 0
View file @ dba0b479
......@@ -224,4 +224,7 @@ Proof.
iMod (fupd_intro_mask') as "HM2"; first done. iModIntro.
iNext. iMod "HM2". iMod "HP". iMod "HM1". done.
Qed.
Lemma step_fupd_intro E1 E2 P : E2 ⊆ E1 → ▷ P -∗ |={E1,E2}▷=> P.
Proof. iIntros (?) "HP". iApply (step_fupd_mask_mono E2 _ _ E2); auto. Qed.
End step_fupd.
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