package octez-plonk
Extension of the KZG_pack implementation with additional types and functions used in by Distributed_prover
module Pack = Aggregation.Pack
module PC = Kzg.Kzg_impl
module BasePC : sig ... end
module Commitment : sig ... end
include module type of BasePC with module Commitment := Commitment
type secret = PC.secret
type query = PC.query
type answer = PC.answer
type transcript = PC.transcript
module Public_parameters : sig ... end
type proof = {
pc_proof : PC.proof;
packed_values : Aggregation.Pack.packed list;
pack_proof : Aggregation.Pack.proof;
}
val batch_polys :
Plonk.Bls.Poly.scalar ->
Plonk.Bls.Poly.t Plonk.SMap.t ->
Plonk.Bls.Poly.t
val batch_answers :
Plonk.Bls.Scalar.t ->
Plonk.Bls.Scalar.t Plonk.SMap.t Plonk.SMap.t ->
Plonk.Bls.Scalar.t Plonk.SMap.t
val prove_pack :
Public_parameters.prover ->
Stdlib.Bytes.t ->
Plonk.Bls.Poly.t Plonk.SMap.t list ->
Commitment.prover_aux list ->
PC.query list ->
Plonk.Bls.Scalar.t Plonk.SMap.t Plonk.SMap.t list ->
(proof * prover_aux) * bytes
val prove :
Public_parameters.prover ->
bytes ->
Plonk.Bls.Poly.t Plonk.SMap.t list ->
Commitment.prover_aux list ->
PC.query list ->
Plonk.Bls.Scalar.t Plonk.SMap.t Plonk.SMap.t list ->
proof * bytes
val prove_super_aggregation :
Public_parameters.prover ->
bytes ->
Plonk.Bls.Poly.t Plonk.SMap.t list ->
Commitment.prover_aux list ->
PC.query list ->
Plonk.Bls.Scalar.t Plonk.SMap.t Plonk.SMap.t list ->
(proof * prover_aux) * bytes
val verify_pack :
Public_parameters.verifier ->
Aggregation.Pack.randomness ->
Aggregation.Pack.transcript ->
Aggregation.Pack.commitment list ->
PC.query list ->
Plonk.Bls.Scalar.t Plonk.SMap.t Plonk.List.t ->
proof ->
bool * bytes
val verify :
Public_parameters.verifier ->
bytes ->
Aggregation.Pack.commitment list ->
PC.query list ->
Plonk.Bls.Scalar.t Plonk.SMap.t Plonk.SMap.t list ->
proof ->
bool * bytes
val verify_super_aggregation :
Public_parameters.verifier ->
bytes ->
Aggregation.Pack.commitment list ->
PC.query list ->
Plonk.Bls.Scalar.t Plonk.SMap.t Plonk.List.t ->
proof ->
bool * Plonk.Bls.Scalar.t * bytes
type worker_msg = Plonk.Bls.Scalar.t * string list list
val worker_msg_t : (Plonk.Bls.Scalar.t * string list list) Repr.t
type main_prover_msg = Plonk.Bls.Poly.t list * Commitment.prover_aux list
val main_prover_msg_t :
(Plonk.Bls.Poly.t list * (PC.Commitment.t * PC.Commitment.prover_aux) list)
Repr.t
type main_prover_state =
Public_parameters.prover
* transcript
* Plonk.Bls.Scalar.t
* query list
* Plonk.Bls.Scalar.t SMap.t list
* main_prover_msg
val distributed_prove_worker :
Plonk.Bls.Poly.t SMap.t list ->
'a ->
(Plonk.Bls.Scalar.t * string list list) ->
Plonk.Bls.Poly.t list * 'b
val distributed_prove_main1 :
Public_parameters.prover ->
Stdlib.Bytes.t ->
query list ->
Plonk.Bls.Scalar.t SMap.t SMap.t list ->
Plonk.Bls.Poly.t SMap.t list ->
Commitment.prover_aux list ->
worker_msg * main_prover_state
val distributed_prove_main2 :
main_prover_state ->
main_prover_msg list ->
proof * bytes * partial_prover_aux
sectionYPositions = computeSectionYPositions($el), 10)"
x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
>