Permalink
Find file
Fetching contributors…
Cannot retrieve contributors at this time
9 lines (6 sloc) 212 Bytes
import EulerMath.Triangle
import EulerUtil.Io
euler18 :: String -> String
euler18 = show . findMax . stringToIntArray
euler18file :: FilePath -> IO()
euler18file fileName = applyFunctionToFile fileName euler18