package lbvs_consent

  1. Overview
  2. Docs
module FMap : sig ... end
type t = {
  1. queue : string list FMap.t;
  2. count : int;
  3. max : int;
}
val create_priv : string list FMap.t -> int -> int -> t
val create : int -> t
val insert_priv : float -> string -> string list FMap.t -> string list FMap.t
val add : string -> float -> t -> t
val high_scores_first : t -> (float * string) list