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
George Pirlea
Iris
Commits
3b800620
Commit
3b800620
authored
Nov 24, 2016
by
Robbert Krebbers
Browse files
Enable solve_ndisj to handle E1 ∖ ↑N1 ⊆ E2 ∖ ↑N2 ∖ .. ∖ ↑Nn.
parent
243fdd13
Changes
1
Hide whitespace changes
Inline
Side-by-side
base_logic/lib/namespaces.v
View file @
3b800620
...
...
@@ -73,14 +73,25 @@ Section namespace.
Lemma
ndisj_subseteq_difference
N
E
F
:
E
⊥
↑
N
→
E
⊆
F
→
E
⊆
F
∖
↑
N
.
Proof
.
set_solver
.
Qed
.
Lemma
namespace_subseteq_difference_l
E1
E2
E3
:
E1
⊆
E3
→
E1
∖
E2
⊆
E3
.
Proof
.
set_solver
.
Qed
.
Lemma
ndisj_difference_l
E
N1
N2
:
↑
N2
⊆
(
↑
N1
:
coPset
)
→
E
∖
↑
N1
⊥
↑
N2
.
Proof
.
set_solver
.
Qed
.
End
namespace
.
(* The hope is that registering these will suffice to solve most goals
of the form [N1 ⊥ N2] and those of the form [↑N1 ⊆ E ∖ ↑N2 ∖ .. ∖ ↑Nn]. *)
of the forms:
- [N1 ⊥ N2]
- [↑N1 ⊆ E ∖ ↑N2 ∖ .. ∖ ↑Nn]
- [E1 ∖ ↑N1 ⊆ E2 ∖ ↑N2 ∖ .. ∖ ↑Nn] *)
Hint
Resolve
ndisj_subseteq_difference
:
ndisj
.
Hint
Extern
0
(
_
⊥
_
)
=>
apply
ndot_ne_disjoint
;
congruence
:
ndisj
.
Hint
Resolve
ndot_preserve_disjoint_l
:
ndisj
.
Hint
Resolve
ndot_preserve_disjoint_r
:
ndisj
.
Hint
Extern
1
(
_
⊆
_
)
=>
apply
nclose_subseteq'
:
ndisj
.
Hint
Resolve
100
namespace_subseteq_difference_l
:
ndisj
.
Hint
Resolve
ndisj_difference_l
:
ndisj
.
Ltac
solve_ndisj
:
=
solve
[
eauto
with
ndisj
].
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