{-# LANGUAGE LambdaCase #-}
module Main where

import qualified Day1
import System.Environment (getArgs)

main :: IO ()
main = do
  getArgs >>= \case
    ["day1"] -> Day1.run
    args -> error $ "Invlaid args: " <> show args