cavis/libnd4j/include/ops/declarable/helpers/cpu/matrix_band.cpp

74 lines
3.3 KiB
C++

/*******************************************************************************
* Copyright (c) 2015-2018 Skymind, Inc.
*
* This program and the accompanying materials are made available under the
* terms of the Apache License, Version 2.0 which is available at
* https://www.apache.org/licenses/LICENSE-2.0.
*
* Unless required by applicable law or agreed to in writing, software
* distributed under the License is distributed on an "AS IS" BASIS, WITHOUT
* WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. See the
* License for the specific language governing permissions and limitations
* under the License.
*
* SPDX-License-Identifier: Apache-2.0
******************************************************************************/
//
// @author George A. Shulinok <sgazeos@gmail.com>
//
#include <ops/declarable/helpers/matrix_band.h>
namespace nd4j {
namespace ops {
namespace helpers {
template <typename T>
void matrixBandPart_(NDArray* input, NDArray* output, Nd4jLong lowerBand, Nd4jLong upperBand) {
// TO DO: retrieve all 2D submatricies with last dimensions and process them with given bands
Nd4jLong M = input->sizeAt(-2);
Nd4jLong N = input->sizeAt(-1);
Nd4jLong lastDim = input->rankOf() - 1;
Nd4jLong preLastDim = input->rankOf() - 2;
ResultSet listOut = output->allTensorsAlongDimension({(int)preLastDim, (int)lastDim});
ResultSet listDiag = input->allTensorsAlongDimension({(int)preLastDim, (int)lastDim});
for (Nd4jLong e = 0; e < listOut.size(); ++e) {
NDArray* inputMatrix = listDiag.at(e);
NDArray* outputMatrix = listOut.at(e);
if (outputMatrix != inputMatrix) // if not inplace
outputMatrix->assign(inputMatrix);
if (lowerBand >= 0) {
for (Nd4jLong row = 0; row < inputMatrix->rows(); ++row) {
for (Nd4jLong col = 0; col < row; ++col) {
if ((row - col) > lowerBand)
outputMatrix->p(row, col, 0.);
// else
// (*outputMatrix)(row, col) = (*inputMatrix)(row, col);
}
// in_band(m, n) = (num_lower < 0 || (m-n) <= num_lower)) && (num_upper < 0 || (n-m) <= num_upper).
}
}
if (upperBand >= 0) {
for (Nd4jLong col = 0; col < inputMatrix->columns(); ++col) {
for (Nd4jLong row = 0; row < col; ++row) {
if ((col - row) > upperBand)
outputMatrix->p(row, col, 0.);
// else
// (*outputMatrix)(row, col) = (*inputMatrix)(row, col);
}
// in_band(m, n) = (num_lower < 0 || (m-n) <= num_lower)) && (num_upper < 0 || (n-m) <= num_upper).
}
}
}
}
void matrixBandPart(nd4j::LaunchContext * context, NDArray* input, NDArray* output, Nd4jLong lowerBand, Nd4jLong upperBand) {
BUILD_SINGLE_SELECTOR(input->dataType(), matrixBandPart_, (input, output, lowerBand, upperBand), FLOAT_TYPES);
}
BUILD_SINGLE_TEMPLATE(template void matrixBandPart_, (NDArray* input, NDArray* output, Nd4jLong lowerBand, Nd4jLong upperBand), FLOAT_TYPES);
}
}
}