MK
Size: a a a
MK
MK
AC
MK
AC
AC
(for [[k v :as path] (c-s-l-m)]
(let [[p] (first (filter #(= "Вольные упражнения (муж)" (second %)) (map-indexed vector k)))]
[p (for [g v] {(:title g)
(sort-by #(-> % :poses (get p)) (:gyms g))
})]))
E
AC
S
DF
DF
IG
(defn flip [f]
(fn [& args]
(apply f (reverse args))))
IG
LL
DL
ND
ST
DF