Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
What's new
7
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
Iris
Iris
Commits
0236daec
Commit
0236daec
authored
Sep 09, 2019
by
Jacques-Henri Jourdan
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
elim_modal_at instance.
parent
7c1a6c43
Pipeline
#19581
passed with stage
in 15 minutes and 5 seconds
Changes
1
Pipelines
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
7 additions
and
0 deletions
+7
-0
theories/proofmode/monpred.v
theories/proofmode/monpred.v
+7
-0
No files found.
theories/proofmode/monpred.v
View file @
0236daec
...
...
@@ -440,6 +440,13 @@ Global Instance elim_modal_at_bupd_hyp `{BiBUpd PROP} φ p p' P 𝓟 𝓟' 𝓠
ElimModal
φ
p
p'
(|==>
𝓟
)
𝓟
'
𝓠
𝓠
'
→
ElimModal
φ
p
p'
((|==>
P
)
i
)
𝓟
'
𝓠
𝓠
'
.
Proof
.
by
rewrite
/
MakeMonPredAt
/
ElimModal
monPred_at_bupd
=><-.
Qed
.
Global
Instance
elim_modal_at
φ
p
p'
𝓟
𝓟
'
P
P'
V
:
ElimModal
φ
p
p'
⎡𝓟⎤
⎡𝓟
'
⎤
P
P'
→
ElimModal
φ
p
p'
𝓟
𝓟
'
(
P
V
)
(
P'
V
).
Proof
.
rewrite
/
ElimModal
-!
embed_intuitionistically_if
.
iIntros
(
HH
H
φ
)
"[? HP]"
.
iApply
HH
;
[
done
|].
iFrame
.
iIntros
(?
<-)
"?"
.
by
iApply
"HP"
.
Qed
.
Global
Instance
add_modal_at_bupd_goal
`
{
BiBUpd
PROP
}
φ
𝓟
𝓟
'
Q
i
:
AddModal
𝓟
𝓟
'
(|==>
Q
i
)%
I
→
AddModal
𝓟
𝓟
'
((|==>
Q
)
i
).
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a 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