Skip to content
GitLab
Menu
Projects
Groups
Snippets
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
Iris
Iris
Commits
34dcb910
Commit
34dcb910
authored
Feb 05, 2016
by
Ralf Jung
Browse files
construct the resource functor
parent
dbf38eb5
Changes
2
Hide whitespace changes
Inline
Side-by-side
program_logic/model.v
View file @
34dcb910
...
@@ -6,6 +6,7 @@ COFEs to the category of CMRAs, which is instantiated with [laterC iProp]. The
...
@@ -6,6 +6,7 @@ COFEs to the category of CMRAs, which is instantiated with [laterC iProp]. The
[laterC iProp] can be used to construct impredicate CMRAs, such as the stored
[laterC iProp] can be used to construct impredicate CMRAs, such as the stored
propositions using the agreement CMRA. *)
propositions using the agreement CMRA. *)
(* TODO RJ: Can we make use of resF, the resource functor? *)
Module
iProp
.
Module
iProp
.
Definition
F
(
Λ
:
language
)
(
Σ
:
iFunctor
)
(
A
B
:
cofeT
)
:
cofeT
:
=
Definition
F
(
Λ
:
language
)
(
Σ
:
iFunctor
)
(
A
B
:
cofeT
)
:
cofeT
:
=
uPredC
(
resRA
Λ
Σ
(
laterC
A
)).
uPredC
(
resRA
Λ
Σ
(
laterC
A
)).
...
...
program_logic/resources.v
View file @
34dcb910
...
@@ -215,3 +215,14 @@ Proof.
...
@@ -215,3 +215,14 @@ Proof.
*
by
apply
(
mapC_map_ne
_
(
agreeC_map
f
)
(
agreeC_map
g
)),
agreeC_map_ne
.
*
by
apply
(
mapC_map_ne
_
(
agreeC_map
f
)
(
agreeC_map
g
)),
agreeC_map_ne
.
*
by
apply
optionC_map_ne
,
ifunctor_map_ne
.
*
by
apply
optionC_map_ne
,
ifunctor_map_ne
.
Qed
.
Qed
.
Program
Definition
resF
{
Λ
Σ
}
:
iFunctor
:
=
{|
ifunctor_car
:
=
resRA
Λ
Σ
;
ifunctor_map
A
B
:
=
resC_map
|}.
Next
Obligation
.
intros
Λ
Σ
A
x
.
by
rewrite
/=
res_map_id
.
Qed
.
Next
Obligation
.
intros
Λ
Σ
A
B
C
f
g
x
.
by
rewrite
/=
res_map_compose
.
Qed
.
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