working pangram

Author: Ivan Shamshurin

otus-02/src/otus_02/homework/pangram.clj

@@ -1,6 +1,15 @@
 (ns otus-02.homework.pangram
-  (:require [clojure.string :as string]))
+  (:require [clojure.string :as string])
+  (:require [otus-02.homework.palindrome :as pal]))
 
+(def alphabet-count 26)
 
-(defn is-pangram [test-string])
+(defn is-pangram [test-string]
+  (let [test-set (-> test-string
+                     (pal/transform-string)
+                     (vec)
+                     (set))]
+    (== (count test-set) alphabet-count)))
 
+(comment
+  (is-pangram "The quick brown fox jumps over the lazy dog"))