package octez-plonk

You can search for identifiers within the package.

in-package search v0.2.0

Package contains no libraries

include Kzg.PC_for_distribution_sig

module BasePC : Plonk.Polynomial_commitment.S

module Commitment : 
  Kzg.Commitment_sig
    with type secret = BasePC.secret
     and type prover_public_parameters = BasePC.Public_parameters.prover

include module type of BasePC with module Commitment := Commitment

type secret = Plonk.Bls.Poly.t Plonk.SMap.t

type query = Plonk.Bls.Scalar.t Plonk.SMap.t

val query_t : query Repr.t

type answer = Plonk.Bls.Scalar.t Plonk.SMap.t Plonk.SMap.t

val answer_t : answer Repr.t

type proof

val proof_t : proof Repr.t

type transcript = Stdlib.Bytes.t

module Public_parameters : 
  Plonk.Polynomial_commitment.Public_parameters_sig
    with type prover = Commitment.prover_public_parameters

val evaluate : secret -> query -> answer

val prove : 
  Public_parameters.prover ->
  transcript ->
  secret list ->
  Commitment.prover_aux list ->
  query list ->
  answer list ->
  proof * transcript

val verify : 
  Public_parameters.verifier ->
  transcript ->
  Commitment.t list ->
  query list ->
  answer list ->
  proof ->
  bool * transcript

val merge_answers : answer list -> answer

type worker_msg

val worker_msg_t : worker_msg Repr.t

type main_prover_state

type main_prover_msg

val main_prover_msg_t : main_prover_msg Repr.t

type partial_prover_aux

val distributed_expand_transcript : 
  transcript ->
  query list ->
  answer list ->
  transcript

val distributed_prove_main1 : 
  Public_parameters.prover ->
  transcript ->
  query list ->
  answer list ->
  secret list ->
  Commitment.prover_aux list ->
  worker_msg * main_prover_state

val distributed_prove_worker : 
  secret list ->
  Commitment.prover_aux list ->
  worker_msg ->
  main_prover_msg

val distributed_prove_main2 : 
  main_prover_state ->
  main_prover_msg list ->
  proof * transcript * partial_prover_aux

type prover_aux = {

r : Plonk.Bls.Scalar.t;
s_list : Plonk.Bls.Scalar.t Plonk_for_distribution.Kzg_pack.SMap.t list;

}

val prove_super_aggregation : 
  Public_parameters.prover ->
  transcript ->
  Plonk.Bls.Poly.t Plonk_for_distribution.Kzg_pack.SMap.t list ->
  Commitment.prover_aux list ->
  query list ->
  Plonk.Bls.Scalar.t Plonk_for_distribution.Kzg_pack.SMap.t
    Plonk_for_distribution.Kzg_pack.SMap.t
    list ->
  (proof * prover_aux) * transcript

val verify_super_aggregation : 
  Public_parameters.verifier ->
  transcript ->
  Commitment.t list ->
  query list ->
  Plonk.Bls.Scalar.t Plonk_for_distribution.Kzg_pack.SMap.t list ->
  proof ->
  bool * Plonk.Bls.Scalar.t * transcript