Module Genesis_ledger.Utils

val keypair_of_account_record_exn : (Signature_lib.Private_key.t option * ( Signature_lib.Public_key.Compressed.t, 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i, 'j, 'k ) Mina_base.Account.Poly.Stable.Latest.t) -> Signature_lib.Keypair.t
val id_of_account_record : ('a * Mina_base.Account.t) -> Mina_base.Account_id.t
val pk_of_account_record : ('a * Mina_base.Account.Stable.Latest.t) -> Mina_base.Account.key
val find_account_record_exn : f:( 'a -> bool ) -> ('b * 'c) list -> 'b * 'c
val find_new_account_record_exn_ : ('a * Mina_base.Account.Stable.Latest.t) list -> Mina_base.Account.key list -> 'a * Mina_base.Account.Stable.Latest.t
val find_new_account_record_exn : ('a * Mina_base.Account.Stable.Latest.t) list -> Signature_lib.Public_key.t list -> 'a * Mina_base.Account.Stable.Latest.t