package scientifik.kmath.nd4j import org.nd4j.linalg.api.ndarray.INDArray import org.nd4j.linalg.api.shape.Shape private class INDArrayIndicesIterator(private val iterateOver: INDArray) : Iterator { private var i: Int = 0 override fun hasNext(): Boolean = i < iterateOver.length() override fun next(): IntArray { val la = if (iterateOver.ordering() == 'c') Shape.ind2subC(iterateOver, i++.toLong())!! else Shape.ind2sub(iterateOver, i++.toLong())!! return la.toIntArray() } } internal fun INDArray.indicesIterator(): Iterator = INDArrayIndicesIterator(this) private sealed class INDArrayIteratorBase(protected val iterateOver: INDArray) : Iterator> { private var i: Int = 0 final override fun hasNext(): Boolean = i < iterateOver.length() abstract fun getSingle(indices: LongArray): T final override fun next(): Pair { val la = if (iterateOver.ordering() == 'c') Shape.ind2subC(iterateOver, i++.toLong())!! else Shape.ind2sub(iterateOver, i++.toLong())!! return la.toIntArray() to getSingle(la) } } private class INDArrayRealIterator(iterateOver: INDArray) : INDArrayIteratorBase(iterateOver) { override fun getSingle(indices: LongArray): Double = iterateOver.getDouble(*indices) } internal fun INDArray.realIterator(): Iterator> = INDArrayRealIterator(this) private class INDArrayLongIterator(iterateOver: INDArray) : INDArrayIteratorBase(iterateOver) { override fun getSingle(indices: LongArray) = iterateOver.getLong(*indices) } internal fun INDArray.longIterator(): Iterator> = INDArrayLongIterator(this) private class INDArrayIntIterator(iterateOver: INDArray) : INDArrayIteratorBase(iterateOver) { override fun getSingle(indices: LongArray) = iterateOver.getInt(*indices.toIntArray()) } internal fun INDArray.intIterator(): Iterator> = INDArrayIntIterator(this) private class INDArrayFloatIterator(iterateOver: INDArray) : INDArrayIteratorBase(iterateOver) { override fun getSingle(indices: LongArray) = iterateOver.getFloat(*indices) } internal fun INDArray.floatIterator(): Iterator> = INDArrayFloatIterator(this)