Day 5 (#6)

AdventOfCode2022.Test/AdventOfCode2022.Test.fsproj

@@ -1,8 +1,9 @@
 <Project Sdk="Microsoft.NET.Sdk">
 
     <PropertyGroup>
-        <TargetFramework>net6.0</TargetFramework>
-        <IsPackable>false</IsPackable>
+      <TargetFramework>net7.0</TargetFramework>
+      <IsPackable>false</IsPackable>
+      <TreatWarningsAsErrors>true</TreatWarningsAsErrors>
     </PropertyGroup>
 
     <ItemGroup>
@@ -11,10 +12,12 @@
         <Compile Include="Day2.fs" />
         <Compile Include="Day3.fs" />
         <Compile Include="Day4.fs" />
-        <EmbeddedResource Include="Inputs/Day1.txt" />
-        <EmbeddedResource Include="Inputs/Day2.txt" />
+        <Compile Include="Day5.fs" />
+        <EmbeddedResource Include="Inputs\Day1.txt" />
+        <EmbeddedResource Include="Inputs\Day2.txt" />
         <EmbeddedResource Include="Inputs\Day3.txt" />
         <EmbeddedResource Include="Inputs\Day4.txt" />
+        <EmbeddedResource Include="Inputs\Day5.txt" />
     </ItemGroup>
 
     <ItemGroup>

AdventOfCode2022.Test/Day1.fs

@@ -1,5 +1,6 @@
 namespace AdventOfCode2022.Test
 
+open System
 open AdventOfCode2022
 open NUnit.Framework
 open FsUnitTyped
@@ -7,6 +8,23 @@ open FsUnitTyped
 [<TestFixture>]
 module TestDay1 =
 
+    let testInput =
+        """1000
+2000
+3000
+
+4000
+
+5000
+6000
+
+7000
+8000
+9000
+
+10000
+"""
+
     [<Test>]
     let ``Part 1`` () =
         let input = Assembly.readResource "Day1.txt"
@@ -19,43 +37,9 @@ module TestDay1 =
 
     [<Test>]
     let ``Part 1, given example`` () =
-        """1000
-2000
-3000
-
-4000
-
-5000
-6000
-
-7000
-8000
-9000
-
-10000
-"""
-        |> fun s -> s.Split '\n'
-        |> Day1.part1
-        |> shouldEqual 24000
+        testInput.Split Environment.NewLine |> Day1.part1 |> shouldEqual 24000
 
 
     [<Test>]
     let ``Part 2, given example`` () =
-        """1000
-2000
-3000
-
-4000
-
-5000
-6000
-
-7000
-8000
-9000
-
-10000
-"""
-        |> fun s -> s.Split '\n'
-        |> Day1.part2
-        |> shouldEqual 45000
+        testInput.Split Environment.NewLine |> Day1.part2 |> shouldEqual 45000

AdventOfCode2022.Test/Day2.fs

@@ -8,14 +8,14 @@ open AdventOfCode2022
 [<TestFixture>]
 module TestDay2 =
 
-    [<Test>]
-    let ``Part 1, given`` () =
+    let testInput =
         """A Y
 B X
 C Z"""
-        |> fun s -> s.Split System.Environment.NewLine
-        |> Day2.part1
-        |> shouldEqual 15
+
+    [<Test>]
+    let ``Part 1, given`` () =
+        testInput.Split Environment.NewLine |> Day2.part1 |> shouldEqual 15
 
     [<Test>]
     let ``Part 1`` () =
@@ -25,12 +25,7 @@ C Z"""
 
     [<Test>]
     let ``Part 2, given`` () =
-        """A Y
-B X
-C Z"""
-        |> fun s -> s.Split System.Environment.NewLine
-        |> Day2.part2
-        |> shouldEqual 12
+        testInput.Split Environment.NewLine |> Day2.part2 |> shouldEqual 12
 
     [<Test>]
     let ``Part 2`` () =

AdventOfCode2022.Test/Day4.fs

@@ -8,15 +8,18 @@ open AdventOfCode2022
 [<TestFixture>]
 module TestDay4 =
 
-    [<Test>]
-    let ``Part 1, given`` () =
+    let testInput =
         """2-4,6-8
 2-3,4-5
 5-7,7-9
 2-8,3-7
 6-6,4-6
 2-6,4-8"""
-        |> fun s -> s.Split System.Environment.NewLine
+
+    [<Test>]
+    let ``Part 1, given`` () =
+        testInput
+        |> fun s -> s.Split Environment.NewLine
         |> Day4.part1
         |> shouldEqual 2
 
@@ -29,16 +32,10 @@ module TestDay4 =
         |> Day4.part1
         |> shouldEqual 433
 
-
     [<Test>]
     let ``Part 2, given`` () =
-        """2-4,6-8
-2-3,4-5
-5-7,7-9
-2-8,3-7
-6-6,4-6
-2-6,4-8"""
-        |> fun s -> s.Split System.Environment.NewLine
+        testInput
+        |> fun s -> s.Split Environment.NewLine
         |> Day4.part2
         |> shouldEqual 4
 

AdventOfCode2022.Test/Day5.fs

@@ -0,0 +1,46 @@
+namespace AdventOfCode2022.Test
+
+open System
+open NUnit.Framework
+open FsUnitTyped
+open AdventOfCode2022
+
+[<TestFixture>]
+module TestDay5 =
+
+    let testInput =
+        """    [D]
+[N] [C]
+[Z] [M] [P]
+ 1   2   3
+
+move 1 from 2 to 1
+move 3 from 1 to 3
+move 2 from 2 to 1
+move 1 from 1 to 2
+"""
+
+    [<Test>]
+    let ``Part 1, given`` () =
+        let lines = StringSplitEnumerator.make '\n' testInput
+        Day5.part1 lines |> shouldEqual "CMZ"
+
+    [<Test>]
+    let ``Part 1`` () =
+        let input = Assembly.readResource "Day5.txt"
+
+        let lines = StringSplitEnumerator.make '\n' input
+        Day5.part1 lines |> shouldEqual "BSDMQFLSP"
+
+
+    [<Test>]
+    let ``Part 2, given`` () =
+        let lines = StringSplitEnumerator.make '\n' testInput
+        Day5.part2 lines |> shouldEqual "MCD"
+
+    [<Test>]
+    let ``Part 2`` () =
+        let input = Assembly.readResource "Day5.txt"
+
+        let lines = StringSplitEnumerator.make '\n' input
+        Day5.part2 lines |> shouldEqual "PGSQBFLDP"

AdventOfCode2022.Test/Inputs/Day5.txt

@@ -0,0 +1,512 @@
+        [Q] [B]         [H]
+    [F] [W] [D] [Q]     [S]
+    [D] [C] [N] [S] [G] [F]
+    [R] [D] [L] [C] [N] [Q]     [R]
+[V] [W] [L] [M] [P] [S] [M]     [M]
+[J] [B] [F] [P] [B] [B] [P] [F] [F]
+[B] [V] [G] [J] [N] [D] [B] [L] [V]
+[D] [P] [R] [W] [H] [R] [Z] [W] [S]
+ 1   2   3   4   5   6   7   8   9
+
+move 1 from 4 to 1
+move 2 from 4 to 8
+move 5 from 9 to 6
+move 1 from 1 to 3
+move 5 from 8 to 3
+move 1 from 1 to 5
+move 4 from 3 to 6
+move 14 from 6 to 2
+move 5 from 4 to 5
+move 7 from 7 to 2
+move 24 from 2 to 3
+move 13 from 3 to 2
+move 1 from 7 to 9
+move 1 from 9 to 5
+move 7 from 2 to 6
+move 3 from 1 to 7
+move 3 from 6 to 3
+move 2 from 7 to 1
+move 1 from 7 to 5
+move 2 from 2 to 6
+move 2 from 1 to 4
+move 9 from 5 to 1
+move 1 from 6 to 3
+move 4 from 5 to 4
+move 1 from 2 to 7
+move 4 from 6 to 2
+move 7 from 2 to 3
+move 2 from 2 to 6
+move 2 from 2 to 3
+move 2 from 5 to 4
+move 1 from 7 to 3
+move 4 from 6 to 7
+move 19 from 3 to 6
+move 3 from 7 to 4
+move 1 from 7 to 8
+move 1 from 8 to 1
+move 2 from 1 to 3
+move 10 from 3 to 2
+move 3 from 3 to 8
+move 1 from 3 to 9
+move 1 from 9 to 6
+move 11 from 6 to 8
+move 2 from 3 to 8
+move 6 from 4 to 3
+move 3 from 4 to 1
+move 7 from 2 to 8
+move 1 from 3 to 6
+move 6 from 8 to 5
+move 1 from 4 to 6
+move 9 from 6 to 9
+move 6 from 3 to 8
+move 1 from 3 to 5
+move 10 from 1 to 3
+move 11 from 8 to 7
+move 1 from 3 to 5
+move 1 from 1 to 8
+move 5 from 9 to 2
+move 1 from 6 to 3
+move 5 from 3 to 6
+move 1 from 3 to 5
+move 4 from 6 to 4
+move 1 from 5 to 9
+move 6 from 2 to 4
+move 2 from 2 to 9
+move 5 from 5 to 1
+move 2 from 1 to 7
+move 10 from 8 to 3
+move 1 from 8 to 6
+move 3 from 6 to 3
+move 6 from 4 to 2
+move 8 from 3 to 8
+move 3 from 4 to 8
+move 4 from 2 to 1
+move 3 from 5 to 3
+move 4 from 7 to 6
+move 2 from 9 to 3
+move 1 from 2 to 9
+move 1 from 2 to 3
+move 2 from 4 to 8
+move 1 from 7 to 9
+move 5 from 7 to 8
+move 2 from 7 to 3
+move 14 from 3 to 2
+move 3 from 9 to 5
+move 1 from 3 to 1
+move 1 from 7 to 4
+move 3 from 9 to 8
+move 7 from 8 to 9
+move 7 from 2 to 5
+move 2 from 3 to 7
+move 2 from 7 to 6
+move 16 from 8 to 9
+move 4 from 6 to 5
+move 1 from 2 to 5
+move 21 from 9 to 5
+move 3 from 9 to 3
+move 6 from 1 to 4
+move 1 from 1 to 9
+move 1 from 1 to 4
+move 2 from 6 to 3
+move 3 from 4 to 6
+move 3 from 4 to 8
+move 1 from 9 to 4
+move 2 from 4 to 6
+move 4 from 3 to 6
+move 1 from 3 to 4
+move 1 from 4 to 9
+move 1 from 9 to 8
+move 1 from 8 to 6
+move 6 from 2 to 1
+move 2 from 8 to 4
+move 6 from 1 to 8
+move 23 from 5 to 9
+move 1 from 4 to 7
+move 1 from 7 to 1
+move 22 from 9 to 7
+move 4 from 8 to 7
+move 1 from 5 to 2
+move 1 from 1 to 9
+move 2 from 8 to 4
+move 6 from 6 to 3
+move 2 from 9 to 5
+move 18 from 7 to 4
+move 18 from 4 to 5
+move 1 from 2 to 7
+move 1 from 8 to 4
+move 6 from 7 to 2
+move 5 from 4 to 5
+move 1 from 3 to 1
+move 1 from 7 to 2
+move 4 from 3 to 4
+move 1 from 3 to 4
+move 1 from 1 to 7
+move 1 from 5 to 8
+move 3 from 4 to 3
+move 3 from 3 to 8
+move 2 from 8 to 3
+move 2 from 4 to 8
+move 2 from 7 to 5
+move 1 from 7 to 9
+move 2 from 3 to 1
+move 1 from 9 to 7
+move 4 from 2 to 3
+move 1 from 8 to 9
+move 2 from 1 to 8
+move 2 from 2 to 4
+move 1 from 9 to 1
+move 4 from 6 to 8
+move 1 from 2 to 7
+move 1 from 4 to 7
+move 4 from 8 to 2
+move 1 from 4 to 3
+move 1 from 1 to 9
+move 4 from 8 to 1
+move 2 from 2 to 1
+move 3 from 3 to 9
+move 2 from 7 to 1
+move 32 from 5 to 1
+move 1 from 8 to 7
+move 6 from 5 to 1
+move 2 from 7 to 6
+move 1 from 9 to 5
+move 1 from 3 to 2
+move 1 from 5 to 9
+move 2 from 6 to 1
+move 1 from 3 to 7
+move 1 from 9 to 8
+move 36 from 1 to 4
+move 1 from 8 to 9
+move 5 from 4 to 9
+move 6 from 9 to 3
+move 2 from 2 to 9
+move 3 from 1 to 9
+move 1 from 3 to 2
+move 30 from 4 to 8
+move 1 from 7 to 5
+move 1 from 3 to 5
+move 3 from 3 to 4
+move 2 from 8 to 5
+move 3 from 9 to 8
+move 3 from 9 to 3
+move 19 from 8 to 6
+move 2 from 3 to 5
+move 3 from 4 to 3
+move 1 from 4 to 7
+move 8 from 1 to 8
+move 1 from 3 to 2
+move 1 from 7 to 6
+move 4 from 5 to 3
+move 1 from 1 to 7
+move 2 from 5 to 4
+move 1 from 9 to 4
+move 12 from 6 to 2
+move 1 from 7 to 8
+move 6 from 2 to 9
+move 3 from 6 to 7
+move 2 from 7 to 5
+move 6 from 2 to 3
+move 8 from 3 to 5
+move 5 from 6 to 8
+move 5 from 3 to 6
+move 1 from 9 to 4
+move 1 from 9 to 8
+move 5 from 5 to 9
+move 3 from 4 to 6
+move 1 from 4 to 9
+move 1 from 7 to 5
+move 1 from 3 to 5
+move 8 from 9 to 2
+move 3 from 9 to 6
+move 27 from 8 to 2
+move 10 from 6 to 9
+move 1 from 6 to 4
+move 1 from 4 to 9
+move 2 from 5 to 6
+move 5 from 5 to 3
+move 2 from 6 to 9
+move 5 from 3 to 2
+move 12 from 9 to 3
+move 5 from 3 to 1
+move 3 from 1 to 5
+move 1 from 9 to 8
+move 1 from 5 to 2
+move 1 from 2 to 1
+move 1 from 1 to 6
+move 1 from 5 to 3
+move 34 from 2 to 4
+move 8 from 3 to 9
+move 1 from 6 to 1
+move 1 from 8 to 5
+move 4 from 2 to 8
+move 3 from 8 to 7
+move 1 from 7 to 2
+move 7 from 9 to 8
+move 1 from 9 to 6
+move 2 from 5 to 1
+move 1 from 6 to 9
+move 1 from 9 to 5
+move 2 from 2 to 5
+move 5 from 8 to 6
+move 2 from 8 to 5
+move 1 from 1 to 3
+move 12 from 4 to 6
+move 2 from 7 to 1
+move 4 from 1 to 6
+move 3 from 2 to 3
+move 1 from 8 to 5
+move 1 from 2 to 6
+move 1 from 1 to 9
+move 1 from 9 to 5
+move 16 from 4 to 1
+move 4 from 3 to 1
+move 8 from 1 to 8
+move 1 from 4 to 1
+move 6 from 5 to 8
+move 1 from 5 to 7
+move 12 from 6 to 9
+move 7 from 1 to 5
+move 2 from 1 to 7
+move 1 from 7 to 1
+move 9 from 9 to 6
+move 15 from 6 to 2
+move 2 from 9 to 7
+move 4 from 4 to 5
+move 2 from 2 to 9
+move 3 from 7 to 5
+move 2 from 1 to 3
+move 1 from 7 to 1
+move 10 from 2 to 3
+move 6 from 8 to 6
+move 3 from 9 to 2
+move 14 from 5 to 6
+move 1 from 8 to 4
+move 5 from 8 to 2
+move 2 from 2 to 3
+move 24 from 6 to 1
+move 3 from 1 to 2
+move 9 from 2 to 9
+move 1 from 4 to 3
+move 1 from 4 to 2
+move 1 from 8 to 4
+move 23 from 1 to 4
+move 3 from 2 to 4
+move 2 from 1 to 2
+move 1 from 8 to 4
+move 3 from 3 to 5
+move 3 from 3 to 4
+move 3 from 5 to 8
+move 3 from 2 to 7
+move 2 from 3 to 8
+move 15 from 4 to 3
+move 2 from 4 to 1
+move 19 from 3 to 9
+move 1 from 7 to 2
+move 1 from 2 to 5
+move 1 from 5 to 4
+move 1 from 7 to 6
+move 1 from 7 to 4
+move 3 from 8 to 3
+move 1 from 8 to 4
+move 5 from 3 to 8
+move 1 from 3 to 6
+move 22 from 9 to 2
+move 17 from 2 to 6
+move 3 from 9 to 3
+move 9 from 4 to 9
+move 6 from 4 to 9
+move 5 from 2 to 6
+move 1 from 4 to 2
+move 1 from 4 to 9
+move 1 from 1 to 6
+move 19 from 9 to 2
+move 4 from 8 to 7
+move 1 from 1 to 5
+move 1 from 5 to 3
+move 1 from 8 to 1
+move 1 from 8 to 2
+move 4 from 3 to 7
+move 12 from 6 to 1
+move 3 from 7 to 3
+move 7 from 2 to 7
+move 9 from 2 to 6
+move 4 from 2 to 6
+move 13 from 1 to 4
+move 8 from 6 to 4
+move 16 from 4 to 8
+move 12 from 7 to 6
+move 3 from 8 to 3
+move 1 from 1 to 2
+move 4 from 3 to 8
+move 5 from 8 to 9
+move 27 from 6 to 8
+move 2 from 3 to 7
+move 2 from 2 to 8
+move 2 from 7 to 5
+move 1 from 5 to 9
+move 1 from 5 to 1
+move 1 from 6 to 9
+move 2 from 6 to 2
+move 2 from 2 to 6
+move 2 from 9 to 2
+move 3 from 4 to 3
+move 1 from 1 to 9
+move 5 from 9 to 8
+move 1 from 9 to 5
+move 2 from 2 to 6
+move 2 from 4 to 6
+move 1 from 3 to 7
+move 1 from 5 to 6
+move 1 from 6 to 7
+move 6 from 6 to 8
+move 2 from 7 to 5
+move 2 from 3 to 2
+move 34 from 8 to 1
+move 1 from 5 to 6
+move 1 from 5 to 3
+move 1 from 6 to 1
+move 32 from 1 to 8
+move 23 from 8 to 4
+move 1 from 2 to 1
+move 24 from 8 to 4
+move 1 from 3 to 6
+move 47 from 4 to 6
+move 2 from 6 to 1
+move 3 from 1 to 5
+move 1 from 2 to 1
+move 3 from 5 to 7
+move 21 from 6 to 2
+move 3 from 7 to 8
+move 2 from 1 to 6
+move 8 from 6 to 4
+move 4 from 8 to 9
+move 3 from 2 to 8
+move 4 from 4 to 2
+move 2 from 2 to 5
+move 4 from 9 to 8
+move 2 from 1 to 5
+move 11 from 6 to 1
+move 14 from 2 to 6
+move 2 from 4 to 3
+move 1 from 2 to 9
+move 3 from 2 to 9
+move 20 from 6 to 5
+move 2 from 4 to 2
+move 4 from 9 to 1
+move 8 from 8 to 9
+move 1 from 6 to 9
+move 14 from 5 to 2
+move 10 from 2 to 7
+move 7 from 9 to 6
+move 1 from 6 to 8
+move 6 from 2 to 6
+move 1 from 2 to 5
+move 1 from 3 to 5
+move 9 from 6 to 3
+move 1 from 5 to 2
+move 9 from 7 to 3
+move 12 from 3 to 2
+move 9 from 5 to 9
+move 1 from 8 to 6
+move 3 from 3 to 5
+move 1 from 7 to 6
+move 14 from 2 to 6
+move 3 from 9 to 7
+move 6 from 1 to 2
+move 5 from 1 to 8
+move 10 from 6 to 9
+move 4 from 5 to 6
+move 3 from 2 to 4
+move 9 from 9 to 7
+move 1 from 8 to 7
+move 3 from 9 to 6
+move 3 from 3 to 7
+move 1 from 5 to 1
+move 15 from 7 to 1
+move 2 from 8 to 5
+move 2 from 5 to 4
+move 1 from 7 to 4
+move 1 from 3 to 1
+move 15 from 6 to 7
+move 2 from 4 to 9
+move 3 from 4 to 7
+move 18 from 1 to 6
+move 1 from 8 to 9
+move 6 from 9 to 7
+move 3 from 6 to 8
+move 1 from 1 to 2
+move 2 from 9 to 5
+move 2 from 2 to 9
+move 16 from 6 to 3
+move 15 from 3 to 7
+move 2 from 8 to 4
+move 1 from 3 to 7
+move 3 from 4 to 9
+move 2 from 1 to 9
+move 26 from 7 to 4
+move 1 from 2 to 1
+move 7 from 9 to 8
+move 1 from 2 to 5
+move 2 from 5 to 2
+move 8 from 7 to 5
+move 1 from 7 to 3
+move 1 from 3 to 9
+move 2 from 2 to 7
+move 1 from 6 to 4
+move 4 from 8 to 9
+move 1 from 1 to 3
+move 1 from 5 to 6
+move 2 from 5 to 7
+move 17 from 4 to 9
+move 6 from 4 to 9
+move 1 from 3 to 4
+move 6 from 7 to 9
+move 3 from 5 to 6
+move 2 from 7 to 9
+move 4 from 8 to 9
+move 4 from 6 to 4
+move 8 from 4 to 6
+move 1 from 8 to 4
+move 3 from 5 to 2
+move 2 from 4 to 3
+move 1 from 7 to 9
+move 2 from 3 to 5
+move 4 from 6 to 9
+move 1 from 6 to 1
+move 36 from 9 to 4
+move 2 from 5 to 3
+move 3 from 2 to 1
+move 3 from 1 to 4
+move 14 from 4 to 1
+move 1 from 8 to 5
+move 4 from 1 to 3
+move 5 from 9 to 5
+move 2 from 5 to 8
+move 1 from 8 to 9
+move 4 from 9 to 6
+move 3 from 5 to 8
+move 1 from 5 to 6
+move 2 from 1 to 6
+move 2 from 9 to 7
+move 6 from 6 to 4
+move 1 from 1 to 3
+move 29 from 4 to 6
+move 7 from 3 to 4
+move 1 from 8 to 9
+move 3 from 1 to 6
+move 4 from 1 to 4
+move 1 from 8 to 4
+move 4 from 4 to 3
+move 15 from 6 to 8
+move 9 from 4 to 9
+move 1 from 7 to 9
+move 8 from 8 to 3
+move 3 from 6 to 7
+move 1 from 1 to 2
+move 4 from 7 to 6
+move 7 from 8 to 5
+move 1 from 8 to 4
+move 2 from 5 to 7
+move 1 from 2 to 4
+move 5 from 6 to 1
+move 4 from 3 to 2