Files
AdventOfCode2022/AdventOfCode2022.Test/Day13.fs
2022-12-12 17:40:39 +00:00

33 lines
752 B
Forth

namespace AdventOfCode2022.Test
open NUnit.Framework
open FsUnitTyped
open AdventOfCode2022
[<TestFixture>]
module TestDay13 =
let input =
"""
"""
[<Test>]
let ``Part 1, given`` () =
Day13.part1 (StringSplitEnumerator.make '\n' input) |> shouldEqual 31
[<Test>]
let ``Part 1`` () =
let input = Assembly.readResource "Day13.txt"
Day13.part1 (StringSplitEnumerator.make '\n' input) |> shouldEqual 456
[<Test>]
let ``Part 2, given`` () =
Day13.part2 (StringSplitEnumerator.make '\n' input) |> shouldEqual 29
[<Test>]
let ``Part 2`` () =
let input = Assembly.readResource "Day13.txt"
Day13.part2 (StringSplitEnumerator.make '\n' input) |> shouldEqual 454