<commit_before>(defun reverse-cypher (msg)
  (reverse msg))

(reverse-cypher "123")

(defconstant +letters+ "abcdefghijklmnopqrstuvwxyz")

(defun get-char-with-shift (c shift)
  (let ((pos (position c +letters+)))
    (if pos
	(schar +letters+ (mod (+ pos shift) 26))
	c)))

(defun ceasar-encrypt (str shift)
  (map-into (make-string (length str)) (lambda (c) (get-char-with-shift c shift)) str))

(ceasar-encrypt (ceasar-encrypt "ab c" 28) -28)
<commit_msg>decrypt-ceasar funktion hinzugefuegt<commit_after>(defun reverse-cypher (msg)
  (reverse msg))

(reverse-cypher "123")

(defconstant +letters+ "abcdefghijklmnopqrstuvwxyz")

(defun get-char-with-shift (c shift)
  (let ((pos (position c +letters+)))
    (if pos
	(schar +letters+ (mod (+ pos shift) 26))
	c)))

(defun ceasar-encrypt (str shift)
  (map-into (make-string (length str)) (lambda (c) (get-char-with-shift c shift)) str))

(defun ceasar-decrypt (str shift)
  (ceasar-encrypt str (- 0 shift)))

(ceasar-encrypt (ceasar-encrypt "ab c" 28) -28)

{'fraction_non_alphanumeric': 0.1702970297029703, 'fraction_numerical': 0.01881188118811881, 'mean_word_length': 4.648044692737431, 'pattern_counts': {'":': 0, '<': 3, '<?xml version=': 0, '>': 3, 'https://': 0, 'lorem ipsum': 0, 'www.': 0, 'xml': 0}, 'pii_count': 0, 'substrings_counts': 0, 'word_list_counts': {'cursed_substrings.json': 0, 'profanity_word_list.json': 0, 'sexual_word_list.json': 0, 'zh_pornsignals.json': 0}}
{'dir': 'git-commits-cleaned', 'id': '4698090', 'n_tokens_mistral': 436, 'n_tokens_neox': 406, 'n_words': 106}