Home
last modified time | relevance | path

Searched refs:SAFMIN (Results 1 – 4 of 4) sorted by relevance

/external/eigen/lapack/
Dslarfg.f130 REAL BETA, RSAFMN, SAFMIN, XNORM local
161 SAFMIN = SLAMCH( 'S' ) / SLAMCH( 'E' )
163 IF( ABS( BETA ).LT.SAFMIN ) THEN
167 RSAFMN = ONE / SAFMIN
173 IF( ABS( BETA ).LT.SAFMIN )
187 BETA = BETA*SAFMIN
Ddlarfg.f130 DOUBLE PRECISION BETA, RSAFMN, SAFMIN, XNORM local
161 SAFMIN = DLAMCH( 'S' ) / DLAMCH( 'E' )
163 IF( ABS( BETA ).LT.SAFMIN ) THEN
167 RSAFMN = ONE / SAFMIN
173 IF( ABS( BETA ).LT.SAFMIN )
187 BETA = BETA*SAFMIN
Dzlarfg.f130 DOUBLE PRECISION ALPHI, ALPHR, BETA, RSAFMN, SAFMIN, XNORM local
164 SAFMIN = DLAMCH( 'S' ) / DLAMCH( 'E' )
165 RSAFMN = ONE / SAFMIN
168 IF( ABS( BETA ).LT.SAFMIN ) THEN
178 IF( ABS( BETA ).LT.SAFMIN )
194 BETA = BETA*SAFMIN
Dclarfg.f130 REAL ALPHI, ALPHR, BETA, RSAFMN, SAFMIN, XNORM local
164 SAFMIN = SLAMCH( 'S' ) / SLAMCH( 'E' )
165 RSAFMN = ONE / SAFMIN
168 IF( ABS( BETA ).LT.SAFMIN ) THEN
178 IF( ABS( BETA ).LT.SAFMIN )
194 BETA = BETA*SAFMIN