Function split

packages/effect/test/Stream/zipping.test.ts:29–42

(chunks: Chunk.Chunk<Chunk.Chunk<A>>)

export const splitChunks = <A>(chunks: Chunk.Chunk<Chunk.Chunk<A>>): fc.Arbitrary<Chunk.Chunk<Chunk.Chunk<A>>> => {
  const split = (chunks: Chunk.Chunk<Chunk.Chunk<A>>): fc.Arbitrary<Chunk.Chunk<Chunk.Chunk<A>>> =>
    fc.integer({ min: 0, max: Math.max(chunks.length - 1, 0) }).chain((i) => {
      const chunk = Chunk.unsafeGet(chunks, i)
      return fc.integer({ min: 0, max: Math.max(chunk.length - 1, 0) }).map((j) => {
        const [left, right] = pipe(chunk, Chunk.splitAt(j))
        return pipe(
          chunks,
          Chunk.take(i),
          Chunk.appendAll(Chunk.of(left)),
          Chunk.appendAll(Chunk.of(right)),
          Chunk.appendAll(pipe(chunks, Chunk.drop(i + 1)))
        )
      })
    })
  return fc.oneof(fc.constant(chunks), split(chunks).chain((chunks) => splitChunks(chunks)))
}