                            (not= (.get D k) (.get B k)) true,
                            :else (recur (inc k))))]
             :when (not skip)]
-      (vychodil-generate-from object-count attribute-count,
+      (vychodil-generate-from output
+                              object-count attribute-count,
                               incidence-matrix rows,
                               C D (inc j)))))
 

                                            incidence, attribute-derivation,
                                            context-attribute-closure)])
(require '[conexp.contrib.algorithms.close-by-one :as cbo])
(import '[java.util BitSet List ArrayList])
(import '[java.util.concurrent SynchronousQueue])


          empty-down-up (bitwise-object-derivation incidence-matrix
                                                   object-count
                                                   attribute-count
                                                   empty-down)
          output        (chan)]
      (thread (vychodil-generate-from output
                                      object-count
                                      attribute-count
                                      incidence-matrix
                                      rows
                                      empty-down
                                      empty-down-up
                                      0)
              (close! output))
      (map (fn [pair]
             [(to-hashset object-vector (first pair))
              (to-hashset attribute-vector (second pair))])
           (take-while (comp not nil?)
                       (repeatedly #(<!! output)))))))


;;; In-Close (:in-close)
