this repo has no description
1module Main where
2
3import Lib
4import Data.List.Split
5
6main :: IO ()
7main = do
8 inputStr <- readFile "input.txt"
9 let input = splitOn "\n" $ init inputStr
10 registers = processInstructions input
11 -- largestValue = findLargestValue registers
12 part2 = largestEver registers
13 in print part2