 
 (deftest gestiscono
   (let [result
-        (generate {:synsem {:subcat ()
+        (generate {:synsem {:subcat []
                             :cat :verb
                             :sem {:subj {:pred :loro}
                                   :pred :manage

                          (repeatedly
                           #(generate {:synsem {:cat :verb
                                                :sem {:tense :future}
                                                :subcat ()}}
                                      :model (small))))]
    (is (= do-this-many
           (count (map-fn (fn [expr]

                          (repeatedly
                           #(generate {:synsem {:cat :verb
                                                :sem {:tense :conditional}
                                                :subcat []}}
                                      :model (small))))]
    (is (= do-this-many
           (count (map-fn (fn [expr]
