 (def model @@(get models :es))
 
 (deftest generate-regular-conditional
-  (let [result (generate {:synsem {:subcat '()
+  (let [result (generate {:synsem {:subcat []
                                    :cat :verb
                                    :sem {:pred :sleep
                                          :subj {:pred :I}

  (let [result (generate 
                {:root {:espanol {:espanol "abrazar"}}
                 :synsem {:cat :verb
                          :subcat '()
                          :sem {:subj {:pred :I}}
                          :infl :preterito}}
                model)]

            (= "abracé" (fo result))))))
                
(deftest llamarse
  (let [result (generate {:synsem {:subcat [] :cat :verb :sem {:pred :be-called}}} model)]
    (is (not (empty? (fo result))))))

(deftest llamo
  (let [result (fo (generate {:synsem {:subcat []
                                       :cat :verb
                                       :sem {:tense :present
                                             :aspect :simple
