main.hs 175 B

1234567891011
  1. -- RSA LAB
  2. import Data.Char
  3. type Message = [Int]
  4. stringToMessage::String -> Message
  5. stringToMessage = map ord
  6. messageToString::Message -> String
  7. messageToString = map chr