Distributed_prover.Make_aPlonkmodule PIs : Aplonk.Pi_parameters.Smodule Aggreg_circuit : sig ... endmodule L = Plompiler.LibCircuitmodule Input_commitment : sig ... endtype scalar = Kzg.Bls.Scalar.tval scalar_t : Kzg.Bls.Scalar.t Repr.ttype circuit_map = Main_Pack.circuit_maptype prover_meta_pp = {meta_pp : Main_Kzg.prover_public_parameters;meta_solver : Plompiler.Solver.t;public_input_size : int;input_com_sizes : int list;nb_proofs : int;nb_rc_wires : int;}val prover_meta_pp_t : prover_meta_pp Repr.ttype verifier_meta_pp = {meta_pp : Main_Kzg.verifier_public_parameters;public_input_size : int;nb_proofs : int;}val verifier_meta_pp_t : verifier_meta_pp Repr.ttype prover_public_parameters = {main_pp : Main_Pack.prover_public_parameters;meta_pps : prover_meta_pp Kzg.SMap.t;}val prover_public_parameters_t : prover_public_parameters Repr.ttype verifier_public_parameters = {main_pp : Main_Pack.verifier_public_parameters;meta_pps : verifier_meta_pp Kzg.SMap.t;}val verifier_public_parameters_t : verifier_public_parameters Repr.ttype proof = {main_proof : Main_Pack.proof;meta_proofs : Main_Kzg.proof Kzg.SMap.t;batch : Main_Kzg.scalar Kzg.SMap.t list;batches : (Main_Kzg.scalar * int) Kzg.SMap.t list Kzg.SMap.t;cms_answers : Main_Pack.PP.Answers_commitment.public Kzg.SMap.t;cms_pi : Main_Pack.PP.Answers_commitment.public Kzg.SMap.t;ids_batch : (Main_Kzg.scalar * int) Kzg.SMap.t;t_answers : Main_Kzg.scalar list;}val proof_t : proof Repr.ttype circuit_prover_input = Main_Pack.circuit_prover_input = {witness : scalar array;input_commitments : Main_Pack.Input_commitment.t list;}val circuit_prover_input_t : circuit_prover_input Repr.ttype prover_inputs = circuit_prover_input list Kzg.SMap.tval prover_inputs_t : circuit_prover_input list Kzg.SMap.t Repr.tytype public_inputs = scalar listval public_inputs_t : Kzg.Bls.Scalar.t list Repr.ttype circuit_verifier_input = {nb_proofs : int;public : public_inputs;commitments : Input_commitment.public list list;}val circuit_verifier_input_t : circuit_verifier_input Repr.ttype verifier_inputs = circuit_verifier_input Kzg.SMap.tval verifier_inputs_t : circuit_verifier_input Kzg.SMap.t Repr.tyval to_verifier_inputs :
prover_public_parameters ->
Main_Pack.prover_inputs ->
circuit_verifier_input Kzg.SMap.tval update_prover_public_parameters :
'a Repr.ty ->
'a ->
prover_public_parameters ->
prover_public_parametersval update_verifier_public_parameters :
'a Repr.ty ->
'a ->
verifier_public_parameters ->
verifier_public_parametersval filter_prv_pp_circuits :
prover_public_parameters ->
'a Kzg.SMap.t ->
prover_public_parametersval filter_vrf_pp_circuits :
verifier_public_parameters ->
'a Kzg.SMap.t ->
verifier_public_parametersval cs_global : Plompiler.LibCircuit.cs_result Kzg.SMap.t Stdlib.refval input_commit_funcs :
prover_public_parameters ->
'a list Kzg.SMap.t ->
Main_Pack.input_commit_funcs Kzg.SMap.tval input_commit :
?size:'a ->
?shift:'b ->
prover_public_parameters ->
'c ->
'dval meta_setup :
zero_knowledge:bool ->
srs:(Kzg.Bls.Srs.t * Kzg.Bls.Srs.t) ->
main_prover_pp:Main_Pack.prover_public_parameters ->
nb_batches:int ->
Kzg.SMap.key ->
(Plonk.Circuit.t * int) ->
prover_meta_pp * verifier_meta_ppval setup :
zero_knowledge:bool ->
Main_Pack.circuit_map ->
srs:(Kzg.Bls.Srs.t * Kzg.Bls.Srs.t) ->
prover_public_parameters * verifier_public_parametersval meta_prove :
main_prover_aux:Main_Pack.prover_aux ->
meta_pps:prover_meta_pp Kzg.SMap.t ->
inner_pi_map:Main_Pack.circuit_verifier_input Kzg.SMap.t ->
transcript:Kzg.Utils.Transcript.t ->
(Main_Pack.scalar * 'a) Kzg.SMap.t list Kzg.SMap.t ->
Kzg.SMap.key ->
'b list ->
Main_Kzg.proofval meta_proof :
prover_public_parameters ->
Main_Pack.prover_inputs ->
(Main_Pack.proof * Main_Pack.prover_aux) ->
proofval prove : prover_public_parameters -> inputs:prover_inputs -> proofval meta_verify :
transcript:Kzg.Utils.Transcript.t ->
inputs:circuit_verifier_input Kzg.SMap.t ->
proof:proof ->
(Main_Kzg.scalar
* Main_Kzg.scalar
* Main_Kzg.scalar
* Main_Kzg.scalar
* Main_Kzg.scalar
* Main_Kzg.scalar) ->
Kzg.SMap.key ->
verifier_meta_pp ->
boolval verify :
verifier_public_parameters ->
inputs:verifier_inputs ->
proof ->
boolval scalar_encoding : Main_Pack.scalar Data_encoding.tval proof_encoding : proof Data_encoding.encodingval verifier_public_parameters_encoding :
verifier_public_parameters Data_encoding.encodingmodule Internal_for_tests : sig ... end