sig
  val ( -- ) : int -> int -> int Sequence.t
  val ( |> ) : 'a -> ('a -> 'b) -> 'b
  val ( @@ ) : 'a Sequence.t -> 'a Sequence.t -> 'a Sequence.t
end