Solved RomanNumerals in Haskell