 (ns babel.test.en
   (:refer-clojure :exclude [get-in])
-  (:require [babel.engine :as engine]
+  (:require [babel.directory :refer [models]]
+            [babel.engine :as engine]
             [babel.english :refer [analyze fo-ps generate parse sentences]]
             [babel.english.grammar :as grammar]
             [babel.english.lexicon :refer [lexicon]]

                                  :spec {:pred :of
                                         :of {:pred :Juana}}
                                  :pred :cane}}}
                  :model medium)]
    (is (not (nil? result)))
    (is (= "Juana's red dog" (fo result)))))


                   (repeatedly #(let [foo (generate {:modified false
                                                     :synsem {:cat :verb
                                                              :sem {:pred :be-called}}}
                                                    :model (medium))]
                                  (is (not (= "" (fo foo))))
                                  (log/info (str "fo: " (fo foo)))
                                  (fo foo)))))))))
