         gpsa (dg/psa "a-float" [7.0])
         i1 (dc/instrument {:short-name "instrument-Sn A"})
         ir1 (dg/instrument-ref {:short-name "instrument-Sn A"})
-        p1 (dc/platform {:short-name "platform-Sn A" :instruments [i1]})
-        pr1 (dg/platform-ref {:short-name "platform-Sn A" :instrument-refs [ir1]})
+        p1 (dc/platform {:short-name "Terra" :instruments [i1]})
+        pr1 (dg/platform-ref {:short-name "AM-1" :instrument-refs [ir1]})
+        pr2 (dg/platform-ref {:short-name "Terra" :instrument-refs [ir1]})
         projects (dc/projects "proj")
         mbr1 (umm-s/set-coordinate-system :geodetic (m/mbr 10 10 20 0))
         gran-spatial-rep (apply dg/spatial [mbr1])

                                            :entry-id "short_name5_version"))
        _ (d/ingest "PROV1" iso-smap-coll {:format :iso-smap})
        gran-for-echo10-coll (dg/granule echo10-coll gran-data)
        gran-for-dif-coll (dg/granule dif-coll gran-data)
        gran-for-dif10-coll (dg/granule dif10-coll gran-data)
        gran-for-iso19115-coll (dg/granule iso19115-coll gran-data)

                   :product-specific-attributes [gpsa]
                   :beginning-date-time "1966-12-12T07:00:00.000-05:00"
                   :ending-date-time "1967-10-12T07:00:00.000-05:00"}
        gran-data2 {:platform-refs [pr2]
                    :spatial-coverage gran-spatial-rep
                    :two-d-coordinate-system g-two-d-cs
                    :product-specific-attributes [gpsa]
                    :beginning-date-time "1966-12-12T07:00:00.000-05:00"
                    :ending-date-time "1967-10-12T07:00:00.000-05:00"}
        echo10-coll (dc/collection coll-data)
        _ (d/ingest "PROV1" echo10-coll {:format :echo10})
        dif-coll (dc/collection (assoc coll-data :entry-title "short_name2_version"
