diff options
| author | julie <julielangou@users.noreply.github.com> | 2011-11-01 22:02:31 +0000 |
|---|---|---|
| committer | julie <julielangou@users.noreply.github.com> | 2011-11-01 22:02:31 +0000 |
| commit | d5c30c90bdecf38da1064e2ed52583634573e741 (patch) | |
| tree | 480fc5ff31ee14b83116b6428aad79ea6e89362d /SRC/claqsy.f | |
| parent | 04670a68760fa27333f8bcef8172f71adc6880ef (diff) | |
| download | lapack-d5c30c90bdecf38da1064e2ed52583634573e741.tar.gz lapack-d5c30c90bdecf38da1064e2ed52583634573e741.tar.bz2 lapack-d5c30c90bdecf38da1064e2ed52583634573e741.zip | |
Never say never...
Diffstat (limited to 'SRC/claqsy.f')
| -rw-r--r-- | SRC/claqsy.f | 12 |
1 files changed, 4 insertions, 8 deletions
diff --git a/SRC/claqsy.f b/SRC/claqsy.f index 12ec9145..80b46968 100644 --- a/SRC/claqsy.f +++ b/SRC/claqsy.f @@ -69,8 +69,7 @@ *> leading n by n lower triangular part of A contains the lower *> triangular part of the matrix A, and the strictly upper *> triangular part of A is not referenced. -*> \endverbatim -*> \verbatim +*> *> On exit, if EQUED = 'Y', the equilibrated matrix: *> diag(S) * A * diag(S). *> \endverbatim @@ -106,17 +105,14 @@ *> = 'N': No equilibration. *> = 'Y': Equilibration was done, i.e., A has been replaced by *> diag(S) * A * diag(S). -*> \endverbatim -*> \verbatim +*> *> Internal Parameters *> =================== -*> \endverbatim -*> \verbatim +*> *> THRESH is a threshold value used to decide if scaling should be done *> based on the ratio of the scaling factors. If SCOND < THRESH, *> scaling is done. -*> \endverbatim -*> \verbatim +*> *> LARGE and SMALL are threshold values used to decide if scaling should *> be done based on the absolute size of the largest matrix element. *> If AMAX > LARGE or AMAX < SMALL, scaling is done. |