mirror of
https://github.com/Smaug123/AdventOfCode2022
synced 2025-10-05 01:28:39 +00:00
47 lines
958 B
Forth
47 lines
958 B
Forth
namespace AdventOfCode2022.Test
|
|
|
|
open NUnit.Framework
|
|
open FsUnitTyped
|
|
open AdventOfCode2022
|
|
|
|
[<TestFixture>]
|
|
module TestDay22 =
|
|
|
|
let input =
|
|
""" ...#
|
|
.#..
|
|
#...
|
|
....
|
|
...#.......#
|
|
........#...
|
|
..#....#....
|
|
..........#.
|
|
...#....
|
|
.....#..
|
|
.#......
|
|
......#.
|
|
|
|
10R5L5R10L4R5L5
|
|
"""
|
|
|
|
[<Test>]
|
|
let ``Part 1, given`` () =
|
|
Day22.part1 (StringSplitEnumerator.make '\n' input) |> shouldEqual 6032
|
|
|
|
[<Test>]
|
|
let ``Part 1`` () =
|
|
let input = Assembly.readResource "Day22.txt"
|
|
|
|
Day22.part1 (StringSplitEnumerator.make '\n' input) |> shouldEqual 103224
|
|
|
|
|
|
[<Test>]
|
|
let ``Part 2, given`` () =
|
|
Day22.part2Example (StringSplitEnumerator.make '\n' input) |> shouldEqual 5031
|
|
|
|
[<Test>]
|
|
let ``Part 2`` () =
|
|
let input = Assembly.readResource "Day22.txt"
|
|
|
|
Day22.part2 (StringSplitEnumerator.make '\n' input) |> shouldEqual 189097
|