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