[juxt.modular/co-dependency "0.2.0"]

(defproject your-project "your-version"
   ...
   :dependencies [[juxt.modular/co-dependency "0.2.0"]]
   ...
   )

(ns your-app-ns
  (:require [com.stuartsierra.component :refer (using)]
            [modular.component.co-dependency :refer (co-using)]))

(defn system-1 []
  (map->System1 {:a (-> (component-a)
                        (co-using [:b]))
                 :b (-> (component-b)
                        (using [:a]))
                 :c (-> (component-c)
                        (using [:a :b]))
                 :d (-> (component-d)
                        (using {:b :b :c :c}))
                 :e (component-e)})

(def system-started-with-co-deps (co-dependency/start-system (system-1)))

(def a (-> system-started-with-co-deps :a))
(def a-from-b (:a @(-> system-started-with-co-deps :a :b)))
;; checking identity equality
(assert (= a a-from-b))

(defn start
  "Starts the current development system."
  []
  (alter-var-root #'system co-dependency/start-system))

(:dependency-key component)
;;=> dependency

@(:co-dependency-key component)
;;=> co-dependency