diff options
| author | Tomasz Chojnacki <tomaszchojnacki2001@gmail.com> | 2023-01-01 22:18:29 +0100 |
|---|---|---|
| committer | Tomasz Chojnacki <tomaszchojnacki2001@gmail.com> | 2023-01-01 22:18:29 +0100 |
| commit | 806ca36af8773c71c6f4d2ac77fc35ac0aa3b5a0 (patch) | |
| tree | b47bd14bb94a615ce7a90f0b9a2a26fbd57c41b6 /aoc-2022-dotnet/Day16 | |
| parent | 353d185a1f89654f999dca7b75016ebef461a23c (diff) | |
| download | gleam_aoc2020-806ca36af8773c71c6f4d2ac77fc35ac0aa3b5a0.tar.gz gleam_aoc2020-806ca36af8773c71c6f4d2ac77fc35ac0aa3b5a0.zip | |
Finish day 19
Diffstat (limited to 'aoc-2022-dotnet/Day16')
| -rw-r--r-- | aoc-2022-dotnet/Day16/Program.fs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/aoc-2022-dotnet/Day16/Program.fs b/aoc-2022-dotnet/Day16/Program.fs index 87b0ffa..208d975 100644 --- a/aoc-2022-dotnet/Day16/Program.fs +++ b/aoc-2022-dotnet/Day16/Program.fs @@ -48,7 +48,7 @@ let buildGraph input = bfsExplore Set.empty [] [ (start, 0) ] - let valveMap = input |> Seq.map parseValve |> Map.ofSeq + let valveMap = input |> Seq.map parseValve |> Map let flows = valveMap @@ -59,7 +59,7 @@ let buildGraph input = valveMap |> Map.keys |> Seq.collect (distancesFrom valveMap) - |> Map.ofSeq + |> Map |> Map.filter (fun (f, t) _ -> f <> t && Map.containsKey f flows |