sig   val proceed_to_mass_killing :     Ketrew.Persistent_data.t ->     (bool,      [> `Database of           [> `Act of Trakeva.Action.t            | `Get of Trakeva.Key_in_collection.t            | `Get_all of string            | `Load of string ] *           string       | `Database_unavailable of string       | `Fetching_node of Ketrew.Persistent_data.Error.fetching_node       | `Target of [> `Deserilization of string ] ])     Unix_io.Deferred_result.t   val add_target_ids_to_kill_list :     Ketrew.Persistent_data.t ->     string list ->     (unit,      [> `Database of [> `Act of Trakeva.Action.t | `Load of string ] * string       | `Database_unavailable of string ])     Unix_io.Deferred_result.t end