         ;; indices from paths to subsets of the lexicon
         indices (create-indices lexicon-for-generation)]
         
-    {:name "medium"
+    {:index-fn (fn [spec] (lookup-spec spec indices))
+     :name "medium"
      :generate {:lexicon lexicon-for-generation}
      :grammar grammar
-     :index-fn (fn [spec] (lookup-spec spec indices))
      :language "it"
      :language-keyword :italiano
      :lexical-cache (atom (cache/fifo-cache-factory {} :threshold 1024))

                     (= (:rule %) "s-imperfect-nonphrasal")
                     (= (:rule %) "s-aux")
                     (= (:rule %) "vp-32")
                     (= (:rule %) "vp-aux")
                     (= (:rule %) "vp-aux-22")
                     (= (:rule %) "vp-present")
                     (= (:rule %) "vp-pronoun-nonphrasal")

                                v)]
                  (if (not (empty? filtered-v))
                    [k filtered-v]))))
        lexicon-for-generation (lexicon-for-generation lexicon)

        indices (create-indices lexicon-for-generation)]
        
    {:index-fn (fn [spec] (lookup-spec spec indices))

     :name "small"
     :morph-walk-tree (fn [tree]
                        (do
                          (merge tree
