summaryrefslogtreecommitdiff
path: root/SRC/zgbsvx.f
diff options
context:
space:
mode:
authorjulie <julielangou@users.noreply.github.com>2012-01-08 05:27:18 +0000
committerjulie <julielangou@users.noreply.github.com>2012-01-08 05:27:18 +0000
commit491fcee0303e374ba6df7b44247747624b956131 (patch)
treed7fb66ee3ec8d632c00918f8fea282a587aef9a7 /SRC/zgbsvx.f
parenta055c28aa29a338fef15d9d4550b03bcbbfda298 (diff)
downloadlapack-491fcee0303e374ba6df7b44247747624b956131.tar.gz
lapack-491fcee0303e374ba6df7b44247747624b956131.tar.bz2
lapack-491fcee0303e374ba6df7b44247747624b956131.zip
Fix minor problem in some comments...
Diffstat (limited to 'SRC/zgbsvx.f')
-rw-r--r--SRC/zgbsvx.f10
1 files changed, 5 insertions, 5 deletions
diff --git a/SRC/zgbsvx.f b/SRC/zgbsvx.f
index cd4e381b..266be625 100644
--- a/SRC/zgbsvx.f
+++ b/SRC/zgbsvx.f
@@ -173,7 +173,7 @@
*>
*> \param[in,out] AFB
*> \verbatim
-*> AFB is or output) COMPLEX*16 array, dimension (LDAFB,N)
+*> AFB is COMPLEX*16 array, dimension (LDAFB,N)
*> If FACT = 'F', then AFB is an input argument and on entry
*> contains details of the LU factorization of the band matrix
*> A, as computed by ZGBTRF. U is stored as an upper triangular
@@ -199,7 +199,7 @@
*>
*> \param[in,out] IPIV
*> \verbatim
-*> IPIV is or output) INTEGER array, dimension (N)
+*> IPIV is INTEGER array, dimension (N)
*> If FACT = 'F', then IPIV is an input argument and on entry
*> contains the pivot indices from the factorization A = L*U
*> as computed by ZGBTRF; row i of the matrix was interchanged
@@ -216,7 +216,7 @@
*>
*> \param[in,out] EQUED
*> \verbatim
-*> EQUED is or output) CHARACTER*1
+*> EQUED is CHARACTER*1
*> Specifies the form of equilibration that was done.
*> = 'N': No equilibration (always true if FACT = 'N').
*> = 'R': Row equilibration, i.e., A has been premultiplied by
@@ -231,7 +231,7 @@
*>
*> \param[in,out] R
*> \verbatim
-*> R is or output) DOUBLE PRECISION array, dimension (N)
+*> R is DOUBLE PRECISION array, dimension (N)
*> The row scale factors for A. If EQUED = 'R' or 'B', A is
*> multiplied on the left by diag(R); if EQUED = 'N' or 'C', R
*> is not accessed. R is an input argument if FACT = 'F';
@@ -241,7 +241,7 @@
*>
*> \param[in,out] C
*> \verbatim
-*> C is or output) DOUBLE PRECISION array, dimension (N)
+*> C is DOUBLE PRECISION array, dimension (N)
*> The column scale factors for A. If EQUED = 'C' or 'B', A is
*> multiplied on the right by diag(C); if EQUED = 'N' or 'R', C
*> is not accessed. C is an input argument if FACT = 'F';