Implement messageToString

tp/rsa/main.hs

@@ -6,3 +6,6 @@ type Message = [Int]
 
 stringToMessage::String -> Message
 stringToMessage = map ord
+
+messageToString::Message -> String
+messageToString = map chr