doseq_multi_bind_with_let_modifier.clj

(doseq [[printer {:keys [id sub-ids]}] {(partial println "sub1") {:id :A :sub-ids [11 12 13 14]}
                                        (partial println "sub2") {:id :B :sub-ids [21 22 23 24]}}
        :let [id-str (do (println id) (name id))]
        sub-id sub-ids]
  (printer id-str sub-id))

;;; :A
;;; sub1 A 11
;;; sub1 A 12
;;; sub1 A 13
;;; sub1 A 14
;;; :B
;;; sub2 B 21
;;; sub2 B 22
;;; sub2 B 23
;;; sub2 B 24