Skip to content
Snippets Groups Projects
Commit 6faf6cad authored by Dan Frumin's avatar Dan Frumin
Browse files

un-foobar the par.v example

parent 1d424bc5
No related branches found
No related tags found
No related merge requests found
Pipeline #16892 failed
(** THIS EXAMPLE IS WIP *)
From iris.algebra Require Import excl.
From iris.heap_lang Require Import proofmode.
From iris.heap_lang.lib Require Export spawn par.
......@@ -100,7 +101,7 @@ Section rules.
repeat rel_pure_r.
tp_rec i. simpl.
rel_rec_l. repeat rel_pure_l.
rewrite {3}refines_eq /refines_def. iIntros (LL) "_". clear LL.
rewrite {3}refines_eq /refines_def. iIntros (ρ) "#Hρ".
iIntros (j K) "Hj". iModIntro.
tp_bind j e2.
pose (C:=(AppRCtx (λ: "v2", let: "v1" := join #c2 in ("v1", "v2")) :: K)).
......@@ -150,7 +151,7 @@ Section rules.
{ simpl. eauto. }
repeat rel_pure_r.
tp_rec i. simpl.
rewrite {3}refines_eq /refines_def. iIntros (LL) "_". clear LL.
rewrite {3}refines_eq /refines_def. iIntros (ρ) "#Hρ".
iIntros (j K) "Hj". iModIntro.
tp_bind j e2. tp_bind i e1.
(* execute e1 *)
......
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