 
                           lexemes-before-phrases
                           (take max-generated-complements
-                                (lazy-cat filtered-lexical-complements phrasal-complements))
+                                (lazy-cat lexical-complements phrasal-complements))
                           true
                           (do
                             (log/trace (str "successfully generated some complements for bolt:"

        bolt-child-synsem (strip-refs (get-in bolt (concat path [:synsem]) :top))
        bolt-child-italiano (strip-refs (get-in bolt (concat path [:italiano]) :top))
        
        filtered-lexical-complements (lazy-shuffle
                                      (filter (fn [lexeme]
                                                (and (not (= :fail (unify (strip-refs (get-in lexeme [:synsem] :top))
                                                                          bolt-child-synsem)))

                                            " matching spec:"
                                            (spec-info spec)))

                            (take max-generated-complements (lazy-cat phrasal-complements lexical-complements)))))))))

(defn candidate-parents [rules spec]
  "find subset of _rules_ for which each member unifies successfully with _spec_"
