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
stdpp
Commits
7df27997
Commit
7df27997
authored
Sep 06, 2014
by
Robbert Krebbers
Browse files
Add map_Forall3.
parent
98e61928
Changes
1
Hide whitespace changes
Inline
Side-by-side
theories/fin_maps.v
View file @
7df27997
...
...
@@ -84,6 +84,13 @@ Definition map_Forall2 `{∀ A, Lookup K A (M A)} {A B}
|
None
,
Some
y
=>
Q
y
|
None
,
None
=>
True
end
.
Definition
map_Forall3
`
{
∀
A
,
Lookup
K
A
(
M
A
)}
{
A
B
C
}
(
R
:
A
→
B
→
C
→
Prop
)
(
m1
:
M
A
)
(
m2
:
M
B
)
(
m3
:
M
C
)
:
Prop
:
=
∀
i
,
match
m1
!!
i
,
m2
!!
i
,
m3
!!
i
with
|
Some
x
,
Some
y
,
Some
z
=>
R
x
y
z
|
None
,
None
,
None
=>
True
|
_
,
_
,
_
=>
False
end
.
Instance
map_disjoint
`
{
∀
A
,
Lookup
K
A
(
M
A
)}
{
A
}
:
Disjoint
(
M
A
)
:
=
map_Forall2
(
λ
_
_
,
False
)
(
λ
_
,
True
)
(
λ
_
,
True
).
...
...
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