Parcourir la source

Implement messageToString

DricomDragon il y a 5 ans
Parent
commit
0760eae62c
1 fichiers modifiés avec 3 ajouts et 0 suppressions
  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