       (is (= expected-projects-keywords
              (parse-iso19115-projects-keywords metadata-xml))))))
 
-(defn- generate-and-validate-xml
-  "Generates collection XML for the given format based on the provided UMM record. Performs
-  schema validation against the generated XML and returns any validation errors."
-  [format record]
-  (core/validate-xml :collection format
-                     (core/generate-metadata :collection format record)))
-
 (def minimal-umm-c
   "UMM-C with the bare minimum number of fields. It does not include all required fields because
   there is existing data in the system which does not contain all of the required UMM-C fields. We

          dest-format collection-destination-formats
          :when (not= origin-format dest-format)]
    (testing (str origin-format " to " dest-format)
      (is (empty? (generate-and-validate-xml umm-c-record dest-format :collection))))))

(deftest roundtrip-example-record
  (doseq [metadata-format tested-formats]

  (js/parse-umm-c {:ShortName "foo" :Version "bar"}))

(deftest minimal-dif10
  (is (empty? (generate-and-validate-xml :collection :dif10 minimal-umm-c))))

(comment

