Result_syntax (tezos-protocol-alpha.Tezos_protocol_environment_alpha.Error_monad.Result

val return : 'a -> ('a, 'e) Pervasives.result

val return_unit : (unit, 'e) Pervasives.result

val return_none : ('a option, 'e) Pervasives.result

val return_some : 'a -> ('a option, 'e) Pervasives.result

val return_nil : ('a list, 'e) Pervasives.result

val return_true : (bool, 'e) Pervasives.result

val return_false : (bool, 'e) Pervasives.result

val fail : 'e -> ('a, 'e) Pervasives.result

val let* : 
  ('a, 'e) Pervasives.result ->
  ('a -> ('b, 'e) Pervasives.result) ->
  ('b, 'e) Pervasives.result

val let+ : 
  ('a, 'e) Pervasives.result ->
  ('a -> 'b) ->
  ('b, 'e) Pervasives.result

val join : 
  (unit, 'e) Pervasives.result list ->
  (unit, 'e list) Pervasives.result

val all : 
  ('a, 'e) Pervasives.result list ->
  ('a list, 'e list) Pervasives.result

val both : 
  ('a, 'e) Pervasives.result ->
  ('b, 'e) Pervasives.result ->
  ('a * 'b, 'e list) Pervasives.result

val tzfail : 'error -> ('a, 'error trace) Pervasives.result

val and* : 
  ('a, 'e trace) Pervasives.result ->
  ('b, 'e trace) Pervasives.result ->
  ('a * 'b, 'e trace) Pervasives.result

val and+ : 
  ('a, 'e trace) Pervasives.result ->
  ('b, 'e trace) Pervasives.result ->
  ('a * 'b, 'e trace) Pervasives.result

val tzjoin : 
  (unit, 'error trace) Pervasives.result list ->
  (unit, 'error trace) Pervasives.result

val tzall : 
  ('a, 'error trace) Pervasives.result list ->
  ('a list, 'error trace) Pervasives.result

val tzboth : 
  ('a, 'error trace) Pervasives.result ->
  ('b, 'error trace) Pervasives.result ->
  ('a * 'b, 'error trace) Pervasives.result