diff options
author | deaglanhalligan <deaglanhalligan@8a072113-8704-0410-8d35-dd094bca7971> | 2009-01-26 03:51:22 +0000 |
---|---|---|
committer | deaglanhalligan <deaglanhalligan@8a072113-8704-0410-8d35-dd094bca7971> | 2009-01-26 03:51:22 +0000 |
commit | 4bb58882ffd4d53455dfb76eb7eb2dcb456010f4 (patch) | |
tree | 1bd51dad45a2645ac31bece49f10655af21642f3 /SRC/sla_gbrfsx_extended.f | |
parent | ce91deebd43a93991b7344444a323958db2ab64c (diff) |
Set ithresh to 10, not 100. Removed la_linrx_max_n_errs.
Diffstat (limited to 'SRC/sla_gbrfsx_extended.f')
-rw-r--r-- | SRC/sla_gbrfsx_extended.f | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/SRC/sla_gbrfsx_extended.f b/SRC/sla_gbrfsx_extended.f index fa2a8a06..7a5825af 100644 --- a/SRC/sla_gbrfsx_extended.f +++ b/SRC/sla_gbrfsx_extended.f @@ -32,7 +32,7 @@ * * Purpose * ======= -* +* * SLA_GBRFSX_EXTENDED computes ... . * * Arguments @@ -74,8 +74,6 @@ $ LA_LINRX_RCOND_I PARAMETER ( LA_LINRX_TRUST_I = 1, LA_LINRX_ERR_I = 2 ) PARAMETER ( LA_LINRX_RCOND_I = 3 ) - INTEGER LA_LINRX_MAX_N_ERRS - PARAMETER ( LA_LINRX_MAX_N_ERRS = 3 ) * .. * .. External Subroutines .. EXTERNAL SAXPY, SCOPY, SGBTRS, SGBMV, BLAS_SGBMV_X, |