Persistent_root (transition_frontier_persistent_root.Persistent

module Ledger = Mina_ledger.Ledger

module Ledger_transfer : sig ... end

val genesis_root_identifier : 
  genesis_state_hash:Mina_base.State_hash.t ->
  Frontier_base.Root_identifier.Stable.Latest.t

val with_file : 
  ?size:int ->
  string ->
  [< `Read | `Write ] ->
  f:
    ( ( char, Stdlib.Bigarray.int8_unsigned_elt, Stdlib.Bigarray.c_layout )
        Stdlib.Bigarray.Array1.t ->
      'a ) ->
  'b

module Locations : sig ... end

module Instance_type : sig ... end

module Factory_type : sig ... end

module Instance : sig ... end

type t = Factory_type.t

val create : 
  logger:Logger.t ->
  directory:string ->
  ledger_depth:int ->
  Factory_type.t

val create_instance_exn : Factory_type.t -> Instance_type.t

val load_from_disk_exn : 
  Factory_type.t ->
  snarked_ledger_hash:Mina_base.Frozen_ledger_hash.t ->
  logger:Logger.t ->
  ( Instance_type.t, [> `Snarked_ledger_mismatch ] ) Core_kernel__Result.t

val with_instance_exn : Factory_type.t -> f:( Instance_type.t -> 'a ) -> 'b

val reset_to_genesis_exn : 
  Factory_type.t ->
  precomputed_values:Precomputed_values.t ->
  unit