ktdeque.extracted
Eraw
ktdeque
type 'a t = Obj.t
val leaf : 'a -> 'a t
val pair : ('a t * 'a t) -> 'a t
val case_pair : ('a t -> 'a t -> 'b) -> 'a t -> 'b
val unleaf : 'a t -> 'a