                            (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)
+      (vychodil-generate-from object-count attribute-count,
+                              incidence-matrix rows,
+                              C D (inc j)))))
+
+(alter-meta! (var vychodil-generate-from) assoc :private true)
 
 (defmethod concepts :vychodil
   [_ context]

              (to-hashset attribute-vector B)])
           As Bs))))


;;; Parallel-Close-by-One (:pcbo)

(defmethod concepts :pcbo

          (.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)))
