               (to-hashset attribute-vector B)])
            As Bs))))
 
-
 ;;; Parallel-Close-by-One (:pcbo)
 
 (defmethod concepts :pcbo

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

(alter-meta! (var generate-from) assoc :private true)

(defmethod concepts :vychodil
  [_ context]

          (.set D j false))))
    [C, D]))

(defg vychodil-generate-from
  [object-count, attribute-count, incidence-matrix, rows, ^BitSet A, ^BitSet B, y]
  (yield [A, B])
  (when (and (not (== attribute-count (.cardinality B)))
