sig
type data = CtrlDpds.Computer.t
val clear : unit -> unit
val mem : int -> bool
val find : int -> CtrlDpds.State.t
val replace : int -> CtrlDpds.State.t -> unit
val add : int -> CtrlDpds.State.t -> unit
val iter : (int -> CtrlDpds.State.t -> unit) -> unit
val length : unit -> int
end