Searched refs:XNORM (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 150 XNORM = SCNRM2( N-1, X, INCX ) 154 IF( XNORM.EQ.ZERO .AND. ALPHI.EQ.ZERO ) THEN 163 BETA = -SIGN( SLAPY3( ALPHR, ALPHI, XNORM ), ALPHR ) 170 * XNORM, BETA may be inaccurate; scale X and recompute them 183 XNORM = SCNRM2( N-1, X, INCX ) 185 BETA = -SIGN( SLAPY3( ALPHR, ALPHI, XNORM ), ALPHR )
|
H A D | dlarfg.f | 130 DOUBLE PRECISION BETA, RSAFMN, SAFMIN, XNORM local in subroutine:DLARFG 149 XNORM = DNRM2( N-1, X, INCX ) 151 IF( XNORM.EQ.ZERO ) THEN 160 BETA = -SIGN( DLAPY2( ALPHA, XNORM ), ALPHA ) 165 * XNORM, BETA may be inaccurate; scale X and recompute them 178 XNORM = DNRM2( N-1, X, INCX ) 179 BETA = -SIGN( DLAPY2( ALPHA, XNORM ), ALPHA )
|
H A D | slarfg.f | 130 REAL BETA, RSAFMN, SAFMIN, XNORM local in subroutine:SLARFG 149 XNORM = SNRM2( N-1, X, INCX ) 151 IF( XNORM.EQ.ZERO ) THEN 160 BETA = -SIGN( SLAPY2( ALPHA, XNORM ), ALPHA ) 165 * XNORM, BETA may be inaccurate; scale X and recompute them 178 XNORM = SNRM2( N-1, X, INCX ) 179 BETA = -SIGN( SLAPY2( ALPHA, XNORM ), ALPHA )
|
H A D | zlarfg.f | 130 DOUBLE PRECISION ALPHI, ALPHR, BETA, RSAFMN, SAFMIN, XNORM local in subroutine:ZLARFG 150 XNORM = DZNRM2( N-1, X, INCX ) 154 IF( XNORM.EQ.ZERO .AND. ALPHI.EQ.ZERO ) THEN 163 BETA = -SIGN( DLAPY3( ALPHR, ALPHI, XNORM ), ALPHR ) 170 * XNORM, BETA may be inaccurate; scale X and recompute them 183 XNORM = DZNRM2( N-1, X, INCX ) 185 BETA = -SIGN( DLAPY3( ALPHR, ALPHI, XNORM ), ALPHR )
|
Completed in 124 milliseconds