From 6fc820cd0cb61a4bacda5f5b40c98dda850d75da Mon Sep 17 00:00:00 2001 From: Tomasz Chojnacki Date: Tue, 13 Dec 2022 16:38:41 +0100 Subject: Upload days 12 and 13 --- aoc-2022-dotnet/Day04/Program.fs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'aoc-2022-dotnet/Day04/Program.fs') diff --git a/aoc-2022-dotnet/Day04/Program.fs b/aoc-2022-dotnet/Day04/Program.fs index 7d37d3e..1f0f78f 100644 --- a/aoc-2022-dotnet/Day04/Program.fs +++ b/aoc-2022-dotnet/Day04/Program.fs @@ -4,10 +4,10 @@ open System.IO open FParsec open Common -let parseLine line = +let parseLine = let prange = pint32 .>> pstring "-" .>>. pint32 let ppair = prange .>> pstring "," .>>. prange .>> eof - Util.parse ppair line + Util.parse ppair let fullyOverlap ((a, b), (c, d)) = (a <= c && d <= b) || (c <= a && b <= d) -- cgit v1.2.3