2022-09-20 15:40:53 +02:00

81 lines
2.3 KiB
Java

/*
* ******************************************************************************
* *
* *
* * 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.
* *
* * See the NOTICE file distributed with this work for additional
* * information regarding copyright ownership.
* * 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
* *****************************************************************************
*/
package org.nd4j.nativeblas;
public class NativeLapack {
public NativeLapack() {}
// LU decomoposition of a general matrix
/**
* LU decomposiiton of a matrix
* @param M
* @param N
* @param A
* @param lda
* @param IPIV
* @param INFO
*/
public native void dgetrf(long[] extraPointers, int M, int N, long A, int lda, int[] IPIV, int INFO);
// generate inverse of a matrix given its LU decomposition
/**
* Generate inverse ggiven LU decomp
* @param N
* @param A
* @param lda
* @param IPIV
* @param WORK
* @param lwork
* @param INFO
*/
public native void dgetri(long[] extraPointers, int N, long A, int lda, int[] IPIV, long WORK, int lwork, int INFO);
// LU decomoposition of a general matrix
/**
* LU decomposiiton of a matrix
* @param M
* @param N
* @param A
* @param lda
* @param IPIV
* @param INFO
*/
public native void sgetrf(long[] extraPointers, int M, int N, long A, int lda, int[] IPIV, int INFO);
// generate inverse of a matrix given its LU decomposition
/**
* Generate inverse ggiven LU decomp
* @param N
* @param A
* @param lda
* @param IPIV
* @param WORK
* @param lwork
* @param INFO
*/
public native void sgetri(long[] extraPointers, int N, long A, int lda, int[] IPIV, long WORK, int lwork, int INFO);
}