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
30c12c95
Commit
30c12c95
authored
Feb 04, 2016
by
Robbert Krebbers
Browse files
More indexed product properties.
parent
5a9a07e3
Changes
1
Hide whitespace changes
Inline
Side-by-side
algebra/cmra.v
View file @
30c12c95
...
...
@@ -602,7 +602,14 @@ Section iprod_cmra.
eauto
using
iprod_insert_updateP
with
congruence
.
Qed
.
Context
`
{
∀
x
,
Empty
(
B
x
)}.
Context
`
{
∀
x
,
Empty
(
B
x
)}
`
{
∀
x
,
CMRAIdentity
(
B
x
)}.
Lemma
iprod_op_singleton
(
x
:
A
)
(
y1
y2
:
B
x
)
:
iprod_singleton
x
y1
⋅
iprod_singleton
x
y2
≡
iprod_singleton
x
(
y1
⋅
y2
).
Proof
.
intros
x'
;
destruct
(
decide
(
x'
=
x
))
as
[->|].
*
by
rewrite
iprod_lookup_op
!
iprod_lookup_singleton
.
*
by
rewrite
iprod_lookup_op
!
iprod_lookup_singleton_ne
//
left_id
.
Qed
.
Lemma
iprod_singleton_updateP
x
(
P
:
B
x
→
Prop
)
(
Q
:
iprod
B
→
Prop
)
y1
:
y1
~~>
:
P
→
(
∀
y2
,
P
y2
→
Q
(
iprod_singleton
x
y2
))
→
iprod_singleton
x
y1
~~>
:
Q
.
...
...
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