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
Simon Spies
Iris
Commits
45f84a82
Commit
45f84a82
authored
Feb 22, 2016
by
Robbert Krebbers
Browse files
Fix notation for ndot.
The non applied one should be only parsing.
parent
e9af95ac
Changes
2
Hide whitespace changes
Inline
Side-by-side
barrier/client.v
View file @
45f84a82
...
...
@@ -33,13 +33,13 @@ Section ClosedProofs.
Lemma
client_safe_closed
σ
:
{{
ownP
σ
:
iProp
}}
client
{{
λ
v
,
True
}}.
Proof
.
apply
ht_alt
.
rewrite
(
heap_alloc
⊤
(
ndot
nroot
"Barrier"
))
;
last
first
.
apply
ht_alt
.
rewrite
(
heap_alloc
⊤
(
nroot
.
:
"Barrier"
))
;
last
first
.
{
(* FIXME Really?? set_solver takes forever on "⊆ ⊤"?!? *)
move
=>?
_
.
exact
I
.
}
by
move
=>?
_
.
}
apply
wp_strip_pvs
,
exist_elim
=>
?.
rewrite
and_elim_l
.
rewrite
-(
client_safe
(
nroot
.
:
"Heap"
)
(
nroot
.
:
"Barrier"
))
//.
(* This, too, should be automated. *)
apply
ndot_ne_disjoint
.
discriminate
.
by
apply
ndot_ne_disjoint
.
Qed
.
Print
Assumptions
client_safe_closed
.
...
...
program_logic/namespaces.v
View file @
45f84a82
...
...
@@ -8,7 +8,7 @@ Definition ndot `{Countable A} (N : namespace) (x : A) : namespace :=
Coercion
nclose
(
N
:
namespace
)
:
coPset
:
=
coPset_suffixes
(
encode
N
).
Infix
".:"
:
=
ndot
(
at
level
19
,
left
associativity
)
:
C_scope
.
Notation
"(.:)"
:
=
ndot
:
C_scope
.
Notation
"(.:)"
:
=
ndot
(
only
parsing
)
:
C_scope
.
Instance
ndot_inj
`
{
Countable
A
}
:
Inj2
(=)
(=)
(=)
(@
ndot
A
_
_
).
Proof
.
by
intros
N1
x1
N2
x2
?
;
simplify_eq
.
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