Module type Linked_tree.S

module Key : Key
type 'a t
val add : 'a t -> prev_key:Key.t -> key:Key.t -> length:Mina_numbers.Length.t -> data:'a -> [ `Ok | `Duplicate | `Too_old ]
val path : 'a t -> source:Key.t -> ancestor:Key.t -> 'a list option
val ancestor_of_depth : 'a t -> source:Key.t -> depth:int -> (Key.t * 'a list) option
val create : max_size:int -> 'a t