13 lines
289 B
Haskell
13 lines
289 B
Haskell
module Main where
|
|
|
|
import Commons
|
|
import qualified Part1
|
|
import qualified Part2
|
|
|
|
|
|
main = do almanac <- parse
|
|
let part1Res = minimum $ Part1.getLocations almanac
|
|
print part1Res
|
|
let part2Res = minimum $ Part2.getLocationsStarts almanac
|
|
print part2Res
|