           "e" "ngi" "nee" "r"
           "too" "ls"
           "tu" "ne"]
-         (syntagmata/flat-sound-transitions :english test-word-list))))
+         (syntagmata/flat-sound-transitions test-word-list :english))))
 
 (deftest positional-sound-transitions
-  (let [trans (syntagmata/sound-transitions :english test-word-list)]
+  (let [trans (syntagmata/sound-transitions test-word-list :english)]
     (is (= ["a" "a" "a" "ca" "e" "e" "too" "tu"]
            (syntagmata/positional-sound-transitions :initial trans)))
     (is (= ["ppli" "ca" "tio" "ncy" "clo" "poe" "ngi" "nee"]

          4
          2
          2]
         (syntagmata/pseudo-syllable-counts :english test-word-list))))

(deftest pseudo-syllable-freqs
  (is (= {1 1
          2 4
          5 2
          4 1}
         (syntagmata/pseudo-syllable-freqs :english test-word-list))))

(deftest sound-transitions
  (is (= [["a"]

          ["" "ng" "n" "r"]
          ["t" "ls"]
          ["t" "n"]]
         (syntagmata/pseudo-syllables test-word-list :english))))

(deftest pseudo-syllable-counts
  (is (= [1
