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
Dan Frumin
iris-coq
Commits
a3a70c30
Commit
a3a70c30
authored
Feb 16, 2016
by
Ralf Jung
Browse files
complete writing down the invariant of the barrier protocol
parent
7c8f9427
Changes
1
Hide whitespace changes
Inline
Side-by-side
barrier/barrier.v
View file @
a3a70c30
From
algebra
Require
Export
upred_big_op
.
From
program_logic
Require
Export
sts
saved_prop
.
From
heap_lang
Require
Export
derived
heap
wp_tactics
notation
.
...
...
@@ -102,10 +103,11 @@ Section proof.
Notation
iProp
:=
(
iPropG
heap_lang
Σ
).
Definition
waiting
(
P
:
iProp
)
(
I
:
gset
gname
)
:
iProp
:=
(
∃
Q
:
gmap
gname
iProp
,
True
)
%
I
.
(
∃
Q
:
gmap
gname
iProp
,
▷
(
P
-
★
Π★
{
map
Q
}
(
λ
_
Q
,
Q
))
★
Π★
{
map
Q
}
(
λ
i
Q
,
saved_prop_own
SpI
i
Q
))
%
I
.
Definition
ress
(
I
:
gset
gname
)
:
iProp
:=
(
True
)
%
I
.
(
Π★
{
set
I
}
(
λ
i
,
∃
Q
,
saved_prop_own
SpI
i
Q
★
▷
Q
)
)
%
I
.
Definition
barrier_inv
(
l
:
loc
)
(
P
:
iProp
)
(
s
:
stateT
)
:
iProp
:=
match
s
with
...
...
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