Storage.Make_Storagemodule C : Core_sig.Validatormodule Tree : sig ... endmodule Roots : sig ... endmodule Nullifiers : sig ... endmodule Ciphertexts : sig ... endtype state = {tree : Tree.t;nullifiers : Nullifiers.t;roots : Roots.t;ciphertexts : Ciphertexts.t;memo_size : int;}val create_empty_state : memo_size:int -> stateval state_encoding : state Data_encoding.encodingval mem_nullifier : state -> Nullifiers.elt -> boolval add_nullifier : state -> Nullifiers.elt -> stateval add : state -> (C.Commitment.t * C.Ciphertext.t) list -> stateval empty : memo_size:int -> stateval size : state -> int64 * int64val get_memo_size : state -> intval get_witness : state -> Tezos_stdlib.Compare.Int64.t -> bytesval get :
state ->
Tezos_stdlib.Compare.Int64.t ->
C.Commitment.t * C.Ciphertext.tval mem : state -> Ciphertexts.Map.key -> bool