Parallel brute force: Difference between revisions

Content added Content deleted
Line 831: Line 831:
parseInput :: [String] -> Int
parseInput :: [String] -> Int
parseInput [] = 2
parseInput [] = 2
parseInput (s:xs) = if all isDigit s then read s else 2
parseInput (s:_) = if all isDigit s then read s else 2


main :: IO ()
main :: IO ()