adventofcode/2023/09/part1.t

18 lines
290 B
Perl
Raw Normal View History

2023-12-09 17:44:53 +00:00
use 5.38.0;
use Test2::V0;
use Path::Tiny;
use Part1;
my $input = path('input')->slurp;
is Part1::predict(qw/0 3 6 9 12 15/) => 18;
is Part1::predict(qw/1 3 6 10 15 21/) => 28;
is Part1::predict(qw/10 13 16 21 30 45/) => 68;
2023-12-09 17:58:19 +00:00
is Part1::solution_1($input) => 1884768153;
2023-12-09 17:44:53 +00:00
done_testing;