summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorHenning Thielemann <git@henning-thielemann.de>2017-06-08 17:36:40 +0200
committerHenning Thielemann <git@henning-thielemann.de>2017-06-08 17:36:40 +0200
commit6834a3e465a63d946eced19573cd8c9ade74346a (patch)
tree8e8c4214af18ba4041ca1987ab6733277ee6bf94
parent8756876078bd239fd4c28ce979973b657b215f20 (diff)
downloadlapack-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.f3
-rw-r--r--SRC/dspgv.f3
-rw-r--r--SRC/dspsvx.f3
-rw-r--r--SRC/sppsvx.f3
-rw-r--r--SRC/sspgv.f3
-rw-r--r--SRC/sspsvx.f3
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