Plonk (mavkit-proto-libs.Mavryk_protocol_environment

include module type of struct include Plonk.Main_protocol end

include module type of struct include Plonk.Main_protocol_intf end

module SMap = Plonk.Main_protocol.SMap

module type S = Plonk.Main_protocol.S

module Make_impl = Plonk.Main_protocol.Make_impl

module Make = Plonk.Main_protocol.Make

include sig ... end

exception Rest_not_null of string

exception Entry_not_in_table of string

module Input_commitment = Plonk.Main_protocol.Input_commitment

type scalar = Kzg.Bls.Scalar.t

val scalar_t : scalar Repr.t

val scalar_encoding : scalar Data_encoding.t

type circuit_map = (Plonk.Circuit.t * int) Kzg.SMap.t

type prover_public_parameters =
  Make(Plonk.Polynomial_protocol).prover_public_parameters

val prover_public_parameters_t : prover_public_parameters Repr.t

type verifier_public_parameters =
  Make(Plonk.Polynomial_protocol).verifier_public_parameters

val verifier_public_parameters_t : verifier_public_parameters Repr.t

val verifier_public_parameters_encoding : 
  verifier_public_parameters Data_encoding.t

type proof = Make(Plonk.Polynomial_protocol).proof

val proof_t : proof Repr.t

val proof_encoding : proof Data_encoding.t

type circuit_prover_input =
  Make(Plonk.Polynomial_protocol).circuit_prover_input =
  {

witness : scalar array;
input_commitments : Input_commitment.t list;

}

val circuit_prover_input_t : circuit_prover_input Repr.t

type prover_inputs = circuit_prover_input list Kzg.SMap.t

val prover_inputs_t : prover_inputs Repr.t

type public_inputs = Kzg.Bls.Scalar.t array list

val public_inputs_t : public_inputs Repr.t

type circuit_verifier_input =
  Make(Plonk.Polynomial_protocol).circuit_verifier_input =
  {

nb_proofs : int;
public : public_inputs;
commitments : Input_commitment.public list list;

}

val circuit_verifier_input_t : circuit_verifier_input Repr.t

val verifier_inputs_t : circuit_verifier_input Kzg.SMap.t Repr.t

val to_verifier_inputs : 
  prover_public_parameters ->
  prover_inputs ->
  circuit_verifier_input Kzg.SMap.t

val input_commit : 
  ?size:int ->
  ?shift:int ->
  prover_public_parameters ->
  scalar array ->
  Input_commitment.t

val setup : 
  zero_knowledge:bool ->
  circuit_map ->
  srs:(Kzg.Bls.Srs.t * Kzg.Bls.Srs.t) ->
  prover_public_parameters * verifier_public_parameters

val update_prover_public_parameters : 
  'a Repr.ty ->
  'a ->
  prover_public_parameters ->
  prover_public_parameters

val update_verifier_public_parameters : 
  'a Repr.ty ->
  'a ->
  verifier_public_parameters ->
  verifier_public_parameters

val prove : prover_public_parameters -> inputs:prover_inputs -> proof

module Internal_for_tests = Plonk.Main_protocol.Internal_for_tests

type public_parameters = verifier_public_parameters

type verifier_inputs = (string * scalar array list) list

val public_parameters_encoding : 
  Plonk.Main_protocol.verifier_public_parameters Data_encoding.t

val scalar_array_encoding : scalar array Data_encoding.encoding

val verify : 
  verifier_public_parameters ->
  (string * public_inputs) list ->
  proof ->
  bool