From 3a9ff92902df508074daa3017d1a71dae7e85248 Mon Sep 17 00:00:00 2001 From: Andreas Grois Date: Sun, 16 Nov 2025 21:08:35 +0100 Subject: Lean 4.25 --- Day7.lean | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Day7.lean') diff --git a/Day7.lean b/Day7.lean index 04c55f7..ed2936b 100644 --- a/Day7.lean +++ b/Day7.lean @@ -109,7 +109,7 @@ structure Player where def parse (input : String) : Except String (List Player) := do let lines := input.splitOn "\n" |> List.map String.trim |> List.filter String.notEmpty let parseLine := λ (line : String) ↦ - if let [hand, bid] := line.split Char.isWhitespace |> List.map String.trim |> List.filter String.notEmpty then + if let [hand, bid] := line.splitToList Char.isWhitespace |> List.map String.trim |> List.filter String.notEmpty then Option.zip (Hand.fromString? hand) (String.toNat? bid) |> Option.map (uncurry Player.mk) |> Option.toExcept s!"Line could not be parsed: {line}" -- cgit v1.2.3