Main_protocol.MakeSourcemodule PP : Polynomial_protocol.Smodule PP = PPinclude module type of MP with module PP := PPtype proof = {perm_and_plook : PP.PC.Commitment.t;wires_cm : PP.PC.Commitment.t;pp_proof : PP.proof;}type circuit_prover_input = {witness : scalar array;input_commitments : Input_commitment.t list;}val verifier_inputs_t :
(Plonk.Bls.Scalar.t array list * Input_commitment.public list list)
Plonk.SMap.t
Repr.tyval hash_verifier_inputs :
(Plonk.Bls.Scalar.t array list * Input_commitment.public list list)
Plonk.SMap.t ->
bytestype prover_public_parameters = Prover.public_parameters = {common_pp : Prover.common_prover_pp;circuits_map : Prover.circuit_prover_pp Plonk.SMap.t;transcript : PP.transcript;}type verifier_public_parameters = {common_pp : Verifier.common_verifier_pp;circuits_map : Verifier.circuit_verifier_pp Plonk.SMap.t;transcript : PP.transcript;}val to_verifier_inputs :
prover_public_parameters ->
circuit_prover_input list Plonk.SMap.t ->
(public_inputs * Input_commitment.public list list) Plonk.SMap.tval expand_transcript_with_verifier_inputs :
bytes ->
(Plonk.Bls.Scalar.t array list * Input_commitment.public list list)
Plonk.SMap.t ->
bytesval input_commit :
?size:int ->
?shift:int ->
prover_public_parameters ->
Plonk.Bls.Scalar.t array ->
Input_commitment.tval update_prover_public_parameters :
bytes ->
prover_public_parameters ->
prover_public_parametersval update_verifier_public_parameters :
bytes ->
verifier_public_parameters ->
verifier_public_parametersval filter_prv_pp_circuits :
prover_public_parameters ->
'a Plonk.SMap.t ->
prover_public_parametersval filter_vrf_pp_circuits :
verifier_public_parameters ->
'a Plonk.SMap.t ->
verifier_public_parametersval setup :
zero_knowledge:bool ->
(Plonk.Circuit.t * int) Plonk.SMap.t ->
srs:
(Octez_bls12_381_polynomial.Bls12_381_polynomial.Srs.t
* Octez_bls12_381_polynomial.Bls12_381_polynomial.Srs.t) ->
prover_public_parameters * verifier_public_parametersval prove :
prover_public_parameters ->
inputs:circuit_prover_input Plonk.List.t Plonk.SMap.t ->
proofval verify :
verifier_public_parameters ->
inputs:(public_inputs * Input_commitment.public list list) Plonk.SMap.t ->
proof ->
boolinclude sig ... endval split_inputs_map :
nb_workers:int ->
Plonk__Main_protocol.Make_impl(PP).circuit_prover_input list SMap.t ->
worker_inputs SMap.t listtype commit_to_plook_rc_reply = Common(PP).commit_to_plook_rc_reply = {batched_wires_map : Plonk.Bls.Evaluations.t SMap.t SMap.t;cmt : Commitment.t;f_map : Plonk.Bls.Poly.t SMap.t;prover_aux : Commitment.prover_aux;}type commit_to_plook_rc_remember = Common(PP).commit_to_plook_rc_remember = {beta_plook : Plonk.Bls.Scalar.t;gamma_plook : Plonk.Bls.Scalar.t;beta_rc : Plonk.Bls.Scalar.t;gamma_rc : Plonk.Bls.Scalar.t;}type commit_to_wires_remember = Common(PP).commit_to_wires_remember = {all_f_wires : Plonk.Bls.Poly.t SMap.t;wires_list_map : Plonk.Bls.Evaluations.t SMap.t list SMap.t;inputs_map : Plonk__Main_protocol.Make_impl(PP).circuit_prover_input list
SMap.t;shifts_map : (int * int) SMap.t;f_wires : Plonk.Bls.Poly.t SMap.t list SMap.t;cm_aux_wires : Commitment.prover_aux;}val worker_commit_to_wires :
Plonk__Main_protocol.Make_impl(PP).Prover.public_parameters ->
worker_inputs SMap.t ->
PP.PC.Commitment.t * commit_to_wires_rememberval commit_to_plook_rc :
Plonk__Main_protocol.Make_impl(PP).Prover.public_parameters ->
(int * int) Stdlib__Map.Make(String).t ->
Bytes.t ->
Plonk.Bls.Evaluations.t Plonk.SMap.t list Plonk.SMap.t ->
commit_to_plook_rc_reply * commit_to_plook_rc_rememberval batch_evaluated_ids :
alpha:Plonk.Bls.Scalar.t ->
Plonk.Bls.Evaluations.t SMap.t ->
string list ->
Plonk.Bls.Evaluations.tval kzg_eval_at_x :
Plonk__Main_protocol.Make_impl(PP).Prover.public_parameters ->
Bytes.t ->
(Plonk.Bls.Poly.t Plonk.SMap.t * 'a) list ->
Plonk.Bls.Scalar.t ->
Plonk.Bls.Scalar.t Plonk.SMap.t Plonk.SMap.t listval build_batched_witness_polys_bis :
(bool * int * Plonk.Bls.Domain.t) ->
Plonk.Bls.Evaluations.t Plonk.SMap.t SMap.t ->
Plonk.Bls.Poly.t Stdlib__Map.Make(String).tval make_secret :
Plonk__Main_protocol.Make_impl(PP).Prover.public_parameters ->
(Plonk.Bls.Poly.t Plonk.SMap.t * PP.PC.Commitment.prover_aux) ->
(Plonk.Bls.Poly.t Plonk.SMap.t * PP.PC.Commitment.prover_aux) listval make_eval_points :
Plonk__Main_protocol.Make_impl(PP).Prover.public_parameters ->
Plonk.Identities.eval_point list list
* Plonk.Identities.eval_point list Plonk.List.tval get_generator :
Plonk__Main_protocol.Make_impl(PP).Prover.public_parameters ->
Plonk.Bls.Domain.scalarval get_srs :
Plonk__Main_protocol.Make_impl(PP).Prover.public_parameters ->
PP.PC.Commitment.prover_public_parametersval get_gen_n_nbt :
Plonk__Main_protocol.Make_impl(PP).Prover.public_parameters ->
Plonk.Bls.Domain.scalar * int * int