From 581e709f5db5e9237867316a4d846038c5ca0a9a Mon Sep 17 00:00:00 2001
From: Robbert Krebbers <mail@robbertkrebbers.nl>
Date: Wed, 20 Jul 2016 13:28:29 +0200
Subject: [PATCH] =?UTF-8?q?Make=20=E2=88=96=20left=20associative.?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 prelude/base.v             | 2 +-
 program_logic/namespaces.v | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/prelude/base.v b/prelude/base.v
index 86b1036fb..f354f0e0b 100644
--- a/prelude/base.v
+++ b/prelude/base.v
@@ -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.
diff --git a/program_logic/namespaces.v b/program_logic/namespaces.v
index 9950d42d3..ee59788b1 100644
--- a/program_logic/namespaces.v
+++ b/program_logic/namespaces.v
@@ -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.
-- 
GitLab