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
Jonas Kastberg
iris
Commits
2e76d24c
Commit
2e76d24c
authored
Oct 26, 2018
by
Robbert Krebbers
Browse files
Close issue
#218
.
parent
8fd4b0ac
Changes
1
Hide whitespace changes
Inline
Side-by-side
theories/proofmode/class_instances_bi.v
View file @
2e76d24c
...
...
@@ -10,11 +10,11 @@ Implicit Types P Q R : PROP.
Implicit
Types
mP
:
option
PROP
.
(** AsEmpValid *)
Global
Instance
as_emp_valid_emp_valid
{
PROP
:
bi
}
(
P
:
PROP
)
:
AsEmpValid0
(
bi_emp_valid
P
)
P
|
0
.
Global
Instance
as_emp_valid_emp_valid
(
P
:
PROP
)
:
AsEmpValid0
(
bi_emp_valid
P
)
P
|
0
.
Proof
.
by
rewrite
/
AsEmpValid
.
Qed
.
Global
Instance
as_emp_valid_entails
{
PROP
:
bi
}
(
P
Q
:
PROP
)
:
AsEmpValid0
(
P
⊢
Q
)
(
P
-
∗
Q
).
Global
Instance
as_emp_valid_entails
(
P
Q
:
PROP
)
:
AsEmpValid0
(
P
⊢
Q
)
(
P
-
∗
Q
).
Proof
.
split
.
apply
bi
.
entails_wand
.
apply
bi
.
wand_entails
.
Qed
.
Global
Instance
as_emp_valid_equiv
{
PROP
:
bi
}
(
P
Q
:
PROP
)
:
AsEmpValid0
(
P
≡
Q
)
(
P
∗
-
∗
Q
).
Global
Instance
as_emp_valid_equiv
(
P
Q
:
PROP
)
:
AsEmpValid0
(
P
≡
Q
)
(
P
∗
-
∗
Q
).
Proof
.
split
.
apply
bi
.
equiv_wand_iff
.
apply
bi
.
wand_iff_equiv
.
Qed
.
Global
Instance
as_emp_valid_forall
{
A
:
Type
}
(
φ
:
A
→
Prop
)
(
P
:
A
→
PROP
)
:
...
...
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