Initial data commit
This commit is contained in:
parent
72d218235f
commit
f23f22d71c
199087 changed files with 3378941 additions and 0 deletions
12
Task/String-comparison/Clojure/string-comparison-6.clj
Normal file
12
Task/String-comparison/Clojure/string-comparison-6.clj
Normal file
|
|
@ -0,0 +1,12 @@
|
|||
(defn str-fuzzy= [a b]
|
||||
(let [cook (fn [v] (clojure.string/trim (str v)))]
|
||||
(= (cook a) (cook b))))
|
||||
|
||||
(str-fuzzy= "abc" " abc") ; true
|
||||
(str-fuzzy= "abc" "abc ") ; true
|
||||
(str-fuzzy= "abc" " abc ") ; true
|
||||
|
||||
(str-fuzzy= " 42 " 42) ; true
|
||||
(str-fuzzy= " 42 " (* 6 7)) ; true
|
||||
|
||||
(str-fuzzy= " 2.5" (/ 5.0 2)) ; true
|
||||
Loading…
Add table
Add a link
Reference in a new issue