Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
What's new
10
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
Jonas Kastberg
iris
Commits
7442a17a
Commit
7442a17a
authored
Jun 11, 2019
by
Ralf Jung
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
add a lemma to easily combine two arbitrary mapsto (with different values)
parent
8ebe1485
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
7 additions
and
0 deletions
+7
-0
theories/base_logic/lib/gen_heap.v
theories/base_logic/lib/gen_heap.v
+7
-0
No files found.
theories/base_logic/lib/gen_heap.v
View file @
7442a17a
...
...
@@ -204,6 +204,13 @@ Section gen_heap.
by
intros
[
_
?%
agree_op_invL'
].
Qed
.
Lemma
mapsto_combine
l
q1
q2
v1
v2
:
l
↦
{
q1
}
v1
-
∗
l
↦
{
q2
}
v2
-
∗
l
↦
{
q1
+
q2
}
v1
∗
⌜
v1
=
v2
⌝
.
Proof
.
iIntros
"Hl1 Hl2"
.
iDestruct
(
mapsto_agree
with
"Hl1 Hl2"
)
as
%->.
iCombine
"Hl1 Hl2"
as
"Hl"
.
eauto
with
iFrame
.
Qed
.
Global
Instance
ex_mapsto_fractional
l
:
Fractional
(
λ
q
,
l
↦
{
q
}
-)%
I
.
Proof
.
intros
p
q
.
iSplit
.
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a 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