Searched refs:SAFMIN (Results 1 - 4 of 4) sorted by relevance
/external/eigen/lapack/ |
H A D | clarfg.f | 130 REAL ALPHI, ALPHR, BETA, RSAFMN, SAFMIN, XNORM local in subroutine:CLARFG 164 SAFMIN = SLAMCH( 'S' ) / SLAMCH( 'E' ) 165 RSAFMN = ONE / SAFMIN 168 IF( ABS( BETA ).LT.SAFMIN ) THEN 178 IF( ABS( BETA ).LT.SAFMIN ) 181 * New BETA is at most 1, at least SAFMIN 194 BETA = BETA*SAFMIN
|
H A D | dlarfg.f | 130 DOUBLE PRECISION BETA, RSAFMN, SAFMIN, XNORM local in subroutine:DLARFG 161 SAFMIN = DLAMCH( 'S' ) / DLAMCH( 'E' ) 163 IF( ABS( BETA ).LT.SAFMIN ) THEN 167 RSAFMN = ONE / SAFMIN 173 IF( ABS( BETA ).LT.SAFMIN ) 176 * New BETA is at most 1, at least SAFMIN 187 BETA = BETA*SAFMIN
|
H A D | slarfg.f | 130 REAL BETA, RSAFMN, SAFMIN, XNORM local in subroutine:SLARFG 161 SAFMIN = SLAMCH( 'S' ) / SLAMCH( 'E' ) 163 IF( ABS( BETA ).LT.SAFMIN ) THEN 167 RSAFMN = ONE / SAFMIN 173 IF( ABS( BETA ).LT.SAFMIN ) 176 * New BETA is at most 1, at least SAFMIN 187 BETA = BETA*SAFMIN
|
H A D | zlarfg.f | 130 DOUBLE PRECISION ALPHI, ALPHR, BETA, RSAFMN, SAFMIN, XNORM local in subroutine:ZLARFG 164 SAFMIN = DLAMCH( 'S' ) / DLAMCH( 'E' ) 165 RSAFMN = ONE / SAFMIN 168 IF( ABS( BETA ).LT.SAFMIN ) THEN 178 IF( ABS( BETA ).LT.SAFMIN ) 181 * New BETA is at most 1, at least SAFMIN 194 BETA = BETA*SAFMIN
|
Completed in 76 milliseconds