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
Dan Frumin
iris-coq
Commits
41ad05c6
Commit
41ad05c6
authored
Jul 05, 2016
by
Robbert Krebbers
Browse files
Frame under a wand.
parent
fba57127
Changes
1
Hide whitespace changes
Inline
Side-by-side
proofmode/classes.v
View file @
41ad05c6
...
...
@@ -256,6 +256,13 @@ Global Instance frame_or R P1 P2 Q1 Q2 Q :
Frame
R
P1
Q1
→
Frame
R
P2
Q2
→
MakeOr
Q1
Q2
Q
→
Frame
R
(
P1
∨
P2
)
Q
.
Proof
.
rewrite
/
Frame
/
MakeOr
=>
<-
<-
<-
.
by
rewrite
-
sep_or_l
.
Qed
.
Global
Instance
frame_wand
R
P1
P2
Q2
:
Frame
R
P2
Q2
→
Frame
R
(
P1
-
★
P2
)
(
P1
-
★
Q2
).
Proof
.
rewrite
/
Frame
=>
?
.
apply
wand_intro_l
.
by
rewrite
assoc
(
comm
_
P1
)
-
assoc
wand_elim_r
.
Qed
.
Class
MakeLater
(
P
lP
:
uPred
M
)
:=
make_later
:
▷
P
⊣⊢
lP
.
Global
Instance
make_later_true
:
MakeLater
True
True
.
Proof
.
by
rewrite
/
MakeLater
later_True
.
Qed
.
...
...
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