3 lines
131 B
Haskell
3 lines
131 B
Haskell
readProgram :: String -> [Ratio Int]
|
|
readProgram = map (toFrac . splitOn "/") . splitOn ","
|
|
where toFrac [n,d] = read n % read d
|