From 491fcee0303e374ba6df7b44247747624b956131 Mon Sep 17 00:00:00 2001 From: julie Date: Sun, 8 Jan 2012 05:27:18 +0000 Subject: Fix minor problem in some comments... --- SRC/dposvx.f | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'SRC/dposvx.f') diff --git a/SRC/dposvx.f b/SRC/dposvx.f index e09c623c..8bdadd5a 100644 --- a/SRC/dposvx.f +++ b/SRC/dposvx.f @@ -156,7 +156,7 @@ *> *> \param[in,out] AF *> \verbatim -*> AF is or output) DOUBLE PRECISION array, dimension (LDAF,N) +*> AF is DOUBLE PRECISION 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) DOUBLE PRECISION array, dimension (N) +*> S is DOUBLE PRECISION 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 -- cgit v1.2.3