diff options
author | Henning Thielemann <git@henning-thielemann.de> | 2017-06-08 17:36:40 +0200 |
---|---|---|
committer | Henning Thielemann <git@henning-thielemann.de> | 2017-06-08 17:36:40 +0200 |
commit | 6834a3e465a63d946eced19573cd8c9ade74346a (patch) | |
tree | 8e8c4214af18ba4041ca1987ab6733277ee6bf94 | |
parent | 8756876078bd239fd4c28ce979973b657b215f20 (diff) | |
download | lapack-6834a3e465a63d946eced19573cd8c9ade74346a.tar.gz lapack-6834a3e465a63d946eced19573cd8c9ade74346a.tar.bz2 lapack-6834a3e465a63d946eced19573cd8c9ade74346a.zip |
xPPSVX, xSPGV, xSPSVX; parameter comments for AFP and AP: pull (N*(N+1)/2) the array dimension line
-rw-r--r-- | SRC/dppsvx.f | 3 | ||||
-rw-r--r-- | SRC/dspgv.f | 3 | ||||
-rw-r--r-- | SRC/dspsvx.f | 3 | ||||
-rw-r--r-- | SRC/sppsvx.f | 3 | ||||
-rw-r--r-- | SRC/sspgv.f | 3 | ||||
-rw-r--r-- | SRC/sspsvx.f | 3 |
6 files changed, 6 insertions, 12 deletions
diff --git a/SRC/dppsvx.f b/SRC/dppsvx.f index df949896..85124a29 100644 --- a/SRC/dppsvx.f +++ b/SRC/dppsvx.f @@ -147,8 +147,7 @@ *> *> \param[in,out] AFP *> \verbatim -*> AFP is DOUBLE PRECISION array, dimension -*> (N*(N+1)/2) +*> AFP is DOUBLE PRECISION array, dimension (N*(N+1)/2) *> If FACT = 'F', then AFP is an input argument and on entry *> contains the triangular factor U or L from the Cholesky *> factorization A = U**T*U or A = L*L**T, in the same storage diff --git a/SRC/dspgv.f b/SRC/dspgv.f index 085e96fe..469d9696 100644 --- a/SRC/dspgv.f +++ b/SRC/dspgv.f @@ -77,8 +77,7 @@ *> *> \param[in,out] AP *> \verbatim -*> AP is DOUBLE PRECISION array, dimension -*> (N*(N+1)/2) +*> AP is DOUBLE PRECISION array, dimension (N*(N+1)/2) *> On entry, the upper or lower triangle of the symmetric matrix *> A, packed columnwise in a linear array. The j-th column of A *> is stored in the array AP as follows: diff --git a/SRC/dspsvx.f b/SRC/dspsvx.f index b95c610b..2f898de0 100644 --- a/SRC/dspsvx.f +++ b/SRC/dspsvx.f @@ -123,8 +123,7 @@ *> *> \param[in,out] AFP *> \verbatim -*> AFP is DOUBLE PRECISION array, dimension -*> (N*(N+1)/2) +*> AFP is DOUBLE PRECISION array, dimension (N*(N+1)/2) *> If FACT = 'F', then AFP 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 diff --git a/SRC/sppsvx.f b/SRC/sppsvx.f index 021aa607..a1cd2760 100644 --- a/SRC/sppsvx.f +++ b/SRC/sppsvx.f @@ -147,8 +147,7 @@ *> *> \param[in,out] AFP *> \verbatim -*> AFP is REAL array, dimension -*> (N*(N+1)/2) +*> AFP is REAL array, dimension (N*(N+1)/2) *> If FACT = 'F', then AFP is an input argument and on entry *> contains the triangular factor U or L from the Cholesky *> factorization A = U**T*U or A = L*L**T, in the same storage diff --git a/SRC/sspgv.f b/SRC/sspgv.f index bb8279aa..d3614e26 100644 --- a/SRC/sspgv.f +++ b/SRC/sspgv.f @@ -77,8 +77,7 @@ *> *> \param[in,out] AP *> \verbatim -*> AP is REAL array, dimension -*> (N*(N+1)/2) +*> AP is REAL array, dimension (N*(N+1)/2) *> On entry, the upper or lower triangle of the symmetric matrix *> A, packed columnwise in a linear array. The j-th column of A *> is stored in the array AP as follows: diff --git a/SRC/sspsvx.f b/SRC/sspsvx.f index 53d09738..771f863e 100644 --- a/SRC/sspsvx.f +++ b/SRC/sspsvx.f @@ -123,8 +123,7 @@ *> *> \param[in,out] AFP *> \verbatim -*> AFP is REAL array, dimension -*> (N*(N+1)/2) +*> AFP is REAL array, dimension (N*(N+1)/2) *> If FACT = 'F', then AFP 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 |