Skip to content
Snippets Groups Projects
Commit 0b053008 authored by Jonas Kastberg's avatar Jonas Kastberg
Browse files

Made another lemma syntactically equivalent to paper presentation

parent 8f087103
No related branches found
No related tags found
No related merge requests found
Pipeline #36435 passed
Hide whitespace changes
Inline Side-by-side
theories/examples/list_rev.v
+ 1
− 2
View file @ 0b053008
...@@ -62,8 +62,7 @@ Section list_rev_example. ...@@ -62,8 +62,7 @@ Section list_rev_example.
iIntros (l xs) "Hl". iIntros (l xs) "Hl".
iDestruct (llist_split with "Hl") as (vs) "[Hl HIT]". iDestruct (llist_split with "Hl") as (vs) "[Hl HIT]".
iExists l, vs. iFrame "Hl". iExists l, vs. iFrame "Hl".
iModIntro. iModIntro. iIntros "Hl".
iIntros "Hl".
iSplitL "Hl HIT". iSplitL "Hl HIT".
{ iApply llist_split. rewrite big_sepL2_reverse_2. { iApply llist_split. rewrite big_sepL2_reverse_2.
iExists (reverse vs). iFrame "Hl HIT". } iExists (reverse vs). iFrame "Hl HIT". }
......
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