From 2390fe0a2fbbdd283d21049a1e997026d7d1948c Mon Sep 17 00:00:00 2001
From: Andreas Grois <andi@grois.info>
Date: Tue, 7 Jan 2025 23:32:53 +0100
Subject: Lean 4.15

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

(limited to 'Common/Parsing.lean')

diff --git a/Common/Parsing.lean b/Common/Parsing.lean
index d68a313..91bb751 100644
--- a/Common/Parsing.lean
+++ b/Common/Parsing.lean
@@ -88,7 +88,7 @@ def RectangularGrid.set {grid : RectangularGrid Element} (coordinate : grid.Coor
   {
     grid with
       elements := grid.elements.set index value
-      size_valid := (grid.elements.size_set index value).substr grid.size_valid
+      size_valid := (grid.elements.size_set index value index.isLt).substr grid.size_valid
   }
 
 theorem RectangularGrid.set_same_size {grid : RectangularGrid Element} (coordinate : grid.Coordinate) (value : Element) : (grid.set coordinate value).width = grid.width ∧ (grid.set coordinate value).height = grid.height :=
-- 
cgit v1.2.3

