diff options
Diffstat (limited to 'SRC/zhetrf_aa.f')
-rw-r--r-- | SRC/zhetrf_aa.f | 8 |
1 files changed, 2 insertions, 6 deletions
diff --git a/SRC/zhetrf_aa.f b/SRC/zhetrf_aa.f index 7e1c7a55..4196d477 100644 --- a/SRC/zhetrf_aa.f +++ b/SRC/zhetrf_aa.f @@ -114,11 +114,7 @@ *> \verbatim *> INFO is INTEGER *> = 0: successful exit -*> < 0: if INFO = -i, the i-th argument had an illegal value -*> > 0: if INFO = i, D(i,i) is exactly zero. The factorization -*> has been completed, but the block diagonal matrix D is -*> exactly singular, and division by zero will occur if it -*> is used to solve a system of equations. +*> < 0: if INFO = -i, the i-th argument had an illegal value. *> \endverbatim * * Authors: @@ -218,7 +214,7 @@ RETURN END IF * -* Adjubst block size based on the workspace size +* Adjust block size based on the workspace size * IF( LWORK.LT.((1+NB)*N) ) THEN NB = ( LWORK-N ) / N |