Caesar cipher: Difference between revisions

m
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 decipherdecyphering function====
1. Note
<pre>if rot(text shift) = cyphertext then rot(cyphertext -shift) = text</pre>
Line 1,896:
2. Program
 
Text manipulation is a source of annoyancetricky. Requiescat in pace.
 
<lang lisp>(defconstant +rot+ "AaBbCcDdEeFfGgHhIiJjKkLlMmNnOoPpQqRrSsTtUuVvWwXxYyZz")
422

edits