diff options
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, |