Error_monad (mavkit-libs.Mavryk_error_monad_legacy.Error

val return : 'a -> ('a, 'e) Stdlib.result Lwt.t

val return_unit : (unit, 'e) Stdlib.result Lwt.t

val return_none : ('a option, 'e) Stdlib.result Lwt.t

val return_some : 'a -> ('a option, 'e) Stdlib.result Lwt.t

val return_nil : ('a list, 'e) Stdlib.result Lwt.t

val return_true : (bool, 'e) Stdlib.result Lwt.t

val return_false : (bool, 'e) Stdlib.result Lwt.t

val (>>=) : 'a Lwt.t -> ('a -> 'b Lwt.t) -> 'b Lwt.t

val (>|=) : 'a Lwt.t -> ('a -> 'b) -> 'b Lwt.t

val ok : 'a -> ('a, 'e) Stdlib.result

val error : 'e -> ('a, 'e Mavryk_error_monad.TzTrace.trace) Stdlib.result

val (>>?) : 
  ('a, 'e) Stdlib.result ->
  ('a -> ('b, 'e) Stdlib.result) ->
  ('b, 'e) Stdlib.result

val (>|?) : ('a, 'e) Stdlib.result -> ('a -> 'b) -> ('b, 'e) Stdlib.result

val fail : 'e -> ('a, 'e Mavryk_error_monad.TzTrace.trace) Stdlib.result Lwt.t

val (>>=?) : 
  ('a, 'e) Stdlib.result Lwt.t ->
  ('a -> ('b, 'e) Stdlib.result Lwt.t) ->
  ('b, 'e) Stdlib.result Lwt.t

val (>|=?) : 
  ('a, 'e) Stdlib.result Lwt.t ->
  ('a -> 'b) ->
  ('b, 'e) Stdlib.result Lwt.t

val (>>?=) : 
  ('a, 'e) Stdlib.result ->
  ('a -> ('b, 'e) Stdlib.result Lwt.t) ->
  ('b, 'e) Stdlib.result Lwt.t

val (>|?=) : 
  ('a, 'e) Stdlib.result ->
  ('a -> 'b Lwt.t) ->
  ('b, 'e) Stdlib.result Lwt.t