hetrs_aa - {he,sy}trs_aa: triangular solve using factor

Generated automatically by Doxygen for LAPACK from the source code. Version 3.12.0 Sun Jul 20 2025 01:40:05 hetrs_aa(3)

subroutinechetrs_aa(characteruplo,integern,integernrhs,complex,dimension(lda,*)a,integerlda,integer,dimension(*)ipiv,complex,dimension(ldb,*)b,integerldb,complex,dimension(*)work,integerlwork,integerinfo)CHETRS_AAPurpose: CHETRS_AA solves a system of linear equations A*X = B with a complex hermitian matrix A using the factorization A = U**H*T*U or A = L*T*L**H computed by CHETRF_AA. ParametersUPLO UPLO is CHARACTER*1 Specifies whether the details of the factorization are stored as an upper or lower triangular matrix. = 'U': Upper triangular, form is A = U**H*T*U; = 'L': Lower triangular, form is A = L*T*L**H. N N is INTEGER The order of the matrix A. N >= 0. NRHS NRHS is INTEGER The number of right hand sides, i.e., the number of columns of the matrix B. NRHS >= 0. A A is COMPLEX array, dimension (LDA,N) Details of factors computed by CHETRF_AA. LDA LDA is INTEGER The leading dimension of the array A. LDA >= max(1,N). IPIV IPIV is INTEGER array, dimension (N) Details of the interchanges as computed by CHETRF_AA. B B is COMPLEX array, dimension (LDB,NRHS) On entry, the right hand side matrix B. On exit, the solution matrix X. LDB LDB is INTEGER The leading dimension of the array B. LDB >= max(1,N). WORK WORK is COMPLEX array, dimension (MAX(1,LWORK)) LWORK LWORK is INTEGER The dimension of the array WORK. If MIN(N,NRHS) = 0, LWORK >= 1, else LWORK >= 3*N-2. If LWORK = -1, then a workspace query is assumed; the routine only calculates the minimal size of the WORK array, returns this value as the first entry of the WORK array, and no error message related to LWORK is issued by XERBLA. INFO INFO is INTEGER = 0: successful exit < 0: if INFO = -i, the i-th argument had an illegal value Author Univ. of Tennessee Univ. of California Berkeley Univ. of Colorado Denver NAG Ltd. subroutinecsytrs_aa(characteruplo,integern,integernrhs,complex,dimension(lda,*)a,integerlda,integer,dimension(*)ipiv,complex,dimension(ldb,*)b,integerldb,complex,dimension(*)work,integerlwork,integerinfo)CSYTRS_AAPurpose: CSYTRS_AA solves a system of linear equations A*X = B with a complex symmetric matrix A using the factorization A = U**T*T*U or A = L*T*L**T computed by CSYTRF_AA. ParametersUPLO UPLO is CHARACTER*1 Specifies whether the details of the factorization are stored as an upper or lower triangular matrix. = 'U': Upper triangular, form is A = U**T*T*U; = 'L': Lower triangular, form is A = L*T*L**T. N N is INTEGER The order of the matrix A. N >= 0. NRHS NRHS is INTEGER The number of right hand sides, i.e., the number of columns of the matrix B. NRHS >= 0. A A is COMPLEX array, dimension (LDA,N) Details of factors computed by CSYTRF_AA. LDA LDA is INTEGER The leading dimension of the array A. LDA >= max(1,N). IPIV IPIV is INTEGER array, dimension (N) Details of the interchanges as computed by CSYTRF_AA. B B is COMPLEX array, dimension (LDB,NRHS) On entry, the right hand side matrix B. On exit, the solution matrix X. LDB LDB is INTEGER The leading dimension of the array B. LDB >= max(1,N). WORK WORK is COMPLEX array, dimension (MAX(1,LWORK)) LWORK LWORK is INTEGER The dimension of the array WORK. LWORK >= max(1,3*N-2). INFO INFO is INTEGER = 0: successful exit < 0: if INFO = -i, the i-th argument had an illegal value Author Univ. of Tennessee Univ. of California Berkeley Univ. of Colorado Denver NAG Ltd. subroutinedsytrs_aa(characteruplo,integern,integernrhs,doubleprecision,dimension(lda,*)a,integerlda,integer,dimension(*)ipiv,doubleprecision,dimension(ldb,*)b,integerldb,doubleprecision,dimension(*)work,integerlwork,integerinfo)DSYTRS_AAPurpose: DSYTRS_AA solves a system of linear equations A*X = B with a real symmetric matrix A using the factorization A = U**T*T*U or A = L*T*L**T computed by DSYTRF_AA. ParametersUPLO UPLO is CHARACTER*1 Specifies whether the details of the factorization are stored as an upper or lower triangular matrix. = 'U': Upper triangular, form is A = U**T*T*U; = 'L': Lower triangular, form is A = L*T*L**T. N N is INTEGER The order of the matrix A. N >= 0. NRHS NRHS is INTEGER The number of right hand sides, i.e., the number of columns of the matrix B. NRHS >= 0. A A is DOUBLE PRECISION array, dimension (LDA,N) Details of factors computed by DSYTRF_AA. LDA LDA is INTEGER The leading dimension of the array A. LDA >= max(1,N). IPIV IPIV is INTEGER array, dimension (N) Details of the interchanges as computed by DSYTRF_AA. B B is DOUBLE PRECISION array, dimension (LDB,NRHS) On entry, the right hand side matrix B. On exit, the solution matrix X. LDB LDB is INTEGER The leading dimension of the array B. LDB >= max(1,N). WORK WORK is DOUBLE PRECISION array, dimension (MAX(1,LWORK)) LWORK LWORK is INTEGER The dimension of the array WORK. If MIN(N,NRHS) = 0, LWORK >= 1, else LWORK >= 3*N-2. If LWORK = -1, then a workspace query is assumed; the routine only calculates the minimal size of the WORK array, returns this value as the first entry of the WORK array, and no error message related to LWORK is issued by XERBLA. INFO INFO is INTEGER = 0: successful exit < 0: if INFO = -i, the i-th argument had an illegal value Author Univ. of Tennessee Univ. of California Berkeley Univ. of Colorado Denver NAG Ltd. subroutinessytrs_aa(characteruplo,integern,integernrhs,real,dimension(lda,*)a,integerlda,integer,dimension(*)ipiv,real,dimension(ldb,*)b,integerldb,real,dimension(*)work,integerlwork,integerinfo)SSYTRS_AAPurpose: SSYTRS_AA solves a system of linear equations A*X = B with a real symmetric matrix A using the factorization A = U**T*T*U or A = L*T*L**T computed by SSYTRF_AA. ParametersUPLO UPLO is CHARACTER*1 Specifies whether the details of the factorization are stored as an upper or lower triangular matrix. = 'U': Upper triangular, form is A = U**T*T*U; = 'L': Lower triangular, form is A = L*T*L**T. N N is INTEGER The order of the matrix A. N >= 0. NRHS NRHS is INTEGER The number of right hand sides, i.e., the number of columns of the matrix B. NRHS >= 0. A A is REAL array, dimension (LDA,N) Details of factors computed by SSYTRF_AA. LDA LDA is INTEGER The leading dimension of the array A. LDA >= max(1,N). IPIV IPIV is INTEGER array, dimension (N) Details of the interchanges as computed by SSYTRF_AA. B B is REAL array, dimension (LDB,NRHS) On entry, the right hand side matrix B. On exit, the solution matrix X. LDB LDB is INTEGER The leading dimension of the array B. LDB >= max(1,N). WORK WORK is REAL array, dimension (MAX(1,LWORK)) LWORK LWORK is INTEGER The dimension of the array WORK. If MIN(N,NRHS) = 0, LWORK >= 1, else LWORK >= 3*N-2. If LWORK = -1, then a workspace query is assumed; the routine only calculates the minimal size of the WORK array, returns this value as the first entry of the WORK array, and no error message related to LWORK is issued by XERBLA. INFO INFO is INTEGER = 0: successful exit < 0: if INFO = -i, the i-th argument had an illegal value Author Univ. of Tennessee Univ. of California Berkeley Univ. of Colorado Denver NAG Ltd. subroutinezhetrs_aa(characteruplo,integern,integernrhs,complex*16,dimension(lda,*)a,integerlda,integer,dimension(*)ipiv,complex*16,dimension(ldb,*)b,integerldb,complex*16,dimension(*)work,integerlwork,integerinfo)ZHETRS_AAPurpose: ZHETRS_AA solves a system of linear equations A*X = B with a complex hermitian matrix A using the factorization A = U**H*T*U or A = L*T*L**H computed by ZHETRF_AA. ParametersUPLO UPLO is CHARACTER*1 Specifies whether the details of the factorization are stored as an upper or lower triangular matrix. = 'U': Upper triangular, form is A = U**H*T*U; = 'L': Lower triangular, form is A = L*T*L**H. N N is INTEGER The order of the matrix A. N >= 0. NRHS NRHS is INTEGER The number of right hand sides, i.e., the number of columns of the matrix B. NRHS >= 0. A A is COMPLEX*16 array, dimension (LDA,N) Details of factors computed by ZHETRF_AA. LDA LDA is INTEGER The leading dimension of the array A. LDA >= max(1,N). IPIV IPIV is INTEGER array, dimension (N) Details of the interchanges as computed by ZHETRF_AA. B B is COMPLEX*16 array, dimension (LDB,NRHS) On entry, the right hand side matrix B. On exit, the solution matrix X. LDB LDB is INTEGER The leading dimension of the array B. LDB >= max(1,N). WORK WORK is COMPLEX*16 array, dimension (MAX(1,LWORK)) LWORK LWORK is INTEGER The dimension of the array WORK. If MIN(N,NRHS) = 0, LWORK >= 1, else LWORK >= 3*N-2. If LWORK = -1, then a workspace query is assumed; the routine only calculates the minimal size of the WORK array, returns this value as the first entry of the WORK array, and no error message related to LWORK is issued by XERBLA. INFO INFO is INTEGER = 0: successful exit < 0: if INFO = -i, the i-th argument had an illegal value Author Univ. of Tennessee Univ. of California Berkeley Univ. of Colorado Denver NAG Ltd. subroutinezsytrs_aa(characteruplo,integern,integernrhs,complex*16,dimension(lda,*)a,integerlda,integer,dimension(*)ipiv,complex*16,dimension(ldb,*)b,integerldb,complex*16,dimension(*)work,integerlwork,integerinfo)ZSYTRS_AAPurpose: ZSYTRS_AA solves a system of linear equations A*X = B with a complex symmetric matrix A using the factorization A = U**T*T*U or A = L*T*L**T computed by ZSYTRF_AA. ParametersUPLO UPLO is CHARACTER*1 Specifies whether the details of the factorization are stored as an upper or lower triangular matrix. = 'U': Upper triangular, form is A = U**T*T*U; = 'L': Lower triangular, form is A = L*T*L**T. N N is INTEGER The order of the matrix A. N >= 0. NRHS NRHS is INTEGER The number of right hand sides, i.e., the number of columns of the matrix B. NRHS >= 0. A A is COMPLEX*16 array, dimension (LDA,N) Details of factors computed by ZSYTRF_AA. LDA LDA is INTEGER The leading dimension of the array A. LDA >= max(1,N). IPIV IPIV is INTEGER array, dimension (N) Details of the interchanges as computed by ZSYTRF_AA. B B is COMPLEX*16 array, dimension (LDB,NRHS) On entry, the right hand side matrix B. On exit, the solution matrix X. LDB LDB is INTEGER The leading dimension of the array B. LDB >= max(1,N). WORK WORK is COMPLEX*16 array, dimension (MAX(1,LWORK)) LWORK LWORK is INTEGER The dimension of the array WORK. LWORK >= max(1,3*N-2). INFO INFO is INTEGER = 0: successful exit < 0: if INFO = -i, the i-th argument had an illegal value Author Univ. of Tennessee Univ. of California Berkeley Univ. of Colorado Denver NAG Ltd.

hetrs_aa - {he,sy}trs_aa: triangular solve using factor

Functions subroutine chetrs_aa (uplo, n, nrhs, a, lda, ipiv, b, ldb, work, lwork, info) CHETRS_AA subroutine csytrs_aa (uplo, n, nrhs, a, lda, ipiv, b, ldb, work, lwork, info) CSYTRS_AA subroutine dsytrs_aa (uplo, n, nrhs, a, lda, ipiv, b, ldb, work, lwork, info) DSYTRS_AA subroutine ssytrs_aa (uplo, n, nrhs, a, lda, ipiv, b, ldb, work, lwork, info) SSYTRS_AA subroutine zhetrs_aa (uplo, n, nrhs, a, lda, ipiv, b, ldb, work, lwork, info) ZHETRS_AA subroutine zsytrs_aa (uplo, n, nrhs, a, lda, ipiv, b, ldb, work, lwork, info) ZSYTRS_AA