   (when partial
     (if include? (include-file* path) partial)))
 
-;; TODO rename into export-scene & split out serialize part
 (defn- serialize-lxs
   [scene base-path separate-files?]
   (let [base-name (path-filename base-path)

                    :materials :material
                    :volumes :volume
                    :geometry :shape})
           lxs (serialize-lxs scene* base-path separate?)]
       (if separate?
         (-> lxs
             (str (serialize-lxm scene* base-path))
             (str (serialize-lxo scene* base-path))
             (str (serialize-lxv scene* base-path)))
         lxs))))

(defn- make-transform-matrix
  [{:keys [scale rx ry rz axis theta translate] :or {rx 0 ry 0 rz 0} :as tx}]


(defn- include-partials*
  [partials]
  (apply str (map include-file* partials)))

(defn- inject-scene-partial
