Browse Source

Implement messageToString

DricomDragon 5 years ago
parent
commit
0760eae62c
1 changed files with 3 additions and 0 deletions
  1. 3 0
      tp/rsa/main.hs

+ 3 - 0
tp/rsa/main.hs

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