sig
  val iter : f:('a -> unit) -> 'a Stream.t -> unit
  val foldl :
    f:('a -> 'b -> 'a * bool option) -> init:'a -> 'b Stream.t -> 'a
  val foldr : f:('a -> 'b lazy_t -> 'b) -> init:'b -> 'a Stream.t -> 'b
  val fold : f:('a -> 'a -> 'a * bool option) -> init:'a Stream.t -> 'a
  val filter : f:('a -> bool) -> 'a Stream.t -> 'a Stream.t
  val map : f:('a -> 'b) -> 'a Stream.t -> 'b Stream.t
  val map2 : f:('a -> 'b -> 'c) -> 'a Stream.t -> 'b Stream.t -> 'c Stream.t
  val scanl : f:('a -> 'b -> 'a) -> 'a -> 'b Stream.t -> 'a Stream.t
  val scan : f:('a -> 'a -> 'a) -> 'a Stream.t -> 'a Stream.t
  val take_while : f:('a -> bool) -> 'a Stream.t -> 'a Stream.t
  val drop_while : f:('a -> bool) -> 'a Stream.t -> 'a Stream.t
  val merge :
    f:(bool -> 'a -> bool) -> 'a Stream.t * 'a Stream.t -> 'a Stream.t
  val switch : f:('a -> bool) -> 'a Stream.t -> 'a Stream.t * 'a Stream.t
end