Let_syntax (snarky.Snarky_backendless.As_prover.Make_extended.Let

include Monad_let.Base_syntax2
  with type ('a, 'e) t := ( 'a, Env.field ) Types.As_prover.t

include Core_kernel.Monad.Infix2
  with type ('a, 'e) t := ( 'a, Env.field ) Types.As_prover.t

val (>>=) : 
  ( 'a, Env.field ) Types.As_prover.t ->
  ( 'a -> ( 'b, Env.field ) Types.As_prover.t ) ->
  ( 'b, Env.field ) Types.As_prover.t

val (>>|) : 
  ( 'a, Env.field ) Types.As_prover.t ->
  ( 'a -> 'b ) ->
  ( 'b, Env.field ) Types.As_prover.t

include Monad_let.Let_syntax2
  with type ('a, 'e) t := ( 'a, Env.field ) Types.As_prover.t

val return : 'a -> ( 'a, Env.field ) Types.As_prover.t

val bind : 
  ( 'a, Env.field ) Types.As_prover.t ->
  f:( 'a -> ( 'b, Env.field ) Types.As_prover.t ) ->
  ( 'b, Env.field ) Types.As_prover.t

val map : 
  ( 'a, Env.field ) Types.As_prover.t ->
  f:( 'a -> 'b ) ->
  ( 'b, Env.field ) Types.As_prover.t

val both : 
  ( 'a, Env.field ) Types.As_prover.t ->
  ( 'b, Env.field ) Types.As_prover.t ->
  ( 'a * 'b, Env.field ) Types.As_prover.t

module Open_on_rhs : sig ... end

module Let_syntax : 
  Monad_let.Let_syntax2
    with type ('a, 'e) t := ( 'a, Env.field ) Types.As_prover.t