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
Iris
Iris
Commits
e88e2129
Commit
e88e2129
authored
Mar 02, 2016
by
Robbert Krebbers
Browse files
Merge branch 'master' of gitlab.mpi-sws.org:FP/iris-coq
parents
5b0c6378
3d01a881
Pipeline
#205
passed with stage
Changes
2
Pipelines
1
Hide whitespace changes
Inline
Side-by-side
barrier/proof.v
View file @
e88e2129
...
...
@@ -325,7 +325,7 @@ Proof.
rewrite
!
wand_diag
-!
later_intro
.
solve_sep_entails
.
Qed
.
Lemma
recv_
strength
en
l
P1
P2
:
Lemma
recv_
weak
en
l
P1
P2
:
(
P1
-
★
P2
)
⊑
(
recv
l
P1
-
★
recv
l
P2
).
Proof
.
apply
wand_intro_l
.
rewrite
/
recv
.
rewrite
sep_exist_r
.
apply
exist_mono
=>
γ
.
...
...
@@ -339,7 +339,7 @@ Qed.
Lemma
recv_mono
l
P1
P2
:
P1
⊑
P2
→
recv
l
P1
⊑
recv
l
P2
.
Proof
.
intros
HP
%
entails_wand
.
apply
wand_entails
.
rewrite
HP
.
apply
recv_
strength
en
.
intros
HP
%
entails_wand
.
apply
wand_entails
.
rewrite
HP
.
apply
recv_
weak
en
.
Qed
.
End
proof
.
barrier/specification.v
View file @
e88e2129
...
...
@@ -29,6 +29,6 @@ Proof.
-
intros
l
P
.
apply
ht_alt
.
by
rewrite
-(
wait_spec
heapN
N
l
P
)
wand_diag
right_id
.
-
intros
l
P
Q
.
apply
vs_alt
.
rewrite
-(
recv_split
heapN
N
N
l
P
Q
)
//.
-
intros
l
P
Q
.
apply
recv_
strength
en
.
-
intros
l
P
Q
.
apply
recv_
weak
en
.
Qed
.
End
spec
.
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