diff options
Diffstat (limited to 'SRC/sposvx.f')
| -rw-r--r-- | SRC/sposvx.f | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/SRC/sposvx.f b/SRC/sposvx.f index aff52230..948249e0 100644 --- a/SRC/sposvx.f +++ b/SRC/sposvx.f @@ -156,7 +156,7 @@ *> *> \param[in,out] AF *> \verbatim -*> AF is or output) REAL array, dimension (LDAF,N) +*> AF is REAL array, dimension (LDAF,N) *> If FACT = 'F', then AF 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 @@ -183,7 +183,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': Equilibration was done, i.e., A has been replaced by @@ -194,7 +194,7 @@ *> *> \param[in,out] S *> \verbatim -*> S is or output) REAL array, dimension (N) +*> S is REAL array, dimension (N) *> The scale factors for A; not accessed if EQUED = 'N'. S is *> an input argument if FACT = 'F'; otherwise, S is an output *> argument. If FACT = 'F' and EQUED = 'Y', each element of S |