Searched refs:XNORM (Results 1 – 4 of 4) sorted by relevance
| /external/eigen/lapack/ |
| D | slarfg.f | 130 REAL BETA, RSAFMN, SAFMIN, XNORM local
149 XNORM = SNRM2( N-1, X, INCX )
151 IF( XNORM.EQ.ZERO ) THEN
160 BETA = -SIGN( SLAPY2( ALPHA, XNORM ), ALPHA )
178 XNORM = SNRM2( N-1, X, INCX )
179 BETA = -SIGN( SLAPY2( ALPHA, XNORM ), ALPHA )
|
| D | dlarfg.f | 130 DOUBLE PRECISION BETA, RSAFMN, SAFMIN, XNORM local
149 XNORM = DNRM2( N-1, X, INCX )
151 IF( XNORM.EQ.ZERO ) THEN
160 BETA = -SIGN( DLAPY2( ALPHA, XNORM ), ALPHA )
178 XNORM = DNRM2( N-1, X, INCX )
179 BETA = -SIGN( DLAPY2( ALPHA, XNORM ), ALPHA )
|
| D | zlarfg.f | 130 DOUBLE PRECISION ALPHI, ALPHR, BETA, RSAFMN, SAFMIN, XNORM local
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 )
183 XNORM = DZNRM2( N-1, X, INCX )
185 BETA = -SIGN( DLAPY3( ALPHR, ALPHI, XNORM ), ALPHR )
|
| D | clarfg.f | 130 REAL ALPHI, ALPHR, BETA, RSAFMN, SAFMIN, XNORM local
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 )
183 XNORM = SCNRM2( N-1, X, INCX )
185 BETA = -SIGN( SLAPY3( ALPHR, ALPHI, XNORM ), ALPHR )
|