module Deque_stream:sig
..end
type 'a
t
val empty : 'a t
val cons : int ->
'a It_type.IT.stream ->
'a t -> 'a t
val cons_sl : 'a It_type.IT.sl ->
'a t -> 'a t
val snoc : 'a t ->
int -> 'a It_type.IT.stream -> 'a t
val concat : 'a t -> 'a It_type.IT.sl
val destr_head : 'a t ->
((int * 'a It_type.IT.stream) * 'a t) option
val is_empty : 'a t -> bool