RosettaCodeData/Task/Parsing-RPN-calculator-algo.../Haskell/parsing-rpn-calculator-algo...

3 lines
94 B
Haskell

calcRPNM :: Logger m => String -> m [Double]
calcRPNM = foldM (verbose interprete) [] . words