Tezos_baking_alpha.Client_baking_denunciation
val create :
Tezos_client_alpha.Protocol_client_context.full ->
?canceler:Lwt_canceler.t ->
preserved_levels:int ->
Client_baking_blocks.block_info Tezos_base.TzPervasives.tzresult Lwt_stream.t ->
unit Tezos_base.TzPervasives.tzresult Lwt.t