diff options
Diffstat (limited to 'execs/Day15.hs')
-rw-r--r-- | execs/Day15.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/execs/Day15.hs b/execs/Day15.hs index cd498fb..c54e331 100644 --- a/execs/Day15.hs +++ b/execs/Day15.hs | |||
@@ -1,8 +1,8 @@ | |||
1 | module Main where | 1 | module Main where |
2 | 2 | ||
3 | import Data.Maybe | 3 | import Data.List.Split |
4 | import Data.List.Split | 4 | import qualified Data.Map as M |
5 | import qualified Data.Map as M | 5 | import Data.Maybe |
6 | 6 | ||
7 | run :: [Int] -> Int -> [Int] -> Int | 7 | run :: [Int] -> Int -> [Int] -> Int |
8 | run ls start input = fst $ foldl fn (start, startMap) ls | 8 | run ls start input = fst $ foldl fn (start, startMap) ls |