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
Tej Chajed
iris
Commits
17970986
Commit
17970986
authored
Apr 19, 2016
by
Robbert Krebbers
Browse files
Put frames in ht_frame_step_r on consistent sides.
parent
f5f09abb
Changes
1
Hide whitespace changes
Inline
Side-by-side
program_logic/hoare.v
View file @
17970986
...
...
@@ -118,10 +118,10 @@ Qed.
Lemma
ht_frame_step_r
E
E1
E2
P
R1
R2
R3
e
Φ
:
to_val
e
=
None
→
E
⊥
E1
→
E2
⊆
E1
→
((
R1
={
E1
,
E2
}=>
▷
R2
)
∧
(
R2
={
E2
,
E1
}=>
R3
)
∧
{{
P
}}
e
@
E
{{
Φ
}})
⊢
{{
R1
★
P
}}
e
@
(
E
∪
E1
)
{{
λ
v
,
Φ
v
★
R3
}}.
⊢
{{
P
★
R1
}}
e
@
(
E
∪
E1
)
{{
λ
v
,
Φ
v
★
R3
}}.
Proof
.
iIntros
{???}
"[#Hvs1 [#Hvs2 #Hwp]]"
.
setoid_rewrite
(
comm
_
_
R3
).
setoid_rewrite
(
comm
_
_
R3
)
;
rewrite
(
comm
_
_
R1
)
.
iApply
(
ht_frame_step_l
_
_
E2
)
;
by
repeat
iSplit
.
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