25 lines
946 B
Haskell
Executable file
25 lines
946 B
Haskell
Executable file
#! /usr/bin/env -S"ANSWER=42" nix-shell
|
|
#! nix-shell -p ghcid
|
|
#! nix-shell -p "haskellPackages.ghcWithPackages (p: with p; [shower])"
|
|
#! nix-shell -i "ghcid -c 'ghci -Wall' -T main"
|
|
|
|
{-# LANGUAGE OverloadedStrings #-}
|
|
|
|
exampleData :: [String]
|
|
exampleData =
|
|
[ "light red bags contain 1 bright white bag, 2 muted yellow bags."
|
|
, "dark orange bags contain 3 bright white bags, 4 muted yellow bags."
|
|
, "bright white bags contain 1 shiny gold bag."
|
|
, "muted yellow bags contain 2 shiny gold bags, 9 faded blue bags."
|
|
, "shiny gold bags contain 1 dark olive bag, 2 vibrant plum bags."
|
|
, "dark olive bags contain 3 faded blue bags, 4 dotted black bags."
|
|
, "vibrant plum bags contain 5 faded blue bags, 6 dotted black bags."
|
|
, "faded blue bags contain no other bags."
|
|
, "dotted black bags contain no other bags."
|
|
]
|
|
|
|
main :: IO ()
|
|
main = do
|
|
_input <- lines <$> readFile "day7/input"
|
|
putStrLn "Day 7 - Part 1"
|
|
print $ exampleData
|