<commit_before>(ns anagram.test (:use clojure.test))
(load-file "anagram.clj")

(deftest no-matches
  (is (= [] (anagram/anagrams-for "diaper" ["hello" "world" "zombies" "pants"]))))

(deftest detect-simple-anagram
  (is (= ["ab"] (anagram/anagrams-for "ba" ["ab" "abc" "bac"]))))

(deftest does-not-confuse-different-duplicates
  (is (= [] (anagram/anagrams-for "abb" ["baa"]))))

(deftest detect-anagram
  (is (= ["inlets"] (anagram/anagrams-for "listen" ["enlists" "google" "inlets" "banana"]))))

(deftest multiple-anagrams
  (is (= ["gallery" "regally" "largely"]
         (anagram/anagrams-for "allergy" ["gallery" "ballerina" "regally" "clergy" "largely" "leading"]))))

(run-tests)<commit_msg>updated clojure tests with real words<commit_after>(ns anagram.test (:use clojure.test))
(load-file "anagram.clj")

(deftest no-matches
  (is (= [] (anagram/anagrams-for "diaper" ["hello" "world" "zombies" "pants"]))))

(deftest detect-simple-anagram
  (is (= ["tan"] (anagram/anagrams-for "ant" ["tan" "stand" "at"]))))

(deftest does-not-confuse-different-duplicates
  (is (= [] (anagram/anagrams-for "galea" ["eagle"]))))

(deftest detect-anagram
  (is (= ["inlets"] (anagram/anagrams-for "listen" ["enlists" "google" "inlets" "banana"]))))

(deftest multiple-anagrams
  (is (= ["gallery" "regally" "largely"]
         (anagram/anagrams-for "allergy" ["gallery" "ballerina" "regally" "clergy" "largely" "leading"]))))

(run-tests)
{'fraction_non_alphanumeric': 0.2217573221757322, 'fraction_numerical': 0.0, 'mean_word_length': 5.349557522123894, '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': '2879926', 'n_tokens_mistral': 591, 'n_tokens_neox': 569, 'n_words': 114}