Make.Sectionmodule Acc : sig ... endval empty : tval disjoint_union_exn : t -> t -> t Impl.Checked.tval extend :
t ->
Impl.Boolean.var Tuple_lib.Triple.t list ->
start:int ->
t Impl.Checked.tval append : t -> Impl.Boolean.var Tuple_lib.Triple.t list -> t Impl.Checked.tval acc : t -> Weierstrass_curve.varval support : t -> Interval_union.tval create : acc:Acc.t -> support:Interval_union.t -> tval to_initial_segment_digest :
t ->
(Digest.var * [ `Length_in_triples of int ]) Core_kernel.Or_error.tval to_initial_segment_digest_exn :
t ->
Digest.var * [ `Length_in_triples of int ]