Mavryk_raw_protocol_001_PtAtLas.Fitness_reprtype Mavryk_protocol_environment_001_PtAtLas.Error_monad.error += | Invalid_fitness| Wrong_fitness| Outdated_fitness| Locked_round_not_less_than_round of {round : Round_repr.t;locked_round : Round_repr.t;}val encoding : t Mavryk_protocol_environment_001_PtAtLas.Data_encoding.tval pp : Mavryk_protocol_environment_001_PtAtLas.Format.formatter -> t -> unitval create :
level:Raw_level_repr.t ->
locked_round:Round_repr.t option ->
predecessor_round:Round_repr.t ->
round:Round_repr.t ->
t Mavryk_protocol_environment_001_PtAtLas.Error_monad.tzresultval create_without_locked_round :
level:Raw_level_repr.t ->
predecessor_round:Round_repr.t ->
round:Round_repr.t ->
tval to_raw : t -> Mavryk_protocol_environment_001_PtAtLas.Fitness.tval from_raw :
Mavryk_protocol_environment_001_PtAtLas.Fitness.t ->
t Mavryk_protocol_environment_001_PtAtLas.Error_monad.tzresultReturns the corresponding protocol fitness if the shell fitness has the expected version, given by Constants_repr.fitness_version_number. If the fitness' version is from a previous protocol version, then it raises an "outdated fitness" error. If the fitness version is higher then it raises an "invalid fitness" error.
val round_from_raw :
Mavryk_protocol_environment_001_PtAtLas.Fitness.t ->
Round_repr.t Mavryk_protocol_environment_001_PtAtLas.Error_monad.tzresultReturns the round from a raw fitness. If the fitness is from a previous protocol, the returned value will be Round.zero.
val predecessor_round_from_raw :
Mavryk_protocol_environment_001_PtAtLas.Fitness.t ->
Round_repr.t Mavryk_protocol_environment_001_PtAtLas.Error_monad.tzresultReturns the predecessor round from a raw fitness. If the fitness is from a previous protocol, the returned value will be Round.zero.
val locked_round_from_raw :
Mavryk_protocol_environment_001_PtAtLas.Fitness.t ->
Round_repr.t option
Mavryk_protocol_environment_001_PtAtLas.Error_monad.tzresultReturns the locked round from a raw fitness. If the fitness is from a previous version, the returned value will be None.
val check_except_locked_round :
t ->
level:Raw_level_repr.t ->
predecessor_round:Round_repr.t ->
unit Mavryk_protocol_environment_001_PtAtLas.Error_monad.tzresultValidate only the part of the fitness for which information are available during begin_application
val level : t -> Raw_level_repr.tval round : t -> Round_repr.tval locked_round : t -> Round_repr.t optionval predecessor_round : t -> Round_repr.t