swuecho · July 24, 2012 20:45
diff --git a/daily_80.clj b/daily_80.clj
 (ns playground.core)
 ;;http://www.reddit.com/r/dailyprogrammer/comments/x0v3e/7232012_challenge_80_easy_anagrams/
 (defn  anagrams? [x y] 
  (and (= (sort x) (sort y))
       (not= x y)))

 (defn anagrams [x] 
  (filter #(anagrams? (.toLowerCase x) %) dict))

 (def dict (clojure.string/split-lines
           (slurp
            (java.io.FileReader. "/home/echo/Documents/dailyprogrammer/Anagrams_80.txt"))))

 (anagrams "TRIANGLE")
	(ns playground.core)
	;;http://www.reddit.com/r/dailyprogrammer/comments/x0v3e/7232012_challenge_80_easy_anagrams/
	(defn anagrams? [x y]
	(and (= (sort x) (sort y))
	(not= x y)))

	(defn anagrams [x]
	(filter #(anagrams? (.toLowerCase x) %) dict))

	(def dict (clojure.string/split-lines
	(slurp
	(java.io.FileReader. "/home/echo/Documents/dailyprogrammer/Anagrams_80.txt"))))

	(anagrams "TRIANGLE")
No results found