warrence/AdventOfCode2023
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Added solution for "Day 16: The Floor Will Be Lava", part 2

Browse Source
This commit is contained in:
Stefan Müller
2023-12-19 17:26:18 +01:00
committed by Stefan Müller
parent e9737f0265
commit 01ec0be32c
2 changed files with 148 additions and 81 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
tests/UFloorWillBeLavaTestCases.pas
View File

@@ -33,6 +33,7 @@ type
function CreateSolver: ISolver; override;
published
procedure TestPart1;
procedure TestPart2;
end;
{ TFloorWillBeLavaExampleTestCase }
@@ -42,6 +43,7 @@ type
function CreateSolver: ISolver; override;
published
procedure TestPart1;
procedure TestPart2;
end;
implementation
@@ -58,6 +60,11 @@ begin
AssertEquals(7392, FSolver.GetResultPart1);
end;
procedure TFloorWillBeLavaFullDataTestCase.TestPart2;
begin
AssertEquals(7665, FSolver.GetResultPart2);
end;
{ TFloorWillBeLavaExampleTestCase }
function TFloorWillBeLavaExampleTestCase.CreateSolver: ISolver;
@@ -70,6 +77,11 @@ begin
AssertEquals(46, FSolver.GetResultPart1);
end;
procedure TFloorWillBeLavaExampleTestCase.TestPart2;
begin
AssertEquals(51, FSolver.GetResultPart2);
end;
initialization
RegisterTest(TFloorWillBeLavaFullDataTestCase);