Speed up day 7 a bit (#7)

I'm going mad, why am I doing this

Co-authored-by: Smaug123 <patrick+github@patrickstevens.co.uk>
Reviewed-on: #7

AdventOfCode2023.FSharp/Test/TestDay7.fs

@@ -13,11 +13,11 @@ module TestDay7 =
 
     [<Test>]
     let part1Sample () =
-        sample |> Day7.part1 |> shouldEqual 6440
+        sample |> Day7.part1 |> shouldEqual 6440ul
 
     [<Test>]
     let part2Sample () =
-        sample |> Day7.part2 |> shouldEqual 5905
+        sample |> Day7.part2 |> shouldEqual 5905ul
 
     [<Test>]
     let part1Actual () =
@@ -30,7 +30,7 @@ module TestDay7 =
                 Assert.Inconclusive ()
                 failwith "unreachable"
 
-        Day7.part1 s |> shouldEqual 250058342
+        Day7.part1 s |> shouldEqual 250058342ul
 
     [<Test>]
     let part2Actual () =
@@ -43,4 +43,4 @@ module TestDay7 =
                 Assert.Inconclusive ()
                 failwith "unreachable"
 
-        Day7.part2 s |> shouldEqual 250506580
+        Day7.part2 s |> shouldEqual 250506580ul