Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
Simon Spies
Iris
Commits
a2e945d9
Commit
a2e945d9
authored
Feb 23, 2016
by
Ralf Jung
Browse files
heap_lang: try to use cancel
parent
b94d1262
Changes
1
Hide whitespace changes
Inline
Side-by-side
heap_lang/heap.v
View file @
a2e945d9
...
...
@@ -116,8 +116,9 @@ Section heap.
rewrite
always_and_sep_l
-
assoc
;
apply
const_elim_sep_l
=>
?.
rewrite
-(
exist_intro
(
op
{[
l
:
=
Excl
v
]})).
repeat
erewrite
<-
exist_intro
by
apply
_;
simpl
.
rewrite
-
of_heap_insert
left_id
right_id
!
assoc
.
apply
sep_mono_l
.
rewrite
-
of_heap_insert
left_id
right_id
.
(* FIXME: cancel (auth_own heap_name {[l := Excl v]} -★ Φ (LocV l))%I. *)
rewrite
!
assoc
.
apply
sep_mono_l
.
rewrite
-(
map_insert_singleton_op
h
)
;
last
by
apply
of_heap_None
.
rewrite
const_equiv
?left_id
;
last
by
apply
(
map_insert_valid
h
).
apply
later_intro
.
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment