You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
22 lines
808 B
22 lines
808 B
(ns cipher-analytical-machine.symbols.frequencies-test
|
|
(:require
|
|
[clojure.test :refer :all]
|
|
[cipher-analytical-machine.symbols.frequencies :refer :all]))
|
|
|
|
(deftest calculate-char-index-test
|
|
(let [symbol-map english-letter-frequencies]
|
|
(testing "The map must be converted to 'etaoinsrhldcumfpgwybvkxjqz'"
|
|
(is (= "etaoinsrhldcumfpgwybvkxjqz"
|
|
(map-to-string symbol-map))))))
|
|
|
|
(deftest default-frequency-factory-test
|
|
(testing "Factory supports languages: English (en), Ukrainian (uk). If language code is unidentified, then it must have the 'en'."
|
|
(are [language-code expected-map-size]
|
|
(->> (default-frequency-factory language-code)
|
|
count
|
|
(= expected-map-size))
|
|
"en" 26
|
|
"uk" 34
|
|
"Maybe a code" 26)))
|
|
|