From 8dbe99432db14b5f73585b9e34ecff6e61e76ca8 Mon Sep 17 00:00:00 2001
From: Andreas Grois <andi@grois.info>
Date: Sun, 13 Apr 2025 13:22:53 +0200
Subject: Lean 4.16

---
 Common/Parsing.lean | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'Common')

diff --git a/Common/Parsing.lean b/Common/Parsing.lean
index 91bb751..b1ee779 100644
--- a/Common/Parsing.lean
+++ b/Common/Parsing.lean
@@ -103,7 +103,7 @@ instance [ToString Element] : ToString (MaybeEmptyRectangularGrid Element) where
         have : x + e.width *y < e.elements.size := by
           simp[Membership.mem, inferInstance, Std.instMembershipNatRange] at h₁ h₂
           rw[e.size_valid]
-          exact Nat.two_d_coordinate_to_index_lt_size h₁ h₂
+          exact Nat.two_d_coordinate_to_index_lt_size h₁.right.left h₂.right.left
         r := r ++ (ToString.toString e.elements[x+e.width*y])
     r
 
-- 
cgit v1.2.3