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
Marianna Rapoport
iris-coq
Commits
581e709f
Commit
581e709f
authored
Jul 20, 2016
by
Robbert Krebbers
Browse files
Make ∖ left associative.
parent
64bb0481
Changes
2
Hide whitespace changes
Inline
Side-by-side
prelude/base.v
View file @
581e709f
...
...
@@ -590,7 +590,7 @@ Notation "(∩ x )" := (λ y, intersection y x) (only parsing) : C_scope.
Class
Difference
A
:
=
difference
:
A
→
A
→
A
.
Instance
:
Params
(@
difference
)
2
.
Infix
"∖"
:
=
difference
(
at
level
40
)
:
C_scope
.
Infix
"∖"
:
=
difference
(
at
level
40
,
left
associativity
)
:
C_scope
.
Notation
"(∖)"
:
=
difference
(
only
parsing
)
:
C_scope
.
Notation
"( x ∖)"
:
=
(
difference
x
)
(
only
parsing
)
:
C_scope
.
Notation
"(∖ x )"
:
=
(
λ
y
,
difference
y
x
)
(
only
parsing
)
:
C_scope
.
...
...
program_logic/namespaces.v
View file @
581e709f
...
...
@@ -77,7 +77,7 @@ Section ndisjoint.
End
ndisjoint
.
(* 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 form [N1 ⊥ N2] and those of the form [N1 ⊆ E ∖ N2 ∖ .. ∖ Nn]. *)
Hint
Resolve
ndisj_subseteq_difference
:
ndisj
.
Hint
Extern
0
(
_
⊥
_
)
=>
apply
ndot_ne_disjoint
;
congruence
:
ndisj
.
Hint
Resolve
ndot_preserve_disjoint_l
:
ndisj
.
...
...
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