sig
val read_stream :
(string -> 'a array) -> Stdlib.in_channel -> 'a Stdlib.Stream.t
val write_stream :
?chunk_len:int ->
('a array -> string) -> Stdlib.out_channel -> 'a Stdlib.Stream.t -> unit
val test : int list -> bool
end