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
Rodolphe Lepigre
Iris
Commits
6bb6f29d
Commit
6bb6f29d
authored
Sep 07, 2016
by
Robbert Krebbers
Browse files
Variant of pair_split for Leibniz equality.
parent
7c1de72a
Changes
1
Hide whitespace changes
Inline
Side-by-side
algebra/cmra.v
View file @
6bb6f29d
...
...
@@ -984,6 +984,10 @@ Section prod_unit.
Lemma
pair_split
(
x
:
A
)
(
y
:
B
)
:
(
x
,
y
)
≡
(
x
,
∅
)
⋅
(
∅
,
y
).
Proof
.
by
rewrite
pair_op
left_id
right_id
.
Qed
.
Lemma
pair_split_L
`
{!
LeibnizEquiv
A
,
!
LeibnizEquiv
B
}
(
x
:
A
)
(
y
:
B
)
:
(
x
,
y
)
=
(
x
,
∅
)
⋅
(
∅
,
y
).
Proof
.
unfold_leibniz
.
apply
pair_split
.
Qed
.
End
prod_unit
.
Arguments
prodUR
:
clear
implicits
.
...
...
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