   (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)]

  writing it to an XML format and parsing it back. Conversion from a UMM record into metadata
  can be lossy if some fields are not supported by that format"
  (:require [cmr.umm-spec.models.common :as cmn]))

;;; Utililty Functions


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

(defmethod convert-internal :dif
  [umm-coll _]
  (update-in umm-coll [:TemporalExtent] dif-temporal))

;; ISO 19115-2
