Seed (mavryk-protocol-001-PtAtLas.Mavryk_raw_protocol_001

type unrevealed_nonce = {

nonce_hash : Nonce_hash.t;
delegate : Mavryk_protocol_environment_001_PtAtLas.Signature.Public_key_hash.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
    Mavryk_protocol_environment_001_PtAtLas.Error_monad.tzresult
    Mavryk_protocol_environment_001_PtAtLas.Lwt.t