
import Data.Bits (xor)

-- HINT: you may find the system-wide dictionary useful
-- /usr/share/dict/words

-- HINT: The message contains only letters and commonly used punctuation

toInt :: Char -> Int
toInt = fromEnum


toChar :: Int -> Char
toChar = toEnum


intToDouble :: Int -> Double
intToDouble = fromIntegral




 HINT: you may find the system-wide dictionary useful
 /usr/share/dict/words
 HINT: The message contains only letters and commonly used punctuation

import Data.Bits (xor)



toInt :: Char -> Int
toInt = fromEnum


toChar :: Int -> Char
toChar = toEnum


intToDouble :: Int -> Double
intToDouble = fromIntegral



