Main_protocol.Make_implSourcemodule PP : Polynomial_protocol.S with type PC.Scalar.t = Plompiler.S.tmodule PP = PPtype proof = {perm_and_plook : PP.PC.Commitment.t;wires_cm : PP.PC.Commitment.t;pp_proof : PP.proof;}type verifier_public_parameters = {common_pp : Verifier.verifier_common_pp;circuits_map : Verifier.verifier_circuit_pp SMap.t;transcript : PP.transcript;}val setup :
zero_knowledge:bool ->
(Circuit.t * int) SMap.t ->
srs:(Bls12_381_polynomial.Srs.t * Bls12_381_polynomial.Srs.t) ->
prover_public_parameters * verifier_public_parametersval update_prover_public_parameters :
bytes ->
prover_public_parameters ->
Prover.prover_public_parametersval update_verifier_public_parameters :
bytes ->
verifier_public_parameters ->
verifier_public_parametersval verify :
verifier_public_parameters ->
inputs:Gates.PP.PC.Scalar.t array list SMap.t ->
proof ->
bool