Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- (defparameter *code* "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789")
- (defun encode (n) (aref *code* n))
- (defun decode (c) (position c *code*))
- (assert (= 3 (decode (encode 3))))
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement