Return to dlaed8.f CVS log | Up to [local] / rpl / lapack / lapack |
version 1.18, 2018/05/29 07:17:56 | version 1.19, 2020/05/21 21:45:58 |
---|---|
Line 353 | Line 353 |
Z( I ) = W( INDX( I ) ) | Z( I ) = W( INDX( I ) ) |
40 CONTINUE | 40 CONTINUE |
* | * |
* Calculate the allowable deflation tolerence | * Calculate the allowable deflation tolerance |
* | * |
IMAX = IDAMAX( N, Z, 1 ) | IMAX = IDAMAX( N, Z, 1 ) |
JMAX = IDAMAX( N, D, 1 ) | JMAX = IDAMAX( N, D, 1 ) |