Data update

This commit is contained in:
Ingy döt Net 2024-03-06 22:25:12 -08:00
parent ed705008a8
commit 0df55f9f24
2196 changed files with 32999 additions and 3075 deletions

View file

@ -0,0 +1,7 @@
(defn fast-caesar [n s]
(let [m (mod n 26)
upper (map char (range 65 91))
upper->new (zipmap upper (drop m (cycle upper)))
lower (map char (range 97 123))
lower->new (zipmap lower (drop m (cycle lower)))]
(clojure.string/escape s (merge upper->new lower->new))))

View file

@ -33,14 +33,14 @@ class Encrypting : Enumerator
if (-1 < index)
{
^ Letters[(_key+index).mod:26]
^ Letters[(_key+index).mod(26)]
}
else
{
index := BigLetters.indexOf(0, ch);
if (-1 < index)
{
^ BigLetters[(_key+index).mod:26]
^ BigLetters[(_key+index).mod(26)]
}
else
{
@ -63,11 +63,11 @@ public program()
{
console.printLine("Original text :",TestText);
var encryptedText := TestText.encrypt:Key;
var encryptedText := TestText.encrypt(Key);
console.printLine("Encrypted text:",encryptedText);
var decryptedText := encryptedText.decrypt:Key;
var decryptedText := encryptedText.decrypt(Key);
console.printLine("Decrypted text:",decryptedText);