Caesar cipher: Difference between revisions
m
→W/ decryption function
Cyril Nocton (talk | contribs) |
Cyril Nocton (talk | contribs) |
||
Line 1,849:
=={{header|Common Lisp}}==
====W/
<lang lisp>(defun encipher-char (ch key)
(let* ((c (char-code ch)) (la (char-code #\a)) (ua (char-code #\A))
Line 1,890:
> (caesar-decipher "Qeb nrfzh yoltk clu grjmp lsbo qeb ixwv ald" 23)
"The quick brown fox jumps over the lazy dog"</pre>
====W/o decyphering function====
1. Note
| |||