From 9ff0c3d8dea5bc95f0e00039b0ceea516855e35f Mon Sep 17 00:00:00 2001 From: Henning Thielemann Date: Sat, 3 Jun 2017 17:41:01 +0200 Subject: correct type names in parameter comments --- SRC/clarrv.f | 2 +- SRC/dgebal.f | 4 ++-- SRC/ilaclr.f | 2 +- 3 files changed, 4 insertions(+), 4 deletions(-) diff --git a/SRC/clarrv.f b/SRC/clarrv.f index d6503013..72ef0459 100644 --- a/SRC/clarrv.f +++ b/SRC/clarrv.f @@ -199,7 +199,7 @@ *> *> \param[out] Z *> \verbatim -*> Z is array, dimension (LDZ, max(1,M) ) +*> Z is COMPLEX array, dimension (LDZ, max(1,M) ) *> If INFO = 0, the first M columns of Z contain the *> orthonormal eigenvectors of the matrix T *> corresponding to the input eigenvalues, with the i-th diff --git a/SRC/dgebal.f b/SRC/dgebal.f index 93efd289..0527220a 100644 --- a/SRC/dgebal.f +++ b/SRC/dgebal.f @@ -67,7 +67,7 @@ *> *> \param[in,out] A *> \verbatim -*> A is DOUBLE array, dimension (LDA,N) +*> A is DOUBLE PRECISION array, dimension (LDA,N) *> On entry, the input matrix A. *> On exit, A is overwritten by the balanced matrix. *> If JOB = 'N', A is not referenced. @@ -94,7 +94,7 @@ *> *> \param[out] SCALE *> \verbatim -*> SCALE is DOUBLE array, dimension (N) +*> SCALE is DOUBLE PRECISION array, dimension (N) *> Details of the permutations and scaling factors applied to *> A. If P(j) is the index of the row and column interchanged *> with row and column j and D(j) is the scaling factor diff --git a/SRC/ilaclr.f b/SRC/ilaclr.f index c2e0584b..dcb4fe2d 100644 --- a/SRC/ilaclr.f +++ b/SRC/ilaclr.f @@ -53,7 +53,7 @@ *> *> \param[in] A *> \verbatim -*> A is array, dimension (LDA,N) +*> A is COMPLEX array, dimension (LDA,N) *> The m by n matrix A. *> \endverbatim *> -- cgit v1.2.3