Home
last modified time | relevance | path

Searched refs:SBETA (Results 1 – 25 of 184) sorted by relevance

12345678

/dports/math/xlapack/lapack-3.10.0/TESTING/EIG/
H A Ddget52.f278 SBETA = BETA( JVEC )
283 ABMAX = MAX( ABS( SALFR ), ABS( SBETA ) )
284 IF( ABS( SALFR ).GT.ALFMAX .OR. ABS( SBETA ).GT.
288 SBETA = SCALE*SBETA
291 $ ABS( SBETA )*ANORM, SAFMIN )
292 ACOEF = SCALE*SBETA
307 ABMAX = MAX( ABS( SALFR )+ABS( SALFI ), ABS( SBETA ) )
309 $ ABS( SBETA ).GT.BETMAX .OR. ABMAX.LT.ONE ) THEN
313 SBETA = SCALE*SBETA
316 $ ABS( SBETA )*ANORM, SAFMIN )
[all …]
H A Dsget52.f278 SBETA = BETA( JVEC )
283 ABMAX = MAX( ABS( SALFR ), ABS( SBETA ) )
284 IF( ABS( SALFR ).GT.ALFMAX .OR. ABS( SBETA ).GT.
288 SBETA = SCALE*SBETA
291 $ ABS( SBETA )*ANORM, SAFMIN )
292 ACOEF = SCALE*SBETA
307 ABMAX = MAX( ABS( SALFR )+ABS( SALFI ), ABS( SBETA ) )
309 $ ABS( SBETA ).GT.BETMAX .OR. ABMAX.LT.ONE ) THEN
313 SBETA = SCALE*SBETA
316 $ ABS( SBETA )*ANORM, SAFMIN )
[all …]
/dports/math/blas/lapack-3.10.0/TESTING/EIG/
H A Ddget52.f278 SBETA = BETA( JVEC )
283 ABMAX = MAX( ABS( SALFR ), ABS( SBETA ) )
284 IF( ABS( SALFR ).GT.ALFMAX .OR. ABS( SBETA ).GT.
288 SBETA = SCALE*SBETA
291 $ ABS( SBETA )*ANORM, SAFMIN )
292 ACOEF = SCALE*SBETA
307 ABMAX = MAX( ABS( SALFR )+ABS( SALFI ), ABS( SBETA ) )
309 $ ABS( SBETA ).GT.BETMAX .OR. ABMAX.LT.ONE ) THEN
313 SBETA = SCALE*SBETA
316 $ ABS( SBETA )*ANORM, SAFMIN )
[all …]
H A Dsget52.f278 SBETA = BETA( JVEC )
283 ABMAX = MAX( ABS( SALFR ), ABS( SBETA ) )
284 IF( ABS( SALFR ).GT.ALFMAX .OR. ABS( SBETA ).GT.
288 SBETA = SCALE*SBETA
291 $ ABS( SBETA )*ANORM, SAFMIN )
292 ACOEF = SCALE*SBETA
307 ABMAX = MAX( ABS( SALFR )+ABS( SALFI ), ABS( SBETA ) )
309 $ ABS( SBETA ).GT.BETMAX .OR. ABMAX.LT.ONE ) THEN
313 SBETA = SCALE*SBETA
316 $ ABS( SBETA )*ANORM, SAFMIN )
[all …]
/dports/math/lapacke/lapack-3.10.0/TESTING/EIG/
H A Ddget52.f278 SBETA = BETA( JVEC )
283 ABMAX = MAX( ABS( SALFR ), ABS( SBETA ) )
284 IF( ABS( SALFR ).GT.ALFMAX .OR. ABS( SBETA ).GT.
288 SBETA = SCALE*SBETA
291 $ ABS( SBETA )*ANORM, SAFMIN )
292 ACOEF = SCALE*SBETA
307 ABMAX = MAX( ABS( SALFR )+ABS( SALFI ), ABS( SBETA ) )
309 $ ABS( SBETA ).GT.BETMAX .OR. ABMAX.LT.ONE ) THEN
313 SBETA = SCALE*SBETA
316 $ ABS( SBETA )*ANORM, SAFMIN )
[all …]
H A Dsget52.f278 SBETA = BETA( JVEC )
283 ABMAX = MAX( ABS( SALFR ), ABS( SBETA ) )
284 IF( ABS( SALFR ).GT.ALFMAX .OR. ABS( SBETA ).GT.
288 SBETA = SCALE*SBETA
291 $ ABS( SBETA )*ANORM, SAFMIN )
292 ACOEF = SCALE*SBETA
307 ABMAX = MAX( ABS( SALFR )+ABS( SALFI ), ABS( SBETA ) )
309 $ ABS( SBETA ).GT.BETMAX .OR. ABMAX.LT.ONE ) THEN
313 SBETA = SCALE*SBETA
316 $ ABS( SBETA )*ANORM, SAFMIN )
[all …]
/dports/math/lapack/lapack-3.10.0/TESTING/EIG/
H A Ddget52.f278 SBETA = BETA( JVEC )
283 ABMAX = MAX( ABS( SALFR ), ABS( SBETA ) )
284 IF( ABS( SALFR ).GT.ALFMAX .OR. ABS( SBETA ).GT.
288 SBETA = SCALE*SBETA
291 $ ABS( SBETA )*ANORM, SAFMIN )
292 ACOEF = SCALE*SBETA
307 ABMAX = MAX( ABS( SALFR )+ABS( SALFI ), ABS( SBETA ) )
309 $ ABS( SBETA ).GT.BETMAX .OR. ABMAX.LT.ONE ) THEN
313 SBETA = SCALE*SBETA
316 $ ABS( SBETA )*ANORM, SAFMIN )
[all …]
H A Dsget52.f278 SBETA = BETA( JVEC )
283 ABMAX = MAX( ABS( SALFR ), ABS( SBETA ) )
284 IF( ABS( SALFR ).GT.ALFMAX .OR. ABS( SBETA ).GT.
288 SBETA = SCALE*SBETA
291 $ ABS( SBETA )*ANORM, SAFMIN )
292 ACOEF = SCALE*SBETA
307 ABMAX = MAX( ABS( SALFR )+ABS( SALFI ), ABS( SBETA ) )
309 $ ABS( SBETA ).GT.BETMAX .OR. ABMAX.LT.ONE ) THEN
313 SBETA = SCALE*SBETA
316 $ ABS( SBETA )*ANORM, SAFMIN )
[all …]
/dports/math/libflame/libflame-5.2.0/old/lapack-test/3.5.0/EIG/
H A Ddget52.f281 SBETA = BETA( JVEC )
286 ABMAX = MAX( ABS( SALFR ), ABS( SBETA ) )
287 IF( ABS( SALFR ).GT.ALFMAX .OR. ABS( SBETA ).GT.
291 SBETA = SCALE*SBETA
294 $ ABS( SBETA )*ANORM, SAFMIN )
295 ACOEF = SCALE*SBETA
310 ABMAX = MAX( ABS( SALFR )+ABS( SALFI ), ABS( SBETA ) )
312 $ ABS( SBETA ).GT.BETMAX .OR. ABMAX.LT.ONE ) THEN
316 SBETA = SCALE*SBETA
319 $ ABS( SBETA )*ANORM, SAFMIN )
[all …]
H A Dsget52.f281 SBETA = BETA( JVEC )
286 ABMAX = MAX( ABS( SALFR ), ABS( SBETA ) )
287 IF( ABS( SALFR ).GT.ALFMAX .OR. ABS( SBETA ).GT.
291 SBETA = SCALE*SBETA
294 $ ABS( SBETA )*ANORM, SAFMIN )
295 ACOEF = SCALE*SBETA
310 ABMAX = MAX( ABS( SALFR )+ABS( SALFI ), ABS( SBETA ) )
312 $ ABS( SBETA ).GT.BETMAX .OR. ABMAX.LT.ONE ) THEN
316 SBETA = SCALE*SBETA
319 $ ABS( SBETA )*ANORM, SAFMIN )
[all …]
/dports/math/libflame/libflame-5.2.0/old/lapack-test/3.4.2/EIG/
H A Ddget52.f281 SBETA = BETA( JVEC )
286 ABMAX = MAX( ABS( SALFR ), ABS( SBETA ) )
287 IF( ABS( SALFR ).GT.ALFMAX .OR. ABS( SBETA ).GT.
291 SBETA = SCALE*SBETA
294 $ ABS( SBETA )*ANORM, SAFMIN )
295 ACOEF = SCALE*SBETA
310 ABMAX = MAX( ABS( SALFR )+ABS( SALFI ), ABS( SBETA ) )
312 $ ABS( SBETA ).GT.BETMAX .OR. ABMAX.LT.ONE ) THEN
316 SBETA = SCALE*SBETA
319 $ ABS( SBETA )*ANORM, SAFMIN )
[all …]
H A Dsget52.f281 SBETA = BETA( JVEC )
286 ABMAX = MAX( ABS( SALFR ), ABS( SBETA ) )
287 IF( ABS( SALFR ).GT.ALFMAX .OR. ABS( SBETA ).GT.
291 SBETA = SCALE*SBETA
294 $ ABS( SBETA )*ANORM, SAFMIN )
295 ACOEF = SCALE*SBETA
310 ABMAX = MAX( ABS( SALFR )+ABS( SALFI ), ABS( SBETA ) )
312 $ ABS( SBETA ).GT.BETMAX .OR. ABMAX.LT.ONE ) THEN
316 SBETA = SCALE*SBETA
319 $ ABS( SBETA )*ANORM, SAFMIN )
[all …]
/dports/math/libflame/libflame-5.2.0/netlib-test/lapack-3.4.2/TESTING/EIG/
H A Ddget52.f281 SBETA = BETA( JVEC )
286 ABMAX = MAX( ABS( SALFR ), ABS( SBETA ) )
287 IF( ABS( SALFR ).GT.ALFMAX .OR. ABS( SBETA ).GT.
291 SBETA = SCALE*SBETA
294 $ ABS( SBETA )*ANORM, SAFMIN )
295 ACOEF = SCALE*SBETA
310 ABMAX = MAX( ABS( SALFR )+ABS( SALFI ), ABS( SBETA ) )
312 $ ABS( SBETA ).GT.BETMAX .OR. ABMAX.LT.ONE ) THEN
316 SBETA = SCALE*SBETA
319 $ ABS( SBETA )*ANORM, SAFMIN )
[all …]
H A Dsget52.f281 SBETA = BETA( JVEC )
286 ABMAX = MAX( ABS( SALFR ), ABS( SBETA ) )
287 IF( ABS( SALFR ).GT.ALFMAX .OR. ABS( SBETA ).GT.
291 SBETA = SCALE*SBETA
294 $ ABS( SBETA )*ANORM, SAFMIN )
295 ACOEF = SCALE*SBETA
310 ABMAX = MAX( ABS( SALFR )+ABS( SALFI ), ABS( SBETA ) )
312 $ ABS( SBETA ).GT.BETMAX .OR. ABMAX.LT.ONE ) THEN
316 SBETA = SCALE*SBETA
319 $ ABS( SBETA )*ANORM, SAFMIN )
[all …]
/dports/math/openblas/OpenBLAS-0.3.18/lapack-netlib/TESTING/EIG/
H A Ddget52.f281 SBETA = BETA( JVEC )
286 ABMAX = MAX( ABS( SALFR ), ABS( SBETA ) )
287 IF( ABS( SALFR ).GT.ALFMAX .OR. ABS( SBETA ).GT.
291 SBETA = SCALE*SBETA
294 $ ABS( SBETA )*ANORM, SAFMIN )
295 ACOEF = SCALE*SBETA
310 ABMAX = MAX( ABS( SALFR )+ABS( SALFI ), ABS( SBETA ) )
312 $ ABS( SBETA ).GT.BETMAX .OR. ABMAX.LT.ONE ) THEN
316 SBETA = SCALE*SBETA
319 $ ABS( SBETA )*ANORM, SAFMIN )
[all …]
H A Dsget52.f281 SBETA = BETA( JVEC )
286 ABMAX = MAX( ABS( SALFR ), ABS( SBETA ) )
287 IF( ABS( SALFR ).GT.ALFMAX .OR. ABS( SBETA ).GT.
291 SBETA = SCALE*SBETA
294 $ ABS( SBETA )*ANORM, SAFMIN )
295 ACOEF = SCALE*SBETA
310 ABMAX = MAX( ABS( SALFR )+ABS( SALFI ), ABS( SBETA ) )
312 $ ABS( SBETA ).GT.BETMAX .OR. ABMAX.LT.ONE ) THEN
316 SBETA = SCALE*SBETA
319 $ ABS( SBETA )*ANORM, SAFMIN )
[all …]
/dports/math/cblas/lapack-3.10.0/TESTING/EIG/
H A Dsget52.f278 SBETA = BETA( JVEC )
283 ABMAX = MAX( ABS( SALFR ), ABS( SBETA ) )
284 IF( ABS( SALFR ).GT.ALFMAX .OR. ABS( SBETA ).GT.
288 SBETA = SCALE*SBETA
291 $ ABS( SBETA )*ANORM, SAFMIN )
292 ACOEF = SCALE*SBETA
307 ABMAX = MAX( ABS( SALFR )+ABS( SALFI ), ABS( SBETA ) )
309 $ ABS( SBETA ).GT.BETMAX .OR. ABMAX.LT.ONE ) THEN
313 SBETA = SCALE*SBETA
316 $ ABS( SBETA )*ANORM, SAFMIN )
[all …]
H A Ddget52.f278 SBETA = BETA( JVEC )
283 ABMAX = MAX( ABS( SALFR ), ABS( SBETA ) )
284 IF( ABS( SALFR ).GT.ALFMAX .OR. ABS( SBETA ).GT.
288 SBETA = SCALE*SBETA
291 $ ABS( SBETA )*ANORM, SAFMIN )
292 ACOEF = SCALE*SBETA
307 ABMAX = MAX( ABS( SALFR )+ABS( SALFI ), ABS( SBETA ) )
309 $ ABS( SBETA ).GT.BETMAX .OR. ABMAX.LT.ONE ) THEN
313 SBETA = SCALE*SBETA
316 $ ABS( SBETA )*ANORM, SAFMIN )
[all …]
/dports/math/xlife++/xlifepp-sources-v2.0.1-2018-05-09/ext/LAPACKBLAS/TESTING/EIG/
H A Ddget52.f281 SBETA = BETA( JVEC )
286 ABMAX = MAX( ABS( SALFR ), ABS( SBETA ) )
287 IF( ABS( SALFR ).GT.ALFMAX .OR. ABS( SBETA ).GT.
291 SBETA = SCALE*SBETA
294 $ ABS( SBETA )*ANORM, SAFMIN )
295 ACOEF = SCALE*SBETA
310 ABMAX = MAX( ABS( SALFR )+ABS( SALFI ), ABS( SBETA ) )
312 $ ABS( SBETA ).GT.BETMAX .OR. ABMAX.LT.ONE ) THEN
316 SBETA = SCALE*SBETA
319 $ ABS( SBETA )*ANORM, SAFMIN )
[all …]
H A Dsget52.f281 SBETA = BETA( JVEC )
286 ABMAX = MAX( ABS( SALFR ), ABS( SBETA ) )
287 IF( ABS( SALFR ).GT.ALFMAX .OR. ABS( SBETA ).GT.
291 SBETA = SCALE*SBETA
294 $ ABS( SBETA )*ANORM, SAFMIN )
295 ACOEF = SCALE*SBETA
310 ABMAX = MAX( ABS( SALFR )+ABS( SALFI ), ABS( SBETA ) )
312 $ ABS( SBETA ).GT.BETMAX .OR. ABMAX.LT.ONE ) THEN
316 SBETA = SCALE*SBETA
319 $ ABS( SBETA )*ANORM, SAFMIN )
[all …]
/dports/math/xlife++/xlifepp-sources-v2.0.1-2018-05-09/ext/LAPACKBLAS/SRC/
H A Dctgevc.f254 $ BIGNUM, BNORM, BSCALE, DMIN, SAFMIN, SBETA,
437 SBETA = ( TEMP*REAL( P( JE, JE ) ) )*BSCALE
438 ACOEFF = SBETA*ASCALE
443 LSA = ABS( SBETA ).GE.SAFMIN .AND. ABS( ACOEFF ).LT.SMALL
449 $ SCALE = ( SMALL / ABS( SBETA ) )*MIN( ANORM, BIG )
458 ACOEFF = ASCALE*( SCALE*SBETA )
603 SBETA = ( TEMP*REAL( P( JE, JE ) ) )*BSCALE
604 ACOEFF = SBETA*ASCALE
609 LSA = ABS( SBETA ).GE.SAFMIN .AND. ABS( ACOEFF ).LT.SMALL
615 $ SCALE = ( SMALL / ABS( SBETA ) )*MIN( ANORM, BIG )
[all …]
H A Dztgevc.f254 $ BIGNUM, BNORM, BSCALE, DMIN, SAFMIN, SBETA,
437 SBETA = ( TEMP*DBLE( P( JE, JE ) ) )*BSCALE
438 ACOEFF = SBETA*ASCALE
443 LSA = ABS( SBETA ).GE.SAFMIN .AND. ABS( ACOEFF ).LT.SMALL
449 $ SCALE = ( SMALL / ABS( SBETA ) )*MIN( ANORM, BIG )
458 ACOEFF = ASCALE*( SCALE*SBETA )
603 SBETA = ( TEMP*DBLE( P( JE, JE ) ) )*BSCALE
604 ACOEFF = SBETA*ASCALE
609 LSA = ABS( SBETA ).GE.SAFMIN .AND. ABS( ACOEFF ).LT.SMALL
615 $ SCALE = ( SMALL / ABS( SBETA ) )*MIN( ANORM, BIG )
[all …]
/dports/math/xlapack/lapack-3.10.0/SRC/
H A Dctgevc.f251 $ BIGNUM, BNORM, BSCALE, DMIN, SAFMIN, SBETA,
434 SBETA = ( TEMP*REAL( P( JE, JE ) ) )*BSCALE
435 ACOEFF = SBETA*ASCALE
440 LSA = ABS( SBETA ).GE.SAFMIN .AND. ABS( ACOEFF ).LT.SMALL
446 $ SCALE = ( SMALL / ABS( SBETA ) )*MIN( ANORM, BIG )
455 ACOEFF = ASCALE*( SCALE*SBETA )
600 SBETA = ( TEMP*REAL( P( JE, JE ) ) )*BSCALE
601 ACOEFF = SBETA*ASCALE
606 LSA = ABS( SBETA ).GE.SAFMIN .AND. ABS( ACOEFF ).LT.SMALL
612 $ SCALE = ( SMALL / ABS( SBETA ) )*MIN( ANORM, BIG )
[all …]
H A Dztgevc.f251 $ BIGNUM, BNORM, BSCALE, DMIN, SAFMIN, SBETA,
434 SBETA = ( TEMP*DBLE( P( JE, JE ) ) )*BSCALE
435 ACOEFF = SBETA*ASCALE
440 LSA = ABS( SBETA ).GE.SAFMIN .AND. ABS( ACOEFF ).LT.SMALL
446 $ SCALE = ( SMALL / ABS( SBETA ) )*MIN( ANORM, BIG )
455 ACOEFF = ASCALE*( SCALE*SBETA )
600 SBETA = ( TEMP*DBLE( P( JE, JE ) ) )*BSCALE
601 ACOEFF = SBETA*ASCALE
606 LSA = ABS( SBETA ).GE.SAFMIN .AND. ABS( ACOEFF ).LT.SMALL
612 $ SCALE = ( SMALL / ABS( SBETA ) )*MIN( ANORM, BIG )
[all …]
/dports/math/blas/lapack-3.10.0/SRC/
H A Dztgevc.f251 $ BIGNUM, BNORM, BSCALE, DMIN, SAFMIN, SBETA,
434 SBETA = ( TEMP*DBLE( P( JE, JE ) ) )*BSCALE
435 ACOEFF = SBETA*ASCALE
440 LSA = ABS( SBETA ).GE.SAFMIN .AND. ABS( ACOEFF ).LT.SMALL
446 $ SCALE = ( SMALL / ABS( SBETA ) )*MIN( ANORM, BIG )
455 ACOEFF = ASCALE*( SCALE*SBETA )
600 SBETA = ( TEMP*DBLE( P( JE, JE ) ) )*BSCALE
601 ACOEFF = SBETA*ASCALE
606 LSA = ABS( SBETA ).GE.SAFMIN .AND. ABS( ACOEFF ).LT.SMALL
612 $ SCALE = ( SMALL / ABS( SBETA ) )*MIN( ANORM, BIG )
[all …]

12345678