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
examples
Commits
73e3afad
Commit
73e3afad
authored
Mar 06, 2019
by
Ralf Jung
Browse files
update Iris, fix for _cofinite
parent
7030ac15
Pipeline
#15266
passed with stage
in 9 minutes and 36 seconds
Changes
2
Pipelines
1
Hide whitespace changes
Inline
Side-by-side
opam
View file @
73e3afad
...
...
@@ -9,6 +9,6 @@ build: [make "-j%{jobs}%"]
install: [make "install"]
remove: ["rm" "-rf" "%{lib}%/coq/user-contrib/iris_examples"]
depends: [
"coq-iris" { (= "dev.2019-03-0
5.0.38abc449
") | (= "dev") }
"coq-iris" { (= "dev.2019-03-0
6.2.f5d03e25
") | (= "dev") }
"coq-autosubst" { = "dev.coq86" }
]
theories/barrier/proof.v
View file @
73e3afad
...
...
@@ -165,8 +165,8 @@ Proof.
iIntros
(?).
iDestruct
1
as
(
γ
P
Q
i
)
"(#Hsts & Hγ & #HQ & HQR)"
.
iMod
(
sts_openS
(
barrier_inv
l
P
)
_
_
γ
with
"[Hγ]"
)
as
([
p
I
])
"(% & [Hl Hr] & Hclose)"
;
eauto
.
iMod
(
saved_prop_alloc_
strong
I
)
as
(
i1
)
"[% #Hi1]"
.
iMod
(
saved_prop_alloc_
strong
(
I
∪
{[
i1
]}))
iMod
(
saved_prop_alloc_
cofinite
I
)
as
(
i1
)
"[% #Hi1]"
.
iMod
(
saved_prop_alloc_
cofinite
(
I
∪
{[
i1
]}))
as
(
i2
)
"[Hi2' #Hi2]"
;
iDestruct
"Hi2'"
as
%
Hi2
.
rewrite
->
not_elem_of_union
,
elem_of_singleton
in
Hi2
;
destruct
Hi2
.
iMod
(
"Hclose"
$!
(
State
p
({[
i1
;
i2
]}
∪
I
∖
{[
i
]}))
...
...
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