Let_syntax.Let_syntax
val bind :
'a Dkml_install_api.Forward_progress.t ->
(('a * Dkml_install_api.Forward_progress.fatal_logger) ->
'b Dkml_install_api.Forward_progress.t) ->
'b Dkml_install_api.Forward_progress.t
val map :
('a -> 'b) ->
'a Dkml_install_api.Forward_progress.t ->
'b Dkml_install_api.Forward_progress.t
val return : 'a -> 'b Dkml_install_api.Forward_progress.t