V1 (mina_base.Mina_base.Signed_command

type ('common, 'body) t =
  ( 'common, 'body ) Mina_wire_types.Mina_base.Signed_command_payload.Poly.V1.t =
  {

common : 'common;

body : 'body;

}

val to_yojson : 
  ( 'common -> Yojson.Safe.t ) ->
  ( 'body -> Yojson.Safe.t ) ->
  ( 'common, 'body ) t ->
  Yojson.Safe.t

val of_yojson : 
  ( Yojson.Safe.t -> 'common Ppx_deriving_yojson_runtime.error_or ) ->
  ( Yojson.Safe.t -> 'body Ppx_deriving_yojson_runtime.error_or ) ->
  Yojson.Safe.t ->
  ( 'common, 'body ) t Ppx_deriving_yojson_runtime.error_or

include Core_kernel.Bin_prot.Binable.S2
  with type ('common, 'body) t := ( 'common, 'body ) t

val bin_shape_t : Bin_prot.Shape.t -> Bin_prot.Shape.t -> Bin_prot.Shape.t

val bin_size_t : ( 'a, 'b, ( 'a, 'b ) t ) Bin_prot.Size.sizer2

val bin_write_t : ( 'a, 'b, ( 'a, 'b ) t ) Bin_prot.Write.writer2

val bin_read_t : ( 'a, 'b, ( 'a, 'b ) t ) Bin_prot.Read.reader2

val __bin_read_t__ : ( 'a, 'b, int -> ( 'a, 'b ) t ) Bin_prot.Read.reader2

val bin_writer_t : ( 'a, 'b, ( 'a, 'b ) t ) Bin_prot.Type_class.S2.writer

val bin_reader_t : ( 'a, 'b, ( 'a, 'b ) t ) Bin_prot.Type_class.S2.reader

val bin_t : ( 'a, 'b, ( 'a, 'b ) t ) Bin_prot.Type_class.S2.t

val __versioned__ : unit

val equal : 
  ( 'common -> 'common -> bool ) ->
  ( 'body -> 'body -> bool ) ->
  ( 'common, 'body ) t ->
  ( 'common, 'body ) t ->
  bool

include Ppx_sexp_conv_lib.Sexpable.S2
  with type ('common, 'body) t := ( 'common, 'body ) t

val t_of_sexp : 
  ( Sexplib0__.Sexp.t -> 'a ) ->
  ( Sexplib0__.Sexp.t -> 'b ) ->
  Sexplib0__.Sexp.t ->
  ( 'a, 'b ) t

val sexp_of_t : 
  ( 'a -> Sexplib0__.Sexp.t ) ->
  ( 'b -> Sexplib0__.Sexp.t ) ->
  ( 'a, 'b ) t ->
  Sexplib0__.Sexp.t

val hash_fold_t : 
  ( Ppx_hash_lib.Std.Hash.state -> 'common -> Ppx_hash_lib.Std.Hash.state ) ->
  ( Ppx_hash_lib.Std.Hash.state -> 'body -> Ppx_hash_lib.Std.Hash.state ) ->
  Ppx_hash_lib.Std.Hash.state ->
  ( 'common, 'body ) t ->
  Ppx_hash_lib.Std.Hash.state

val compare : 
  ( 'common -> 'common -> int ) ->
  ( 'body -> 'body -> int ) ->
  ( 'common, 'body ) t ->
  ( 'common, 'body ) t ->
  int

val to_hlist : 
  ( 'common, 'body ) t ->
  ( unit, 'common -> 'body -> unit ) H_list.t

val of_hlist : 
  ( unit, 'common -> 'body -> unit ) H_list.t ->
  ( 'common, 'body ) t

val of_latest : 
  ( 'common1 -> ( 'common2, 'err ) Core_kernel.Result.t ) ->
  ( 'body1 -> ( 'body2, 'err ) Core_kernel.Result.t ) ->
  ( 'common1, 'body1 ) t ->
  ( ( 'common2, 'body2 ) t, 'err ) Core_kernel.Result.t