rocsolver_ssytrf Interface Reference#
The SYTRF functions compute the factorization of a symmetric and maybe indefinite matrix \(A\) using Bunch-Kaufman diagonal pivoting. More...
Public Member Functions | |
| integer(kind(rocblas_status_success)) function | rocsolver_ssytrf_ (handle, uplo, n, a, lda, ipiv, myinfo) |
| integer(kind(rocblas_status_success)) function | rocsolver_ssytrf_rank_0 (handle, uplo, n, a, lda, ipiv, myinfo) |
| integer(kind(rocblas_status_success)) function | rocsolver_ssytrf_rank_1 (handle, uplo, n, a, lda, ipiv, myinfo) |
| integer(kind(rocblas_status_success)) function | rocsolver_ssytrf_full_rank (handle, uplo, n, a, lda, ipiv, myinfo) |
Detailed Description
The SYTRF functions compute the factorization of a symmetric and maybe indefinite matrix \(A\) using Bunch-Kaufman diagonal pivoting.
(This is the blocked version of the algorithm.)
The factorization has the form
\[ \begin{array}{cl} A = U D U^T & \: \text{or}\\% A = L D L^T & \end{array} \]
where \(U\) or \(L\) is a product of permutation and unit upper/lower triangular matrices (depending on the value of uplo), and \(D\) is a symmetric block diagonal matrix with 1-by-1 and 2-by-2 diagonal blocks \(D_k\).
Specifically, \(U\) and \(L\) are computed as
\[ \begin{array}{cl} U = P(n) U(n) \cdots P(k) U(k) \cdots & \: \text{and}\\% L = P(1) L(1) \cdots P(k) L(k) \cdots & \end{array} \]
where \(k\) decreases from \(n\) to 1 (increases from 1 to \(n\)) in steps of 1 or 2, depending on the order of block \(D_k\), and \(P(k)\) is a permutation matrix defined by \(ipiv[k]\). If \(s\) denotes the order of block \(D_k\), then \(U(k)\) and \(L(k)\) are unit upper/lower triangular matrices defined as
\[ U(k) = \left[ \begin{array}{ccc} I_{k-s} & v & 0 \\% 0 & I_s & 0 \\% 0 & 0 & I_{n-k} \end{array} \right] \]
and
\[ L(k) = \left[ \begin{array}{ccc} I_{k-1} & 0 & 0 \\% 0 & I_s & 0 \\% 0 & v & I_{n-k-s+1} \end{array} \right]. \]
If \(s = 1\), then \(D_k\) is stored in \(A[k,k]\), and \(v\) is stored in the upper/lower part of column \(k\) of \(A\). If \(s = 2\) and uplo is upper, then \(D_k\) is stored in \(A[k-1,k-1]\), \(A[k-1,k]\), and \(A[k,k]\), and \(v\) is stored in the upper parts of columns \(k-1\) and \(k\) of \(A\). If \(s = 2\) and uplo is lower, then \(D_k\) is stored in \(A[k,k]\), \(A[k+1,k]\), and \(A[k+1,k+1]\), and \(v\) is stored in the lower parts of columns \(k\) and \(k+1\) of \(A\).
- Parameters
-
[in] handle - rocblas_handle. [in] uplo - rocblas_fill. Specifies whether the upper or lower part of the matrix A is stored. If uplo indicates lower (or upper), then the upper (or lower) part of A is not used. [in] n - rocblas_int. n >= 0. The number of rows and columns of the matrix A. [in,out] A - pointer to type. Array on the GPU of dimension lda*n. On entry, the symmetric matrix A to be factored. On exit, the block diagonal matrix D and the multipliers needed to compute U or L. [in] lda - rocblas_int. lda >= n. Specifies the leading dimension of A. [out] ipiv - pointer to rocblas_int. Array on the GPU of dimension n. The vector of pivot indices. Elements of ipiv are 1-based indices. For 1 <= k <= n, if ipiv[k] > 0, then rows and columns k and ipiv[k] were interchanged, and D[k,k] is a 1-by-1 diagonal block. If, instead, ipiv[k] = ipiv[k-1] < 0 and uplo is upper (or ipiv[k] = ipiv[k+1] < 0 and uplo is lower), then rows and columns k-1 and -ipiv[k] (or rows and columns k+1 and -ipiv[k]) were interchanged, and D[k-1,k-1] to D[k,k] (or D[k,k] to D[k+1,k+1]) is a 2-by-2 diagonal block. [out] myInfo - pointer to a rocblas_int on the GPU. If info = 0, successful exit. If info = i > 0, D is singular. D[i,i] is the first diagonal zero.
Member Function/Subroutine Documentation
◆ rocsolver_ssytrf_()
| integer(kind(rocblas_status_success)) function hipfort_rocsolver::rocsolver_ssytrf::rocsolver_ssytrf_ | ( | type(c_ptr), value | handle, |
| integer(kind(rocblas_fill_upper)), value | uplo, | ||
| integer(c_int), value | n, | ||
| type(c_ptr), value | a, | ||
| integer(c_int), value | lda, | ||
| type(c_ptr), value | ipiv, | ||
| type(c_ptr), value | myinfo | ||
| ) |
◆ rocsolver_ssytrf_full_rank()
| integer(kind(rocblas_status_success)) function hipfort_rocsolver::rocsolver_ssytrf::rocsolver_ssytrf_full_rank | ( | type(c_ptr) | handle, |
| integer(kind(rocblas_fill_upper)) | uplo, | ||
| integer(c_int) | n, | ||
| real(c_float), dimension(:,:), target | a, | ||
| integer(c_int) | lda, | ||
| integer(c_int), dimension(:), target | ipiv, | ||
| type(c_ptr) | myinfo | ||
| ) |
◆ rocsolver_ssytrf_rank_0()
| integer(kind(rocblas_status_success)) function hipfort_rocsolver::rocsolver_ssytrf::rocsolver_ssytrf_rank_0 | ( | type(c_ptr) | handle, |
| integer(kind(rocblas_fill_upper)) | uplo, | ||
| integer(c_int) | n, | ||
| real(c_float), target | a, | ||
| integer(c_int) | lda, | ||
| integer(c_int), target | ipiv, | ||
| type(c_ptr) | myinfo | ||
| ) |
◆ rocsolver_ssytrf_rank_1()
| integer(kind(rocblas_status_success)) function hipfort_rocsolver::rocsolver_ssytrf::rocsolver_ssytrf_rank_1 | ( | type(c_ptr) | handle, |
| integer(kind(rocblas_fill_upper)) | uplo, | ||
| integer(c_int) | n, | ||
| real(c_float), dimension(:), target | a, | ||
| integer(c_int) | lda, | ||
| integer(c_int), dimension(:), target | ipiv, | ||
| type(c_ptr) | myinfo | ||
| ) |
The documentation for this interface was generated from the following file: