Skip to content
GitLab
Menu
Projects
Groups
Snippets
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
Jonas Kastberg
iris
Commits
b3eb5903
Commit
b3eb5903
authored
Nov 09, 2017
by
David Swasey
Browse files
Hoist type `pbit` to `language`.
parent
2a11f08f
Changes
2
Hide whitespace changes
Inline
Side-by-side
theories/program_logic/language.v
View file @
b3eb5903
...
...
@@ -43,6 +43,8 @@ Class LanguageCtx (Λ : language) (K : expr Λ → expr Λ) := {
Instance
language_ctx_id
Λ
:
LanguageCtx
Λ
id
.
Proof
.
constructor
;
naive_solver
.
Qed
.
Variant
pbit
:
=
progress
|
noprogress
.
Section
language
.
Context
{
Λ
:
language
}.
Implicit
Types
v
:
val
Λ
.
...
...
theories/program_logic/weakestpre.v
View file @
b3eb5903
...
...
@@ -11,8 +11,6 @@ Class irisG' (Λstate : Type) (Σ : gFunctors) := IrisG {
}.
Notation
irisG
Λ
Σ
:
=
(
irisG'
(
state
Λ
)
Σ
).
CoInductive
pbit
:
=
progress
|
noprogress
.
Definition
wp_pre
`
{
irisG
Λ
Σ
}
(
p
:
pbit
)
(
wp
:
coPset
-
c
>
expr
Λ
-
c
>
(
val
Λ
-
c
>
iProp
Σ
)
-
c
>
iProp
Σ
)
:
coPset
-
c
>
expr
Λ
-
c
>
(
val
Λ
-
c
>
iProp
Σ
)
-
c
>
iProp
Σ
:
=
λ
E
e1
Φ
,
...
...
Write
Preview
Supports
Markdown
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