Files
2022-12-06 08:25:16 +00:00

37 lines
801 B
Forth

namespace AdventOfCode2022.Test
open NUnit.Framework
open FsUnitTyped
open AdventOfCode2022
[<TestFixture>]
module TestDay4 =
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"""
[<Test>]
let ``Part 1, given`` () =
Day4.part1 (StringSplitEnumerator.make '\n' testInput) |> shouldEqual 2
[<Test>]
let ``Part 1`` () =
let input = Assembly.readResource "Day4.txt"
Day4.part1 (StringSplitEnumerator.make '\n' input) |> shouldEqual 433
[<Test>]
let ``Part 2, given`` () =
Day4.part2 (StringSplitEnumerator.make '\n' testInput) |> shouldEqual 4
[<Test>]
let ``Part 2`` () =
let input = Assembly.readResource "Day4.txt"
Day4.part2 (StringSplitEnumerator.make '\n' input) |> shouldEqual 852