aboutsummaryrefslogtreecommitdiff
path: root/aoc-2022-dotnet/Day05/Program.fs
diff options
context:
space:
mode:
Diffstat (limited to 'aoc-2022-dotnet/Day05/Program.fs')
-rw-r--r--aoc-2022-dotnet/Day05/Program.fs4
1 files changed, 2 insertions, 2 deletions
diff --git a/aoc-2022-dotnet/Day05/Program.fs b/aoc-2022-dotnet/Day05/Program.fs
index 7bad269..9d9be48 100644
--- a/aoc-2022-dotnet/Day05/Program.fs
+++ b/aoc-2022-dotnet/Day05/Program.fs
@@ -8,11 +8,11 @@ open Common
type Move =
| Move of int * int * int
- static member parse str =
+ static member parse =
let dec n = n - 1
let pPart str = pstring str >>. pint32
let pMove = tuple3 (pPart "move ") (pPart " from " |>> dec) (pPart " to " |>> dec)
- Util.parse pMove str |> Move
+ Util.parse pMove >> Move
static member execute order stacks (Move (n, fi, ti)) =
List.mapi