From 528dd28a48dd7b1898212e2aae9b43bb19fb91cc Mon Sep 17 00:00:00 2001
From: Jason Gross
Date: Mon, 23 Mar 2020 15:53:26 -0400
Subject: Fix levels of `<=?` and `<?` in the stdlib

They were defined at level 70, no associativity in all but three places,
where they were instead declared at level 35.

Fixes #11890
---
 theories/Sorting/Mergesort.v | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

(limited to 'theories/Sorting')

diff --git a/theories/Sorting/Mergesort.v b/theories/Sorting/Mergesort.v
index a761dba62d..e9171cfdb3 100644
--- a/theories/Sorting/Mergesort.v
+++ b/theories/Sorting/Mergesort.v
@@ -259,7 +259,7 @@ Module NatOrder <: TotalLeBool.
     | _, 0 => false
     | S x', S y' => leb x' y'
     end.
-  Infix "<=?" := leb (at level 35).
+  Infix "<=?" := leb (at level 70, no associativity).
   Theorem leb_total : forall a1 a2, a1 <=? a2 \/ a2 <=? a1.
   Proof.
     induction a1; destruct a2; simpl; auto.
@@ -269,4 +269,3 @@ End NatOrder.
 Module Import NatSort := Sort NatOrder.
 
 Example SimpleMergeExample := Eval compute in sort [5;3;6;1;8;6;0].
-
-- 
cgit v1.2.3