sequence - シーケンスを 2 回目にループするときの空のシーケンス

Question

スタンザでは、シーケンスを 2 回ループしたいと考えています。

私はそのようなものを持っています:

public defn function1-and-function2 (s:Seqable<Double>) -> [Double, Double]:
   [function1(s), function2(s)]

と

public defn function1 (s:Seqable<Double>) -> Double

と

public defn function2 (s:Seqable<Shape>) -> Double

と の両方function1でfunction2、シーケンスをループしています。しかし、 に到達するfunction2と、シーケンスは空になります。