Module Mavryk_baking_alpha.Client_baking_denunciation

val create : Mavryk_client_alpha.Protocol_client_context.full -> ?canceler:Lwt_canceler.t -> preserved_levels:int -> Client_baking_blocks.block_info Mavryk_base.TzPervasives.tzresult Lwt_stream.t -> unit Mavryk_base.TzPervasives.tzresult Lwt.t