diff options
author | Tomasz Chojnacki <tomaszchojnacki2001@gmail.com> | 2022-12-13 16:38:41 +0100 |
---|---|---|
committer | Tomasz Chojnacki <tomaszchojnacki2001@gmail.com> | 2022-12-13 16:38:41 +0100 |
commit | 6fc820cd0cb61a4bacda5f5b40c98dda850d75da (patch) | |
tree | 7d08b0adbf8c1b60be906cab3ee7b76767b6908e /aoc-2022-dotnet/Day04 | |
parent | eb7cdaab9b9c13b3594e0abdbbff6f72f8cb4807 (diff) | |
download | gleam_aoc2020-6fc820cd0cb61a4bacda5f5b40c98dda850d75da.tar.gz gleam_aoc2020-6fc820cd0cb61a4bacda5f5b40c98dda850d75da.zip |
Upload days 12 and 13
Diffstat (limited to 'aoc-2022-dotnet/Day04')
-rw-r--r-- | aoc-2022-dotnet/Day04/Program.fs | 4 |
1 files changed, 2 insertions, 2 deletions
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) |