Преглед на файлове

Implement messageToString

DricomDragon преди 5 години
родител
ревизия
0760eae62c
променени са 1 файла, в които са добавени 3 реда и са изтрити 0 реда
  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