          (conjugate "ardēre"
                     {:synsem {:sem {:subj {:pred :noi}}}}))))
 
-(def model (-> ((-> models target-language)) deref))
+(defn model [] (-> ((-> models target-language)) deref))
 
 (deftest generate-present
   (is (= "ardetis"

        result (read-one {:root "ardēre"
                          :synsem {:sem {:tense :past
                                         :aspect :progressive}}}
                         model source-model)
        ;; for specific literal strings in the result.
        subj (get-in result [:semantics :subj :pred])
        possible-answer (first (get result :targets))]

              {:root "ardēre"
               :synsem {:sem {:subj {:pred :voi}
                              :tense :present}}}
              (model))))))

(deftest reader1
  (let [spec {:synsem {:sem {:subj {:pred :lui}
