Data.Commandtype t = | Activate of {protocol : Tezos_protocol_environment_genesis.Protocol_hash.t;fitness : Tezos_protocol_environment_genesis.Fitness.t;protocol_parameters : Tezos_protocol_environment_genesis.MBytes.t;}| Activate_testchain of {protocol : Tezos_protocol_environment_genesis.Protocol_hash.t;fitness : Tezos_protocol_environment_genesis.Fitness.t;protocol_parameters : Tezos_protocol_environment_genesis.MBytes.t;delay : Tezos_protocol_environment_genesis.Int64.t;}val mk_case :
string ->
'a Tezos_protocol_environment_genesis.Data_encoding.encoding ->
'a Tezos_protocol_environment_genesis.Data_encoding.encodingval encoding : t Tezos_protocol_environment_genesis.Data_encoding.encodingval signed_encoding :
(t * Tezos_protocol_environment_genesis.Signature.t)
Tezos_protocol_environment_genesis.Data_encoding.encoding