Alpha_services.Seed
val get : 'a Mavryk_protocol_environment_alpha.RPC_context.simple -> 'a -> Alpha_context.Seed.seed Mavryk_protocol_environment_alpha.Error_monad.shell_tzresult Mavryk_protocol_environment_alpha.Lwt.t