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
Iris
Commits
ff398120
Commit
ff398120
authored
Mar 21, 2018
by
Ralf Jung
Browse files
apply Robbert's feedback
parent
861490f0
Changes
2
Hide whitespace changes
Inline
Side-by-side
theories/proofmode/class_instances.v
View file @
ff398120
...
...
@@ -827,17 +827,6 @@ Proof.
intros
.
rewrite
/
Frame
intuitionistically_if_elim
affinely_elim
.
apply
sep_elim_l
,
_
.
Qed
.
Global
Instance
frame_intuitionistically_here_absorbing
p
R
:
Absorbing
R
→
Frame
p
(
□
R
)
R
True
|
0
.
Proof
.
intros
.
rewrite
/
Frame
intuitionistically_if_elim
intuitionistically_elim
.
apply
sep_elim_l
,
_
.
Qed
.
Global
Instance
frame_intuitionistically_here
p
R
:
Frame
p
(
□
R
)
R
emp
|
1
.
Proof
.
intros
.
rewrite
/
Frame
intuitionistically_if_elim
intuitionistically_elim
.
apply
sep_elim_l
,
_
.
Qed
.
Global
Instance
frame_here_pure
p
φ
Q
:
FromPure
false
Q
φ
→
Frame
p
⌜φ⌝
Q
True
.
Proof
.
...
...
theories/proofmode/modality_instances.v
View file @
ff398120
...
...
@@ -25,7 +25,7 @@ Section bi_modalities.
Modality
_
modality_affinely_mixin
.
Lemma
modality_intuitionistically_mixin
:
modality_mixin
(
λ
P
:
PROP
,
□
P
)%
I
MIEnvId
MIEnvIsEmpty
.
modality_mixin
(
@
bi_intuitionistically
PROP
)
MIEnvId
MIEnvIsEmpty
.
Proof
.
split
;
simpl
;
eauto
using
equiv_entails_sym
,
intuitionistically_emp
,
affinely_mono
,
persistently_mono
,
intuitionistically_idemp
,
...
...
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