diff options
| author | julie <julielangou@users.noreply.github.com> | 2012-01-08 05:27:18 +0000 |
|---|---|---|
| committer | julie <julielangou@users.noreply.github.com> | 2012-01-08 05:27:18 +0000 |
| commit | 491fcee0303e374ba6df7b44247747624b956131 (patch) | |
| tree | d7fb66ee3ec8d632c00918f8fea282a587aef9a7 /SRC/zspsvx.f | |
| parent | a055c28aa29a338fef15d9d4550b03bcbbfda298 (diff) | |
| download | lapack-491fcee0303e374ba6df7b44247747624b956131.tar.gz lapack-491fcee0303e374ba6df7b44247747624b956131.tar.bz2 lapack-491fcee0303e374ba6df7b44247747624b956131.zip | |
Fix minor problem in some comments...
Diffstat (limited to 'SRC/zspsvx.f')
| -rw-r--r-- | SRC/zspsvx.f | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/SRC/zspsvx.f b/SRC/zspsvx.f index 6fb6a3ed..3679a3c8 100644 --- a/SRC/zspsvx.f +++ b/SRC/zspsvx.f @@ -124,7 +124,7 @@ *> *> \param[in,out] AFP *> \verbatim -*> AFP is or output) COMPLEX*16 array, dimension (N*(N+1)/2) +*> AFP is COMPLEX*16 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 @@ -140,7 +140,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 ZSPTRF. |