                      (doseq [gran v-granules]
                        (is (:deleted (ingest/get-concept (:id gran) 12)))))]
 
+    (is (not (empty? v-granules)))
+
     (testing "after deleting source granules"
       (doseq [granule s-granules]
         (ingest/delete-concept (d/item->concept granule) {:revision-id 12}))

    (testing "bootstrapping should be idempotent"
      (bootstrap-and-index)
      (verify))))

;; Verify that latest revision ids of virtual granules and the corresponding source granules
;; are in sync as various ingest operations are performed on the source granules
(deftest deleted-virtual-granules
  (let [[ast-coll] (vp/ingest-source-collections
                     [(assoc
                        (dc/collection
                          {:entry-title "ASTER L1A Reconstructed Unprocessed Instrument Data V003"
                           :short-name "AST_L1A"})
                        :provider-id "LPDAAC_ECS")])
        vp-colls   (vp/ingest-virtual-collections [ast-coll])
        s-granules (doall
                    (for [n (range 10)]
