Browse Source

Fix typos in comments and documentation (Reference-LAPACK PR 820)

pull/4045/head
Martin Kroeker GitHub 3 years ago
parent
commit
dbbad9ed61
No known key found for this signature in database GPG Key ID: 4AEE18F83AFDEB23
59 changed files with 75 additions and 75 deletions
  1. +1
    -1
      lapack-netlib/TESTING/LIN/alahd.f
  2. +1
    -1
      lapack-netlib/TESTING/LIN/cchktp.f
  3. +2
    -2
      lapack-netlib/TESTING/LIN/cerrhe.f
  4. +2
    -2
      lapack-netlib/TESTING/LIN/cerrhex.f
  5. +2
    -2
      lapack-netlib/TESTING/LIN/cerrsy.f
  6. +2
    -2
      lapack-netlib/TESTING/LIN/cerrsyx.f
  7. +1
    -1
      lapack-netlib/TESTING/LIN/cgtt01.f
  8. +2
    -2
      lapack-netlib/TESTING/LIN/cgtt02.f
  9. +1
    -1
      lapack-netlib/TESTING/LIN/chet01_3.f
  10. +1
    -1
      lapack-netlib/TESTING/LIN/clqt02.f
  11. +1
    -1
      lapack-netlib/TESTING/LIN/cptt01.f
  12. +1
    -1
      lapack-netlib/TESTING/LIN/cptt02.f
  13. +1
    -1
      lapack-netlib/TESTING/LIN/cqlt02.f
  14. +1
    -1
      lapack-netlib/TESTING/LIN/cqrt02.f
  15. +1
    -1
      lapack-netlib/TESTING/LIN/crqt02.f
  16. +1
    -1
      lapack-netlib/TESTING/LIN/csyt01_3.f
  17. +1
    -1
      lapack-netlib/TESTING/LIN/dchktp.f
  18. +1
    -1
      lapack-netlib/TESTING/LIN/ddrvab.f
  19. +1
    -1
      lapack-netlib/TESTING/LIN/ddrvac.f
  20. +2
    -2
      lapack-netlib/TESTING/LIN/derrsy.f
  21. +2
    -2
      lapack-netlib/TESTING/LIN/derrsyx.f
  22. +1
    -1
      lapack-netlib/TESTING/LIN/dgtt01.f
  23. +2
    -2
      lapack-netlib/TESTING/LIN/dgtt02.f
  24. +1
    -1
      lapack-netlib/TESTING/LIN/dlqt02.f
  25. +1
    -1
      lapack-netlib/TESTING/LIN/dptt01.f
  26. +1
    -1
      lapack-netlib/TESTING/LIN/dptt02.f
  27. +1
    -1
      lapack-netlib/TESTING/LIN/dqlt02.f
  28. +1
    -1
      lapack-netlib/TESTING/LIN/dqrt02.f
  29. +1
    -1
      lapack-netlib/TESTING/LIN/drqt02.f
  30. +1
    -1
      lapack-netlib/TESTING/LIN/dsyt01_3.f
  31. +1
    -1
      lapack-netlib/TESTING/LIN/schktp.f
  32. +2
    -2
      lapack-netlib/TESTING/LIN/serrsy.f
  33. +2
    -2
      lapack-netlib/TESTING/LIN/serrsyx.f
  34. +1
    -1
      lapack-netlib/TESTING/LIN/sgtt01.f
  35. +2
    -2
      lapack-netlib/TESTING/LIN/sgtt02.f
  36. +1
    -1
      lapack-netlib/TESTING/LIN/slqt02.f
  37. +1
    -1
      lapack-netlib/TESTING/LIN/sptt01.f
  38. +1
    -1
      lapack-netlib/TESTING/LIN/sptt02.f
  39. +1
    -1
      lapack-netlib/TESTING/LIN/sqlt02.f
  40. +1
    -1
      lapack-netlib/TESTING/LIN/sqrt02.f
  41. +1
    -1
      lapack-netlib/TESTING/LIN/srqt02.f
  42. +1
    -1
      lapack-netlib/TESTING/LIN/ssyt01_3.f
  43. +1
    -1
      lapack-netlib/TESTING/LIN/zchktp.f
  44. +1
    -1
      lapack-netlib/TESTING/LIN/zdrvab.f
  45. +1
    -1
      lapack-netlib/TESTING/LIN/zdrvac.f
  46. +2
    -2
      lapack-netlib/TESTING/LIN/zerrhe.f
  47. +2
    -2
      lapack-netlib/TESTING/LIN/zerrhex.f
  48. +2
    -2
      lapack-netlib/TESTING/LIN/zerrsy.f
  49. +2
    -2
      lapack-netlib/TESTING/LIN/zerrsyx.f
  50. +1
    -1
      lapack-netlib/TESTING/LIN/zgtt01.f
  51. +2
    -2
      lapack-netlib/TESTING/LIN/zgtt02.f
  52. +1
    -1
      lapack-netlib/TESTING/LIN/zhet01_3.f
  53. +1
    -1
      lapack-netlib/TESTING/LIN/zlqt02.f
  54. +1
    -1
      lapack-netlib/TESTING/LIN/zptt01.f
  55. +1
    -1
      lapack-netlib/TESTING/LIN/zptt02.f
  56. +1
    -1
      lapack-netlib/TESTING/LIN/zqlt02.f
  57. +1
    -1
      lapack-netlib/TESTING/LIN/zqrt02.f
  58. +1
    -1
      lapack-netlib/TESTING/LIN/zrqt02.f
  59. +1
    -1
      lapack-netlib/TESTING/LIN/zsyt01_3.f

+ 1
- 1
lapack-netlib/TESTING/LIN/alahd.f View File

@@ -777,7 +777,7 @@
$ 'triangular-pentagonal matrices' )
8004 FORMAT( / 1X, A3, ': TS factorization for ',
$ 'tall-skinny or short-wide matrices' )
8005 FORMAT( / 1X, A3, ': Householder recostruction from TSQR',
8005 FORMAT( / 1X, A3, ': Householder reconstruction from TSQR',
$ ' factorization output ', /,' for tall-skinny matrices.' )
*
* GE matrix types


+ 1
- 1
lapack-netlib/TESTING/LIN/cchktp.f View File

@@ -87,7 +87,7 @@
*> \verbatim
*> NMAX is INTEGER
*> The leading dimension of the work arrays. NMAX >= the
*> maximumm value of N in NVAL.
*> maximum value of N in NVAL.
*> \endverbatim
*>
*> \param[out] AP


+ 2
- 2
lapack-netlib/TESTING/LIN/cerrhe.f View File

@@ -133,7 +133,7 @@
IF( LSAMEN( 2, C2, 'HE' ) ) THEN
*
* Test error exits of the routines that use factorization
* of a Hermitian indefinite matrix with patrial
* of a Hermitian indefinite matrix with partial
* (Bunch-Kaufman) diagonal pivoting method.
*
* CHETRF
@@ -576,7 +576,7 @@
CALL CHKXER( 'CHETRS_AA_STAGE', INFOT, NOUT, LERR, OK )
*
* Test error exits of the routines that use factorization
* of a Hermitian indefinite packed matrix with patrial
* of a Hermitian indefinite packed matrix with partial
* (Bunch-Kaufman) diagonal pivoting method.
*
ELSE IF( LSAMEN( 2, C2, 'HP' ) ) THEN


+ 2
- 2
lapack-netlib/TESTING/LIN/cerrhex.f View File

@@ -137,7 +137,7 @@
IF( LSAMEN( 2, C2, 'HE' ) ) THEN
*
* Test error exits of the routines that use factorization
* of a Hermitian indefinite matrix with patrial
* of a Hermitian indefinite matrix with partial
* (Bunch-Kaufman) diagonal pivoting method.
*
* CHETRF
@@ -523,7 +523,7 @@
ELSE IF( LSAMEN( 2, C2, 'HP' ) ) THEN
*
* Test error exits of the routines that use factorization
* of a Hermitian indefinite packed matrix with patrial
* of a Hermitian indefinite packed matrix with partial
* (Bunch-Kaufman) diagonal pivoting method.
*
* CHPTRF


+ 2
- 2
lapack-netlib/TESTING/LIN/cerrsy.f View File

@@ -130,7 +130,7 @@
IF( LSAMEN( 2, C2, 'SY' ) ) THEN
*
* Test error exits of the routines that use factorization
* of a symmetric indefinite matrix with patrial
* of a symmetric indefinite matrix with partial
* (Bunch-Kaufman) diagonal pivoting method.
*
* CSYTRF
@@ -469,7 +469,7 @@
ELSE IF( LSAMEN( 2, C2, 'SP' ) ) THEN
*
* Test error exits of the routines that use factorization
* of a symmetric indefinite packed matrix with patrial
* of a symmetric indefinite packed matrix with partial
* (Bunch-Kaufman) diagonal pivoting method.
*
* CSPTRF


+ 2
- 2
lapack-netlib/TESTING/LIN/cerrsyx.f View File

@@ -135,7 +135,7 @@
IF( LSAMEN( 2, C2, 'SY' ) ) THEN
*
* Test error exits of the routines that use factorization
* of a symmetric indefinite matrix with patrial
* of a symmetric indefinite matrix with partial
* (Bunch-Kaufman) diagonal pivoting method.
*
* CSYTRF
@@ -521,7 +521,7 @@
ELSE IF( LSAMEN( 2, C2, 'SP' ) ) THEN
*
* Test error exits of the routines that use factorization
* of a symmetric indefinite packed matrix with patrial
* of a symmetric indefinite packed matrix with partial
* (Bunch-Kaufman) diagonal pivoting method.
*
* CSPTRF


+ 1
- 1
lapack-netlib/TESTING/LIN/cgtt01.f View File

@@ -39,7 +39,7 @@
*
*> \param[in] N
*> \verbatim
*> N is INTEGTER
*> N is INTEGER
*> The order of the matrix A. N >= 0.
*> \endverbatim
*>


+ 2
- 2
lapack-netlib/TESTING/LIN/cgtt02.f View File

@@ -40,14 +40,14 @@
*> \verbatim
*> TRANS is CHARACTER
*> Specifies the form of the residual.
*> = 'N': B - A * X (No transpose)
*> = 'N': B - A * X (No transpose)
*> = 'T': B - A**T * X (Transpose)
*> = 'C': B - A**H * X (Conjugate transpose)
*> \endverbatim
*>
*> \param[in] N
*> \verbatim
*> N is INTEGTER
*> N is INTEGER
*> The order of the matrix A. N >= 0.
*> \endverbatim
*>


+ 1
- 1
lapack-netlib/TESTING/LIN/chet01_3.f View File

@@ -188,7 +188,7 @@
RETURN
END IF
*
* a) Revert to multiplyers of L
* a) Revert to multipliers of L
*
CALL CSYCONVF_ROOK( UPLO, 'R', N, AFAC, LDAFAC, E, IPIV, INFO )
*


+ 1
- 1
lapack-netlib/TESTING/LIN/clqt02.f View File

@@ -27,7 +27,7 @@
*> \verbatim
*>
*> CLQT02 tests CUNGLQ, which generates an m-by-n matrix Q with
*> orthonornmal rows that is defined as the product of k elementary
*> orthonormal rows that is defined as the product of k elementary
*> reflectors.
*>
*> Given the LQ factorization of an m-by-n matrix A, CLQT02 generates


+ 1
- 1
lapack-netlib/TESTING/LIN/cptt01.f View File

@@ -36,7 +36,7 @@
*
*> \param[in] N
*> \verbatim
*> N is INTEGTER
*> N is INTEGER
*> The order of the matrix A.
*> \endverbatim
*>


+ 1
- 1
lapack-netlib/TESTING/LIN/cptt02.f View File

@@ -46,7 +46,7 @@
*>
*> \param[in] N
*> \verbatim
*> N is INTEGTER
*> N is INTEGER
*> The order of the matrix A.
*> \endverbatim
*>


+ 1
- 1
lapack-netlib/TESTING/LIN/cqlt02.f View File

@@ -27,7 +27,7 @@
*> \verbatim
*>
*> CQLT02 tests CUNGQL, which generates an m-by-n matrix Q with
*> orthonornmal columns that is defined as the product of k elementary
*> orthonormal columns that is defined as the product of k elementary
*> reflectors.
*>
*> Given the QL factorization of an m-by-n matrix A, CQLT02 generates


+ 1
- 1
lapack-netlib/TESTING/LIN/cqrt02.f View File

@@ -27,7 +27,7 @@
*> \verbatim
*>
*> CQRT02 tests CUNGQR, which generates an m-by-n matrix Q with
*> orthonornmal columns that is defined as the product of k elementary
*> orthonormal columns that is defined as the product of k elementary
*> reflectors.
*>
*> Given the QR factorization of an m-by-n matrix A, CQRT02 generates


+ 1
- 1
lapack-netlib/TESTING/LIN/crqt02.f View File

@@ -27,7 +27,7 @@
*> \verbatim
*>
*> CRQT02 tests CUNGRQ, which generates an m-by-n matrix Q with
*> orthonornmal rows that is defined as the product of k elementary
*> orthonormal rows that is defined as the product of k elementary
*> reflectors.
*>
*> Given the RQ factorization of an m-by-n matrix A, CRQT02 generates


+ 1
- 1
lapack-netlib/TESTING/LIN/csyt01_3.f View File

@@ -188,7 +188,7 @@
RETURN
END IF
*
* a) Revert to multiplyers of L
* a) Revert to multipliers of L
*
CALL CSYCONVF_ROOK( UPLO, 'R', N, AFAC, LDAFAC, E, IPIV, INFO )
*


+ 1
- 1
lapack-netlib/TESTING/LIN/dchktp.f View File

@@ -86,7 +86,7 @@
*> \verbatim
*> NMAX is INTEGER
*> The leading dimension of the work arrays. NMAX >= the
*> maximumm value of N in NVAL.
*> maximum value of N in NVAL.
*> \endverbatim
*>
*> \param[out] AP


+ 1
- 1
lapack-netlib/TESTING/LIN/ddrvab.f View File

@@ -346,7 +346,7 @@
CALL DGET08( TRANS, N, N, NRHS, A, LDA, X, LDA, WORK,
$ LDA, RWORK, RESULT( 1 ) )
*
* Check if the test passes the tesing.
* Check if the test passes the testing.
* Print information about the tests that did not
* pass the testing.
*


+ 1
- 1
lapack-netlib/TESTING/LIN/ddrvac.f View File

@@ -365,7 +365,7 @@
CALL DPOT06( UPLO, N, NRHS, A, LDA, X, LDA, WORK,
$ LDA, RWORK, RESULT( 1 ) )
*
* Check if the test passes the tesing.
* Check if the test passes the testing.
* Print information about the tests that did not
* pass the testing.
*


+ 2
- 2
lapack-netlib/TESTING/LIN/derrsy.f View File

@@ -133,7 +133,7 @@
IF( LSAMEN( 2, C2, 'SY' ) ) THEN
*
* Test error exits of the routines that use factorization
* of a symmetric indefinite matrix with patrial
* of a symmetric indefinite matrix with partial
* (Bunch-Kaufman) pivoting.
*
* DSYTRF
@@ -581,7 +581,7 @@
ELSE IF( LSAMEN( 2, C2, 'SP' ) ) THEN
*
* Test error exits of the routines that use factorization
* of a symmetric indefinite packed matrix with patrial
* of a symmetric indefinite packed matrix with partial
* (Bunch-Kaufman) pivoting.
*
* DSPTRF


+ 2
- 2
lapack-netlib/TESTING/LIN/derrsyx.f View File

@@ -138,7 +138,7 @@
IF( LSAMEN( 2, C2, 'SY' ) ) THEN
*
* Test error exits of the routines that use factorization
* of a symmetric indefinite matrix with patrial
* of a symmetric indefinite matrix with partial
* (Bunch-Kaufman) pivoting.
*
* DSYTRF
@@ -528,7 +528,7 @@
ELSE IF( LSAMEN( 2, C2, 'SP' ) ) THEN
*
* Test error exits of the routines that use factorization
* of a symmetric indefinite packed matrix with patrial
* of a symmetric indefinite packed matrix with partial
* (Bunch-Kaufman) pivoting.
*
* DSPTRF


+ 1
- 1
lapack-netlib/TESTING/LIN/dgtt01.f View File

@@ -39,7 +39,7 @@
*
*> \param[in] N
*> \verbatim
*> N is INTEGTER
*> N is INTEGER
*> The order of the matrix A. N >= 0.
*> \endverbatim
*>


+ 2
- 2
lapack-netlib/TESTING/LIN/dgtt02.f View File

@@ -41,14 +41,14 @@
*> \verbatim
*> TRANS is CHARACTER
*> Specifies the form of the residual.
*> = 'N': B - A * X (No transpose)
*> = 'N': B - A * X (No transpose)
*> = 'T': B - A**T * X (Transpose)
*> = 'C': B - A**H * X (Conjugate transpose = Transpose)
*> \endverbatim
*>
*> \param[in] N
*> \verbatim
*> N is INTEGTER
*> N is INTEGER
*> The order of the matrix A. N >= 0.
*> \endverbatim
*>


+ 1
- 1
lapack-netlib/TESTING/LIN/dlqt02.f View File

@@ -27,7 +27,7 @@
*> \verbatim
*>
*> DLQT02 tests DORGLQ, which generates an m-by-n matrix Q with
*> orthonornmal rows that is defined as the product of k elementary
*> orthonormal rows that is defined as the product of k elementary
*> reflectors.
*>
*> Given the LQ factorization of an m-by-n matrix A, DLQT02 generates


+ 1
- 1
lapack-netlib/TESTING/LIN/dptt01.f View File

@@ -35,7 +35,7 @@
*
*> \param[in] N
*> \verbatim
*> N is INTEGTER
*> N is INTEGER
*> The order of the matrix A.
*> \endverbatim
*>


+ 1
- 1
lapack-netlib/TESTING/LIN/dptt02.f View File

@@ -35,7 +35,7 @@
*
*> \param[in] N
*> \verbatim
*> N is INTEGTER
*> N is INTEGER
*> The order of the matrix A.
*> \endverbatim
*>


+ 1
- 1
lapack-netlib/TESTING/LIN/dqlt02.f View File

@@ -27,7 +27,7 @@
*> \verbatim
*>
*> DQLT02 tests DORGQL, which generates an m-by-n matrix Q with
*> orthonornmal columns that is defined as the product of k elementary
*> orthonormal columns that is defined as the product of k elementary
*> reflectors.
*>
*> Given the QL factorization of an m-by-n matrix A, DQLT02 generates


+ 1
- 1
lapack-netlib/TESTING/LIN/dqrt02.f View File

@@ -27,7 +27,7 @@
*> \verbatim
*>
*> DQRT02 tests DORGQR, which generates an m-by-n matrix Q with
*> orthonornmal columns that is defined as the product of k elementary
*> orthonormal columns that is defined as the product of k elementary
*> reflectors.
*>
*> Given the QR factorization of an m-by-n matrix A, DQRT02 generates


+ 1
- 1
lapack-netlib/TESTING/LIN/drqt02.f View File

@@ -27,7 +27,7 @@
*> \verbatim
*>
*> DRQT02 tests DORGRQ, which generates an m-by-n matrix Q with
*> orthonornmal rows that is defined as the product of k elementary
*> orthonormal rows that is defined as the product of k elementary
*> reflectors.
*>
*> Given the RQ factorization of an m-by-n matrix A, DRQT02 generates


+ 1
- 1
lapack-netlib/TESTING/LIN/dsyt01_3.f View File

@@ -183,7 +183,7 @@
RETURN
END IF
*
* a) Revert to multiplyers of L
* a) Revert to multipliers of L
*
CALL DSYCONVF_ROOK( UPLO, 'R', N, AFAC, LDAFAC, E, IPIV, INFO )
*


+ 1
- 1
lapack-netlib/TESTING/LIN/schktp.f View File

@@ -86,7 +86,7 @@
*> \verbatim
*> NMAX is INTEGER
*> The leading dimension of the work arrays. NMAX >= the
*> maximumm value of N in NVAL.
*> maximum value of N in NVAL.
*> \endverbatim
*>
*> \param[out] AP


+ 2
- 2
lapack-netlib/TESTING/LIN/serrsy.f View File

@@ -133,7 +133,7 @@
IF( LSAMEN( 2, C2, 'SY' ) ) THEN
*
* Test error exits of the routines that use factorization
* of a symmetric indefinite matrix with patrial
* of a symmetric indefinite matrix with partial
* (Bunch-Kaufman) pivoting.
*
* SSYTRF
@@ -581,7 +581,7 @@
ELSE IF( LSAMEN( 2, C2, 'SP' ) ) THEN
*
* Test error exits of the routines that use factorization
* of a symmetric indefinite packed matrix with patrial
* of a symmetric indefinite packed matrix with partial
* (Bunch-Kaufman) pivoting.
*
* SSPTRF


+ 2
- 2
lapack-netlib/TESTING/LIN/serrsyx.f View File

@@ -137,7 +137,7 @@
IF( LSAMEN( 2, C2, 'SY' ) ) THEN
*
* Test error exits of the routines that use factorization
* of a symmetric indefinite matrix with patrial
* of a symmetric indefinite matrix with partial
* (Bunch-Kaufman) pivoting.
*
* SSYTRF
@@ -527,7 +527,7 @@
ELSE IF( LSAMEN( 2, C2, 'SP' ) ) THEN
*
* Test error exits of the routines that use factorization
* of a symmetric indefinite packed matrix with patrial
* of a symmetric indefinite packed matrix with partial
* (Bunch-Kaufman) pivoting.
*
* SSPTRF


+ 1
- 1
lapack-netlib/TESTING/LIN/sgtt01.f View File

@@ -39,7 +39,7 @@
*
*> \param[in] N
*> \verbatim
*> N is INTEGTER
*> N is INTEGER
*> The order of the matrix A. N >= 0.
*> \endverbatim
*>


+ 2
- 2
lapack-netlib/TESTING/LIN/sgtt02.f View File

@@ -41,14 +41,14 @@
*> \verbatim
*> TRANS is CHARACTER
*> Specifies the form of the residual.
*> = 'N': B - A * X (No transpose)
*> = 'N': B - A * X (No transpose)
*> = 'T': B - A**T * X (Transpose)
*> = 'C': B - A**H * X (Conjugate transpose = Transpose)
*> \endverbatim
*>
*> \param[in] N
*> \verbatim
*> N is INTEGTER
*> N is INTEGER
*> The order of the matrix A. N >= 0.
*> \endverbatim
*>


+ 1
- 1
lapack-netlib/TESTING/LIN/slqt02.f View File

@@ -27,7 +27,7 @@
*> \verbatim
*>
*> SLQT02 tests SORGLQ, which generates an m-by-n matrix Q with
*> orthonornmal rows that is defined as the product of k elementary
*> orthonormal rows that is defined as the product of k elementary
*> reflectors.
*>
*> Given the LQ factorization of an m-by-n matrix A, SLQT02 generates


+ 1
- 1
lapack-netlib/TESTING/LIN/sptt01.f View File

@@ -35,7 +35,7 @@
*
*> \param[in] N
*> \verbatim
*> N is INTEGTER
*> N is INTEGER
*> The order of the matrix A.
*> \endverbatim
*>


+ 1
- 1
lapack-netlib/TESTING/LIN/sptt02.f View File

@@ -35,7 +35,7 @@
*
*> \param[in] N
*> \verbatim
*> N is INTEGTER
*> N is INTEGER
*> The order of the matrix A.
*> \endverbatim
*>


+ 1
- 1
lapack-netlib/TESTING/LIN/sqlt02.f View File

@@ -27,7 +27,7 @@
*> \verbatim
*>
*> SQLT02 tests SORGQL, which generates an m-by-n matrix Q with
*> orthonornmal columns that is defined as the product of k elementary
*> orthonormal columns that is defined as the product of k elementary
*> reflectors.
*>
*> Given the QL factorization of an m-by-n matrix A, SQLT02 generates


+ 1
- 1
lapack-netlib/TESTING/LIN/sqrt02.f View File

@@ -27,7 +27,7 @@
*> \verbatim
*>
*> SQRT02 tests SORGQR, which generates an m-by-n matrix Q with
*> orthonornmal columns that is defined as the product of k elementary
*> orthonormal columns that is defined as the product of k elementary
*> reflectors.
*>
*> Given the QR factorization of an m-by-n matrix A, SQRT02 generates


+ 1
- 1
lapack-netlib/TESTING/LIN/srqt02.f View File

@@ -27,7 +27,7 @@
*> \verbatim
*>
*> SRQT02 tests SORGRQ, which generates an m-by-n matrix Q with
*> orthonornmal rows that is defined as the product of k elementary
*> orthonormal rows that is defined as the product of k elementary
*> reflectors.
*>
*> Given the RQ factorization of an m-by-n matrix A, SRQT02 generates


+ 1
- 1
lapack-netlib/TESTING/LIN/ssyt01_3.f View File

@@ -183,7 +183,7 @@
RETURN
END IF
*
* a) Revert to multiplyers of L
* a) Revert to multipliers of L
*
CALL SSYCONVF_ROOK( UPLO, 'R', N, AFAC, LDAFAC, E, IPIV, INFO )
*


+ 1
- 1
lapack-netlib/TESTING/LIN/zchktp.f View File

@@ -87,7 +87,7 @@
*> \verbatim
*> NMAX is INTEGER
*> The leading dimension of the work arrays. NMAX >= the
*> maximumm value of N in NVAL.
*> maximum value of N in NVAL.
*> \endverbatim
*>
*> \param[out] AP


+ 1
- 1
lapack-netlib/TESTING/LIN/zdrvab.f View File

@@ -348,7 +348,7 @@
CALL ZGET08( TRANS, N, N, NRHS, A, LDA, X, LDA, WORK,
$ LDA, RWORK, RESULT( 1 ) )
*
* Check if the test passes the tesing.
* Check if the test passes the testing.
* Print information about the tests that did not
* pass the testing.
*


+ 1
- 1
lapack-netlib/TESTING/LIN/zdrvac.f View File

@@ -367,7 +367,7 @@
CALL ZPOT06( UPLO, N, NRHS, A, LDA, X, LDA, WORK,
$ LDA, RWORK, RESULT( 1 ) )
*
* Check if the test passes the tesing.
* Check if the test passes the testing.
* Print information about the tests that did not
* pass the testing.
*


+ 2
- 2
lapack-netlib/TESTING/LIN/zerrhe.f View File

@@ -135,7 +135,7 @@
IF( LSAMEN( 2, C2, 'HE' ) ) THEN
*
* Test error exits of the routines that use factorization
* of a Hermitian indefinite matrix with patrial
* of a Hermitian indefinite matrix with partial
* (Bunch-Kaufman) diagonal pivoting method.
*
* ZHETRF
@@ -580,7 +580,7 @@
ELSE IF( LSAMEN( 2, C2, 'HP' ) ) THEN
*
* Test error exits of the routines that use factorization
* of a Hermitian indefinite packed matrix with patrial
* of a Hermitian indefinite packed matrix with partial
* (Bunch-Kaufman) diagonal pivoting method.
*
* ZHPTRF


+ 2
- 2
lapack-netlib/TESTING/LIN/zerrhex.f View File

@@ -138,7 +138,7 @@
OK = .TRUE.
*
* Test error exits of the routines that use factorization
* of a Hermitian indefinite matrix with patrial
* of a Hermitian indefinite matrix with partial
* (Bunch-Kaufman) diagonal pivoting method.
*
IF( LSAMEN( 2, C2, 'HE' ) ) THEN
@@ -526,7 +526,7 @@
ELSE IF( LSAMEN( 2, C2, 'HP' ) ) THEN
*
* Test error exits of the routines that use factorization
* of a Hermitian indefinite packed matrix with patrial
* of a Hermitian indefinite packed matrix with partial
* (Bunch-Kaufman) diagonal pivoting method.
*
* ZHPTRF


+ 2
- 2
lapack-netlib/TESTING/LIN/zerrsy.f View File

@@ -132,7 +132,7 @@
IF( LSAMEN( 2, C2, 'SY' ) ) THEN
*
* Test error exits of the routines that use factorization
* of a symmetric indefinite matrix with patrial
* of a symmetric indefinite matrix with partial
* (Bunch-Kaufman) diagonal pivoting method.
*
* ZSYTRF
@@ -471,7 +471,7 @@
ELSE IF( LSAMEN( 2, C2, 'SP' ) ) THEN
*
* Test error exits of the routines that use factorization
* of a symmetric indefinite packed matrix with patrial
* of a symmetric indefinite packed matrix with partial
* (Bunch-Kaufman) pivoting.
*
* ZSPTRF


+ 2
- 2
lapack-netlib/TESTING/LIN/zerrsyx.f View File

@@ -139,7 +139,7 @@
IF( LSAMEN( 2, C2, 'SY' ) ) THEN
*
* Test error exits of the routines that use factorization
* of a symmetric indefinite matrix with patrial
* of a symmetric indefinite matrix with partial
* (Bunch-Kaufman) diagonal pivoting method.
*
* ZSYTRF
@@ -525,7 +525,7 @@
ELSE IF( LSAMEN( 2, C2, 'SP' ) ) THEN
*
* Test error exits of the routines that use factorization
* of a symmetric indefinite packed matrix with patrial
* of a symmetric indefinite packed matrix with partial
* (Bunch-Kaufman) pivoting.
*
* ZSPTRF


+ 1
- 1
lapack-netlib/TESTING/LIN/zgtt01.f View File

@@ -39,7 +39,7 @@
*
*> \param[in] N
*> \verbatim
*> N is INTEGTER
*> N is INTEGER
*> The order of the matrix A. N >= 0.
*> \endverbatim
*>


+ 2
- 2
lapack-netlib/TESTING/LIN/zgtt02.f View File

@@ -40,14 +40,14 @@
*> \verbatim
*> TRANS is CHARACTER
*> Specifies the form of the residual.
*> = 'N': B - A * X (No transpose)
*> = 'N': B - A * X (No transpose)
*> = 'T': B - A**T * X (Transpose)
*> = 'C': B - A**H * X (Conjugate transpose)
*> \endverbatim
*>
*> \param[in] N
*> \verbatim
*> N is INTEGTER
*> N is INTEGER
*> The order of the matrix A. N >= 0.
*> \endverbatim
*>


+ 1
- 1
lapack-netlib/TESTING/LIN/zhet01_3.f View File

@@ -188,7 +188,7 @@
RETURN
END IF
*
* a) Revert to multiplyers of L
* a) Revert to multipliers of L
*
CALL ZSYCONVF_ROOK( UPLO, 'R', N, AFAC, LDAFAC, E, IPIV, INFO )
*


+ 1
- 1
lapack-netlib/TESTING/LIN/zlqt02.f View File

@@ -27,7 +27,7 @@
*> \verbatim
*>
*> ZLQT02 tests ZUNGLQ, which generates an m-by-n matrix Q with
*> orthonornmal rows that is defined as the product of k elementary
*> orthonormal rows that is defined as the product of k elementary
*> reflectors.
*>
*> Given the LQ factorization of an m-by-n matrix A, ZLQT02 generates


+ 1
- 1
lapack-netlib/TESTING/LIN/zptt01.f View File

@@ -36,7 +36,7 @@
*
*> \param[in] N
*> \verbatim
*> N is INTEGTER
*> N is INTEGER
*> The order of the matrix A.
*> \endverbatim
*>


+ 1
- 1
lapack-netlib/TESTING/LIN/zptt02.f View File

@@ -46,7 +46,7 @@
*>
*> \param[in] N
*> \verbatim
*> N is INTEGTER
*> N is INTEGER
*> The order of the matrix A.
*> \endverbatim
*>


+ 1
- 1
lapack-netlib/TESTING/LIN/zqlt02.f View File

@@ -27,7 +27,7 @@
*> \verbatim
*>
*> ZQLT02 tests ZUNGQL, which generates an m-by-n matrix Q with
*> orthonornmal columns that is defined as the product of k elementary
*> orthonormal columns that is defined as the product of k elementary
*> reflectors.
*>
*> Given the QL factorization of an m-by-n matrix A, ZQLT02 generates


+ 1
- 1
lapack-netlib/TESTING/LIN/zqrt02.f View File

@@ -27,7 +27,7 @@
*> \verbatim
*>
*> ZQRT02 tests ZUNGQR, which generates an m-by-n matrix Q with
*> orthonornmal columns that is defined as the product of k elementary
*> orthonormal columns that is defined as the product of k elementary
*> reflectors.
*>
*> Given the QR factorization of an m-by-n matrix A, ZQRT02 generates


+ 1
- 1
lapack-netlib/TESTING/LIN/zrqt02.f View File

@@ -27,7 +27,7 @@
*> \verbatim
*>
*> ZRQT02 tests ZUNGRQ, which generates an m-by-n matrix Q with
*> orthonornmal rows that is defined as the product of k elementary
*> orthonormal rows that is defined as the product of k elementary
*> reflectors.
*>
*> Given the RQ factorization of an m-by-n matrix A, ZRQT02 generates


+ 1
- 1
lapack-netlib/TESTING/LIN/zsyt01_3.f View File

@@ -188,7 +188,7 @@
RETURN
END IF
*
* a) Revert to multiplyers of L
* a) Revert to multipliers of L
*
CALL ZSYCONVF_ROOK( UPLO, 'R', N, AFAC, LDAFAC, E, IPIV, INFO )
*


Loading…
Cancel
Save