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
Marianna Rapoport
iris-coq
Commits
1d628d4b
Commit
1d628d4b
authored
Nov 19, 2015
by
Robbert Krebbers
Browse files
Do not let simple unfold structure projections.
parent
f4bb2c39
Changes
3
Hide whitespace changes
Inline
Side-by-side
iris/cmra.v
View file @
1d628d4b
...
...
@@ -52,6 +52,17 @@ Structure cmraT := CMRAT {
cmra_extend
:
CMRAExtend
cmra_car
}.
Arguments
CMRAT
_
{
_
_
_
_
_
_
_
_
_
_
_
}.
Arguments
cmra_car
_
:
simpl
never
.
Arguments
cmra_equiv
_
_
_
:
simpl
never
.
Arguments
cmra_dist
_
_
_
_
:
simpl
never
.
Arguments
cmra_compl
_
_
:
simpl
never
.
Arguments
cmra_unit
_
_
:
simpl
never
.
Arguments
cmra_op
_
_
_
:
simpl
never
.
Arguments
cmra_valid
_
_
:
simpl
never
.
Arguments
cmra_validN
_
_
_
:
simpl
never
.
Arguments
cmra_included
_
_
_
:
simpl
never
.
Arguments
cmra_minus
_
_
_
:
simpl
never
.
Arguments
cmra_cmra
_
:
simpl
never
.
Add
Printing
Constructor
cmraT
.
Existing
Instances
cmra_equiv
cmra_dist
cmra_compl
cmra_unit
cmra_op
cmra_valid
cmra_validN
cmra_included
cmra_minus
cmra_cmra
cmra_extend
.
...
...
iris/cmra_maps.v
View file @
1d628d4b
...
...
@@ -138,7 +138,7 @@ Section map.
*
by
intros
m1
m2
Hm
i
;
rewrite
!
lookup_fmap
;
apply
included_preserving
.
*
by
intros
n
m
?
i
;
rewrite
lookup_fmap
;
apply
validN_preserving
.
Qed
.
Local
Hint
Extern
0
=>
simpl
;
apply
map_fmap_ne
:
typeclass_instances
.
Hint
Resolve
(
map_fmap_ne
(
M
:
=
M
))
:
typeclass_instances
.
Definition
mapRA_map
{
A
B
:
cmraT
}
(
f
:
A
-
n
>
B
)
:
mapRA
A
-
n
>
mapRA
B
:
=
CofeMor
(
fmap
f
:
mapRA
A
→
mapRA
B
).
Global
Instance
mapRA_map_ne
{
A
B
}
n
:
...
...
iris/cofe.v
View file @
1d628d4b
...
...
@@ -45,6 +45,11 @@ Structure cofeT := CofeT {
Arguments
CofeT
_
{
_
_
_
_
}.
Add
Printing
Constructor
cofeT
.
Existing
Instances
cofe_equiv
cofe_dist
cofe_compl
cofe_cofe
.
Arguments
cofe_car
_
:
simpl
never
.
Arguments
cofe_equiv
_
_
_
:
simpl
never
.
Arguments
cofe_dist
_
_
_
_
:
simpl
never
.
Arguments
cofe_compl
_
_
:
simpl
never
.
Arguments
cofe_cofe
_
:
simpl
never
.
(** General properties *)
Section
cofe
.
...
...
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