PP.PCmodule Scalar : sig ... endmodule Polynomial : sig ... endmodule Scalar_map : sig ... endmodule Fr_generation : sig ... endtype secret = Polynomial.Polynomial.t Plonk.SMap.ttype query = Scalar.t Plonk.SMap.ttype answer = Scalar.t Plonk.SMap.t Plonk.SMap.ttype proof = PP.PC.prooftype transcript = Bytes.tmodule Public_parameters : sig ... endmodule Commitment : sig ... endval prove :
Public_parameters.prover ->
transcript ->
secret list ->
Commitment.prover_aux list ->
query list ->
answer list ->
proof * transcriptval verify :
Public_parameters.verifier ->
transcript ->
Commitment.t list ->
query list ->
answer list ->
proof ->
bool * transcript