Module Body.Poly

module Stable : sig ... end
type ('a, 'b, 'c, 'd) t = ( 'a, 'b, 'c, 'd ) Stable.Latest.t
val sexp_of_t : ( 'a -> Ppx_sexp_conv_lib.Sexp.t ) -> ( 'b -> Ppx_sexp_conv_lib.Sexp.t ) -> ( 'c -> Ppx_sexp_conv_lib.Sexp.t ) -> ( 'd -> Ppx_sexp_conv_lib.Sexp.t ) -> ( 'a, 'b, 'c, 'd ) t -> Ppx_sexp_conv_lib.Sexp.t
val t_of_sexp : ( Ppx_sexp_conv_lib.Sexp.t -> 'a ) -> ( Ppx_sexp_conv_lib.Sexp.t -> 'b ) -> ( Ppx_sexp_conv_lib.Sexp.t -> 'c ) -> ( Ppx_sexp_conv_lib.Sexp.t -> 'd ) -> Ppx_sexp_conv_lib.Sexp.t -> ( 'a, 'b, 'c, 'd ) t