1
0
Fork 0
advent-of-code/2020/05/part1.hs
Zach Perrault 0e931fe431
solve: day 5
- solve: day 5, part 1
 - solve: day 5, part 2
2020-12-05 11:09:41 -05:00

9 lines
165 B
Haskell
Executable file

#!/usr/bin/env runghc
import Day5
main = interact solve
solve = show . maxSeatId . map (read :: String -> BoardingPass) . lines
maxSeatId = maximum . map seatId