let
exists t ~f =
Doubly_linked
.for_all t.queue ~f:(
fun
kv
->
f kv.value)