Seed (tezos-protocol-alpha.Tezos_raw_protocol

type unrevealed_nonce = {

nonce_hash : Nonce_hash.t;
delegate : Implicit_account_repr.t;

}

type nonce_status =

| Unrevealed of unrevealed_nonce
| Revealed of Seed_repr.nonce

module Nonce : 
  Storage_sigs.Non_iterable_indexed_data_storage
    with type key := Level_repr.t
     and type value := nonce_status
     and type t := Raw_context.t

module VDF_setup : 
  Storage_sigs.Single_data_storage
    with type value = Seed_repr.vdf_setup
     and type t := Raw_context.t

module For_cycle : FOR_CYCLE

val get_status : 
  Raw_context.t ->
  Seed_repr.seed_status Tezos_protocol_environment_alpha.Error_monad.tzresult
    Tezos_protocol_environment_alpha.Lwt.t