Examples of intW

Examples of org.netlib.util.intW

        double anorm = A.norm(norm);


        double[] work = new double[3 * n];
        int[] lwork = new int[n];


        intW info = new intW(0);
        doubleW rcond = new doubleW(0);
        LAPACK.getInstance().dgbcon(norm.netlib(), n, kl, ku, LU.getData(),
           Matrices.ld(2 * kl + ku + 1), ipiv, anorm, rcond, work, lwork, info);


        if (info.val < 0)

View Full Code Here

Examples of org.netlib.util.intW

        if (singular)
            throw new MatrixSingularException();
        if (B.numRows() != n)
            throw new IllegalArgumentException("B.numRows() != n");


        intW info = new intW(0);
        LAPACK.getInstance().dgbtrs(trans.netlib(), n, kl, ku, B.numColumns(),
                LU.getData(), 2 * kl + ku + 1, ipiv, B.getData(), Matrices.ld(n), info);


        if (info.val < 0)
            throw new IllegalArgumentException();

View Full Code Here

Examples of org.netlib.util.intW


        X.set(B);


        int[] piv = new int[numRows];


        intW info = new intW(0);
        LAPACK.getInstance().dgesv(numRows, B.numColumns(),
                data.clone(), Matrices.ld(numRows), piv, Xd, Matrices.ld(numRows), info);


        if (info.val > 0)
            throw new MatrixSingularException();

View Full Code Here

Examples of org.netlib.util.intW

                Xtmp.set(i, j, B.get(i, j));
        double[] newData = data.clone();


        // Query optimal workspace
        double[] work = new double[1];
        intW info = new intW(0);
        LAPACK.getInstance().dgels(trans.netlib(), numRows, numColumns, nrhs,
                newData, Matrices.ld(numRows), Xtmp.getData(), Matrices.ld(numRows, numColumns),
                work, -1, info);


        // Allocate workspace

View Full Code Here

Examples of org.netlib.util.intW


        X.set(B);


        int[] ipiv = new int[numRows];


        intW info = new intW(0);
        LAPACK.getInstance().dspsv(uplo.netlib(), numRows, X.numColumns(),
                data.clone(), ipiv, Xd, Matrices.ld(numRows), info);


        if (info.val > 0)
            throw new MatrixSingularException();

View Full Code Here

Examples of org.netlib.util.intW


        double[] Xd = ((DenseMatrix) X).getData();


        X.set(B);


        intW info = new intW(0);
        LAPACK.getInstance().dppsv(uplo.netlib(), numRows, X.numColumns(),
                data.clone(), Xd, Matrices.ld(numRows), info);


        if (info.val > 0)
            throw new MatrixNotSPDException();

View Full Code Here

Examples of org.netlib.util.intW

     * @return The current decomposition
     */
    public DenseLU factor(DenseMatrix A) {
        singular = false;


        intW info = new intW(0);
        LAPACK.getInstance().dgetrf(A.numRows(), A.numColumns(),
                A.getData(), Matrices.ld(A.numRows()), piv, info);


        if (info.val > 0)
            singular = true;

View Full Code Here

Examples of org.netlib.util.intW


        double anorm = A.norm(norm);


        int n = A.numRows();


        intW info = new intW(0);
        doubleW rcond = new doubleW(0);
        LAPACK.getInstance().dgecon(norm.netlib(), n, LU.getData(), Matrices.ld(n), anorm,
                rcond, new double[4 * n], new int[n], info);


        if (info.val < 0)

View Full Code Here

Examples of org.netlib.util.intW

        if (singular)
            throw new MatrixSingularException();
        if (B.numRows() != LU.numRows())
            throw new IllegalArgumentException("B.numRows() != LU.numRows()");


        intW info = new intW(0);
        LAPACK.getInstance().dgetrs(trans.netlib(), LU.numRows(),
                B.numColumns(), LU.getData(), Matrices.ld(LU.numRows()),
                piv, B.getData(), Matrices.ld(LU.numRows()), info);


        if (info.val < 0)

View Full Code Here

Examples of org.netlib.util.intW


        double[] Xd = ((DenseMatrix) X).getData();


        X.set(B);


        intW info = new intW(0);
        LAPACK.getInstance().dptsv(numRows, X.numColumns(),
                diag.clone(), offDiag.clone(), Xd, Matrices.ld(numRows), info);


        if (info.val > 0)
            throw new MatrixNotSPDException();

View Full Code Here

0 1 2 3 4 5

TOP

All source code are property of their respective owners. Java is a trademark of Sun Microsystems, Inc and owned by ORACLE Inc. Contact coftware#gmail.com.