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