summaryrefslogtreecommitdiff
path: root/SRC/zhesvxx.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/zhesvxx.f
parenta055c28aa29a338fef15d9d4550b03bcbbfda298 (diff)
downloadlapack-491fcee0303e374ba6df7b44247747624b956131.tar.gz
lapack-491fcee0303e374ba6df7b44247747624b956131.tar.bz2
lapack-491fcee0303e374ba6df7b44247747624b956131.zip
Fix minor problem in some comments...
Diffstat (limited to 'SRC/zhesvxx.f')
-rw-r--r--SRC/zhesvxx.f8
1 files changed, 4 insertions, 4 deletions
diff --git a/SRC/zhesvxx.f b/SRC/zhesvxx.f
index c02f925a..9e0b693d 100644
--- a/SRC/zhesvxx.f
+++ b/SRC/zhesvxx.f
@@ -181,7 +181,7 @@
*>
*> \param[in,out] AF
*> \verbatim
-*> AF is or output) COMPLEX*16 array, dimension (LDAF,N)
+*> AF is COMPLEX*16 array, dimension (LDAF,N)
*> If FACT = 'F', then AF 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 A =
@@ -201,7 +201,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 details of the interchanges and the block
*> structure of D, as determined by ZHETRF. If IPIV(k) > 0,
@@ -220,7 +220,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').
*> = 'Y': Both row and column equilibration, i.e., A has been
@@ -231,7 +231,7 @@
*>
*> \param[in,out] S
*> \verbatim
-*> S is or output) DOUBLE PRECISION array, dimension (N)
+*> S is DOUBLE PRECISION array, dimension (N)
*> The scale factors for A. If EQUED = 'Y', A is multiplied on
*> the left and right by diag(S). S is an input argument if FACT =
*> 'F'; otherwise, S is an output argument. If FACT = 'F' and EQUED