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
Rodolphe Lepigre
Iris
Commits
c2eaa77d
Commit
c2eaa77d
authored
Jul 09, 2019
by
Ralf Jung
Browse files
dont quantify over empty telescopes
parent
64c16f99
Changes
1
Hide whitespace changes
Inline
Side-by-side
theories/program_logic/atomic.v
View file @
c2eaa77d
...
...
@@ -112,8 +112,8 @@ Section lemmas.
(* Sequential triples with a persistent precondition and no initial quantifier
are atomic. *)
Lemma
seq_wp_atomic
e
Eo
(
α
:
[
tele
]
→
iProp
)
(
β
:
[
tele
]
→
TB
→
iProp
)
(
f
:
[
tele
]
→
TB
→
val
Λ
)
{
HP
:
∀
..
x
,
Persistent
(
α
x
)}
:
(
∀
Φ
,
∀
..
x
,
α
x
-
∗
(
∀
..
y
,
β
x
y
-
∗
Φ
(
f
x
y
))
-
∗
WP
e
{{
Φ
}})
-
∗
(
f
:
[
tele
]
→
TB
→
val
Λ
)
{
HP
:
Persistent
(
α
[
tele_arg
]
)}
:
(
∀
Φ
,
α
[
tele_arg
]
-
∗
(
∀
..
y
,
β
[
tele_arg
]
y
-
∗
Φ
(
f
[
tele_arg
]
y
))
-
∗
WP
e
{{
Φ
}})
-
∗
atomic_wp
e
Eo
α
β
f
.
Proof
.
simpl
in
HP
.
iIntros
"Hwp"
(
Φ
)
"HΦ"
.
iApply
fupd_wp
.
...
...
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