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
Janno
iris-coq
Commits
784353e0
Commit
784353e0
authored
Apr 23, 2018
by
Ralf Jung
Browse files
improve wp_apply evar test
parent
515ba099
Changes
1
Hide whitespace changes
Inline
Side-by-side
theories/tests/heap_lang.v
View file @
784353e0
...
...
@@ -105,9 +105,9 @@ Section LiftingTests.
WP
let
:
"x"
:
=
Pred
#
42
in
Pred
"x"
@
E
[{
v
,
⌜
v
=
#
40
⌝
}]%
I
.
Proof
.
iIntros
""
.
wp_apply
Pred_spec
.
wp_let
.
by
wp_apply
Pred_spec
.
Qed
.
Lemma
wp_apply_evar
e
:
(
∀
Q
Φ
,
Q
-
∗
WP
e
{{
Φ
}})
-
∗
WP
e
{{
_
,
True
}}.
Proof
.
iIntros
"H"
.
wp_apply
"H"
.
done
.
Qed
.
Lemma
wp_apply_evar
e
P
:
P
-
∗
(
∀
Q
Φ
,
Q
-
∗
WP
e
{{
Φ
}})
-
∗
WP
e
{{
_
,
True
}}.
Proof
.
iIntros
"H
P HW
"
.
wp_apply
"H
W
"
.
iExact
"HP"
.
Qed
.
End
LiftingTests
.
...
...
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