Work.Resultmodule Stable : sig ... endtype ('spec, 'single) t = ( 'spec, 'single ) Stable.Latest.t = {proofs : 'single One_or_two.t; |
metrics : (Core.Time.Stable.Span.V1.t * [ `Transition | `Merge ]) One_or_two.t; |
spec : 'spec; |
prover : Signature_lib.Public_key.Compressed.t; |
}val prover : ( 'a, 'b ) t -> Signature_lib.Public_key.Compressed.tval spec : ( 'a, 'b ) t -> 'cval metrics :
( 'a, 'b ) t ->
(Core.Time.Stable.Span.V1.t * [ `Merge | `Transition ]) One_or_two.tval proofs : ( 'a, 'b ) t -> 'b One_or_two.tmodule Fields : sig ... end