26 lines
680 B
Haskell
26 lines
680 B
Haskell
module AoCSpec.Y2023Spec (spec) where
|
|
|
|
import AoC
|
|
import Test.Hspec
|
|
|
|
spec :: Spec
|
|
spec = do
|
|
describe "Day 1" do
|
|
it "calculates correctly" do
|
|
runAoC Y2023 D01 `shouldReturn` Right [54331, 54518]
|
|
|
|
describe "Day 2" do
|
|
it "calculates correctly" do
|
|
runAoC Y2023 D02 `shouldReturn` Right [2369, 66363]
|
|
|
|
describe "Day 3" do
|
|
it "calculates correctly" do
|
|
runAoC Y2023 D03 `shouldReturn` Right [528799, 84907174]
|
|
|
|
describe "Day 4" do
|
|
it "calculates correctly" do
|
|
runAoC Y2023 D04 `shouldReturn` Right [24542, 8736438]
|
|
|
|
describe "Day 5" do
|
|
it "calculates the example correctly" do
|
|
runAoCExample Y2023 D05 `shouldReturn` Right [35]
|