Initialise day 4

This commit is contained in:
George Thomas 2025-12-04 10:00:15 +00:00
parent beaacd3e03
commit 0844d4af2f
6 changed files with 29 additions and 1 deletions

View File

@ -8,6 +8,7 @@ import Puzzle
import Puzzles.Day1 qualified as Day1
import Puzzles.Day2 qualified as Day2
import Puzzles.Day3 qualified as Day3
import Puzzles.Day4 qualified as Day4
import Test.Tasty
import Test.Tasty.Golden (goldenVsString)
import Test.Tasty.Ingredients.ConsoleReporter
@ -23,6 +24,7 @@ main =
[ Day1.puzzle
, Day2.puzzle
, Day3.puzzle
, Day4.puzzle
]
<&> \Puzzle{number, parser, parts} ->
let

14
haskell/Puzzles/Day4.hs Normal file
View File

@ -0,0 +1,14 @@
module Puzzles.Day4 (puzzle) where
import Puzzle
puzzle :: Puzzle
puzzle =
Puzzle
{ number = 4
, parser = pure ()
, parts =
[ \() ->
"TODO"
]
}

View File

@ -13,6 +13,7 @@ executable aoc
Puzzles.Day1
Puzzles.Day2
Puzzles.Day3
Puzzles.Day4
default-language: GHC2024
default-extensions:
BlockArguments

10
inputs/examples/4 Normal file
View File

@ -0,0 +1,10 @@
..@@.@@@@.
@@@.@.@.@@
@@@@@.@.@@
@.@@@@..@.
@@.@@@@.@@
.@@@@@@@.@
.@.@.@.@@@
@.@@@.@@@@
.@@@@@@@@.
@.@.@@@.@.

@ -1 +1 @@
Subproject commit 69a0d6cdd7aa47dedb9b6653a27bd5e717d766fb
Subproject commit 7d234e9ef9f6a1ea8b263e2a2e9b936eba1fcc46

1
outputs/examples/4/1 Normal file
View File

@ -0,0 +1 @@
13