Skip to content

Commit

Permalink
comments fixed: 'Transpose' replaced by 'Conjugate transpose'
Browse files Browse the repository at this point in the history
  • Loading branch information
jip authored and weslleyspereira committed Apr 6, 2021
1 parent 56d3c3f commit 0397cd6
Show file tree
Hide file tree
Showing 6 changed files with 12 additions and 12 deletions.
4 changes: 2 additions & 2 deletions SRC/cherfsx.f
Original file line number Diff line number Diff line change
Expand Up @@ -122,8 +122,8 @@
*> AF is COMPLEX array, dimension (LDAF,N)
*> The factored form of the matrix A. AF contains the block
*> diagonal matrix D and the multipliers used to obtain the
*> factor U or L from the factorization A = U*D*U**T or A =
*> L*D*L**T as computed by CHETRF.
*> factor U or L from the factorization A = U*D*U**H or A =
*> L*D*L**H as computed by CHETRF.
*> \endverbatim
*>
*> \param[in] LDAF
Expand Down
6 changes: 3 additions & 3 deletions SRC/chesvxx.f
Original file line number Diff line number Diff line change
Expand Up @@ -185,12 +185,12 @@
*> If FACT = 'F', then AF is an input argument and on entry
*> contains the block diagonal matrix D and the multipliers
*> used to obtain the factor U or L from the factorization A =
*> U*D*U**T or A = L*D*L**T as computed by CHETRF.
*> U*D*U**H or A = L*D*L**H as computed by CHETRF.
*>
*> If FACT = 'N', then AF is an output argument and on exit
*> returns the block diagonal matrix D and the multipliers
*> used to obtain the factor U or L from the factorization A =
*> U*D*U**T or A = L*D*L**T.
*> U*D*U**H or A = L*D*L**H.
*> \endverbatim
*>
*> \param[in] LDAF
Expand Down Expand Up @@ -646,7 +646,7 @@ SUBROUTINE CHESVXX( FACT, UPLO, N, NRHS, A, LDA, AF, LDAF, IPIV,
*
IF( NOFACT .OR. EQUIL ) THEN
*
* Compute the LDL^T or UDU^T factorization of A.
* Compute the LDL^H or UDU^H factorization of A.
*
CALL CLACPY( UPLO, N, N, A, LDA, AF, LDAF )
CALL CHETRF( UPLO, N, AF, LDAF, IPIV, WORK, 5*MAX(1,N), INFO )
Expand Down
2 changes: 1 addition & 1 deletion SRC/cporfsx.f
Original file line number Diff line number Diff line change
Expand Up @@ -122,7 +122,7 @@
*> \verbatim
*> AF is COMPLEX array, dimension (LDAF,N)
*> The triangular factor U or L from the Cholesky factorization
*> A = U**T*U or A = L*L**T, as computed by CPOTRF.
*> A = U**H*U or A = L*L**H, as computed by CPOTRF.
*> \endverbatim
*>
*> \param[in] LDAF
Expand Down
4 changes: 2 additions & 2 deletions SRC/zherfsx.f
Original file line number Diff line number Diff line change
Expand Up @@ -122,8 +122,8 @@
*> AF is COMPLEX*16 array, dimension (LDAF,N)
*> The factored form of the matrix A. AF contains the block
*> diagonal matrix D and the multipliers used to obtain the
*> factor U or L from the factorization A = U*D*U**T or A =
*> L*D*L**T as computed by ZHETRF.
*> factor U or L from the factorization A = U*D*U**H or A =
*> L*D*L**H as computed by ZHETRF.
*> \endverbatim
*>
*> \param[in] LDAF
Expand Down
6 changes: 3 additions & 3 deletions SRC/zhesvxx.f
Original file line number Diff line number Diff line change
Expand Up @@ -185,12 +185,12 @@
*> If FACT = 'F', then AF is an input argument and on entry
*> contains the block diagonal matrix D and the multipliers
*> used to obtain the factor U or L from the factorization A =
*> U*D*U**T or A = L*D*L**T as computed by ZHETRF.
*> U*D*U**H or A = L*D*L**H as computed by ZHETRF.
*>
*> If FACT = 'N', then AF is an output argument and on exit
*> returns the block diagonal matrix D and the multipliers
*> used to obtain the factor U or L from the factorization A =
*> U*D*U**T or A = L*D*L**T.
*> U*D*U**H or A = L*D*L**H.
*> \endverbatim
*>
*> \param[in] LDAF
Expand Down Expand Up @@ -643,7 +643,7 @@ SUBROUTINE ZHESVXX( FACT, UPLO, N, NRHS, A, LDA, AF, LDAF, IPIV,
*
IF( NOFACT .OR. EQUIL ) THEN
*
* Compute the LDL^T or UDU^T factorization of A.
* Compute the LDL^H or UDU^H factorization of A.
*
CALL ZLACPY( UPLO, N, N, A, LDA, AF, LDAF )
CALL ZHETRF( UPLO, N, AF, LDAF, IPIV, WORK, 5*MAX(1,N), INFO )
Expand Down
2 changes: 1 addition & 1 deletion SRC/zporfsx.f
Original file line number Diff line number Diff line change
Expand Up @@ -122,7 +122,7 @@
*> \verbatim
*> AF is COMPLEX*16 array, dimension (LDAF,N)
*> The triangular factor U or L from the Cholesky factorization
*> A = U**T*U or A = L*L**T, as computed by ZPOTRF.
*> A = U**H*U or A = L*L**H, as computed by ZPOTRF.
*> \endverbatim
*>
*> \param[in] LDAF
Expand Down

0 comments on commit 0397cd6

Please sign in to comment.