val make : int -> 'a tMake a new bucket with a specified size.
val add : 'a t -> 'a -> unitadd t v adds the new value v in the bucket t. If the bucket is full, we erase by v the oldest value of t.
val iter : 'a t -> ('a -> unit) -> unititer t f applies f to all values in the bucket ŧ. f receives each value.
val find : 'a t -> ('a -> bool) -> 'a optionfind t f returns the first value which respects the predicate f. Otherwise, it returns None.