Module As_prover.Let_syntax

include Monad_let.Base_syntax2 with type ('a, 'e) t := ( 'a, 'e ) t
include Core_kernel.Monad.Infix2 with type ('a, 'e) t := ( 'a, 'e ) t
val (>>=) : ( 'a, 'e ) t -> ( 'a -> ( 'b, 'e ) t ) -> ( 'b, 'e ) t
val (>>|) : ( 'a, 'e ) t -> ( 'a -> 'b ) -> ( 'b, 'e ) t
include Monad_let.Let_syntax2 with type ('a, 'e) t := ( 'a, 'e ) t
val return : 'a -> ( 'a, 'e ) t
val bind : ( 'a, 'e ) t -> f:( 'a -> ( 'b, 'e ) t ) -> ( 'b, 'e ) t
val map : ( 'a, 'e ) t -> f:( 'a -> 'b ) -> ( 'b, 'e ) t
val both : ( 'a, 'e ) t -> ( 'b, 'e ) t -> ( 'a * 'b, 'e ) t
module Open_on_rhs : sig ... end
module Let_syntax : Monad_let.Let_syntax2 with type ('a, 'e) t := ( 'a, 'e ) t