Roman numerals/Decode: Difference between revisions

m
Line 3,340:
main :: IO ()
main = print $ fromRoman <$> ["MDCLXVI", "MCMXC", "MMVIII", "MMXVI", "MMXVII"]</lang>
 
 
Where the left fold above could also be rewritten [http://wiki.haskell.org/Foldr_Foldl_Foldl%27 | as a right fold].
<lang Haskell>import qualified Data.BoolMap.Strict as (bool)M
import qualified Data.Map.Strict as M
import Data.Maybe (maybe)
 
9,655

edits