Poly (mina_base.Mina_base.Epoch

module Stable : sig ... end

type ('ledger_hash, 'amount) t = ( 'ledger_hash, 'amount ) Stable.Latest.t = {

hash : 'ledger_hash;

total_currency : 'amount;

}

val to_yojson : 
  'ledger_hash 'amount. ( 'ledger_hash -> Yojson.Safe.t ) ->
  ( 'amount -> Yojson.Safe.t ) ->
  ( 'ledger_hash, 'amount ) t ->
  Yojson.Safe.t

val of_yojson : 
  'ledger_hash 'amount. ( Yojson.Safe.t ->
                          'ledger_hash Ppx_deriving_yojson_runtime.error_or ) ->
  ( Yojson.Safe.t -> 'amount Ppx_deriving_yojson_runtime.error_or ) ->
  Yojson.Safe.t ->
  ( 'ledger_hash, 'amount ) t Ppx_deriving_yojson_runtime.error_or

val _ : 
  ( Yojson.Safe.t -> 'a Ppx_deriving_yojson_runtime.error_or ) ->
  ( Yojson.Safe.t -> 'b Ppx_deriving_yojson_runtime.error_or ) ->
  Yojson.Safe.t ->
  ( 'a, 'b ) t Ppx_deriving_yojson_runtime.error_or

val t_fields_annots : string -> (string * string option) list

val t_toplevel_annots : unit -> (string * string option) list

val t_of_sexp : 
  'ledger_hash 'amount. ( Ppx_sexp_conv_lib.Sexp.t -> 'ledger_hash ) ->
  ( Ppx_sexp_conv_lib.Sexp.t -> 'amount ) ->
  Ppx_sexp_conv_lib.Sexp.t ->
  ( 'ledger_hash, 'amount ) t

val sexp_of_t : 
  'ledger_hash 'amount. ( 'ledger_hash -> Ppx_sexp_conv_lib.Sexp.t ) ->
  ( 'amount -> Ppx_sexp_conv_lib.Sexp.t ) ->
  ( 'ledger_hash, 'amount ) t ->
  Ppx_sexp_conv_lib.Sexp.t

val equal : 
  'ledger_hash 'amount. ( 'ledger_hash -> 'ledger_hash -> bool ) ->
  ( 'amount -> 'amount -> bool ) ->
  ( 'ledger_hash, 'amount ) t ->
  ( 'ledger_hash, 'amount ) t ->
  bool

val compare : 
  'ledger_hash 'amount. ( 'ledger_hash -> 'ledger_hash -> int ) ->
  ( 'amount -> 'amount -> int ) ->
  ( 'ledger_hash, 'amount ) t ->
  ( 'ledger_hash, 'amount ) t ->
  int

val hash_fold_t : 
  'ledger_hash 'amount. ( Ppx_hash_lib.Std.Hash.state ->
                          'ledger_hash ->
                          Ppx_hash_lib.Std.Hash.state ) ->
  ( Ppx_hash_lib.Std.Hash.state -> 'amount -> Ppx_hash_lib.Std.Hash.state ) ->
  Ppx_hash_lib.Std.Hash.state ->
  ( 'ledger_hash, 'amount ) t ->
  Ppx_hash_lib.Std.Hash.state

val to_hlist : 
  ( 'ledger_hash, 'amount ) t ->
  ( unit, 'ledger_hash -> 'amount -> unit ) H_list.t

val of_hlist : 
  ( unit, 'ledger_hash -> 'amount -> unit ) H_list.t ->
  ( 'ledger_hash, 'amount ) t

val total_currency : ( 'a, 'b ) t -> 'c

val hash : ( 'a, 'b ) t -> 'c

module Fields : sig ... end