   (update-in t1 [:RangeDateTime] concat (:RangeDateTime t2)))
 
 (defn split-temporals
+  "Returns a seq of temporal extents with a new extent for each value under key
+  k (e.g. :RangeDateTime) in each source temporal extent."
   [k temporal-extents]
   (reduce (fn [result extent]
             (if-let [values (get extent k)]

       ;; Then make sure we get the right record type out.
       (map cmn/map->TemporalExtentType)))

(defn expected-dif
  "Returns a UMM record with only features supported by DIF 9."
  [umm-coll]
  (update-in umm-coll [:TemporalExtent] dif-temporal))

;; ISO 19115-2


;; ECHO 10

(defmethod convert-internal :echo10
  [umm-coll _]
  ;; ECHO10 returns entry id as a combination of short name and version. It generates short name
  ;; from entry id. So the expected entry id when going from umm->echo10->umm is the original
  ;; entry id concatenated with the version id.
