     (with-open [w (clojure.java.io/writer (str ".test-files/close-features-single-collection-" c ".json"))]
       (random-json-features w "closeset" "collection1" c :close? true))))
 
+(defn generate-test-files-with-deletes []
+  (doseq [c [10 100 1000 10000 100000]]
+    (with-open [w (clojure.java.io/writer (str ".test-files/delete-features-single-collection-" c ".json"))]
+      (random-json-features w "deleteset" "collection1" c :delete? true))))
+
 (defn generate-test-files-with-nested-feature []
   (doseq [c [5 50 500 5000 50000]]
     (with-open [w (clojure.java.io/writer (str ".test-files/new-features-nested-feature-" c ".json"))]

                       [:_action :_collection :_id :_validity :_current_validity]))

(defn nillify-an-attribute [feature]
  (update-an-attribute feature #(assoc %1 %2 nil)
                       [:_action :_collection :_id :_validity :_current_validity :_geometry]))

(defn random-new-feature

      (assoc :_current_validity (:_validity feature))
      (assoc :_validity (tf/unparse date-time-formatter (t/plus (local-now) (t/minutes 1))))))

(defn transform-to-delete [{:keys [_dataset _collection _id _validity]}]
  {:_action "delete"
   :_collection _collection
   :_id _id
   :_current_validity _validity})

(defn transform-to-nested [feature]
  (apply dissoc feature [:_action :_collection :_id :_validity :_current_validity]))

