sig
  val hd : 'Extlib.Seq.t -> 'a option
  val tl : 'Extlib.Seq.t -> 'Extlib.Seq.t option
  val first : 'Extlib.Seq.t -> 'a option
  val last : 'Extlib.Seq.t -> 'a option
  val at : 'Extlib.Seq.t -> int -> 'a option
  val reduce : ('-> '-> 'a) -> 'Extlib.Seq.t -> 'a option
  val max : 'Extlib.Seq.t -> 'a option
  val min : 'Extlib.Seq.t -> 'a option
  val combine :
    'Extlib.Seq.t -> 'Extlib.Seq.t -> ('a * 'b) Extlib.Seq.t option
end