Home
last modified time | relevance | path

Searched refs:TEMP3 (Results 226 – 250 of 523) sorted by relevance

12345678910>>...21

/dports/math/lapack/lapack-3.10.0/TESTING/EIG/
H A Ddchksb2stg.f367 $ TEMP1, TEMP2, TEMP3, TEMP4, ULP, ULPINV, UNFL
794 TEMP3 = ZERO
800 TEMP3 = MAX( TEMP3, ABS( D1( J ) ), ABS( D3( J ) ) )
805 RESULT(6) = TEMP4 / MAX( UNFL, ULP*MAX( TEMP3, TEMP4 ) )
H A Ddchkst2stg.f654 $ RTUNFL, TEMP1, TEMP2, TEMP3, TEMP4, ULP, local
1065 TEMP3 = ZERO
1071 TEMP3 = MAX( TEMP3, ABS( D1( J ) ), ABS( D3( J ) ) )
1076 RESULT( 4 ) = TEMP4 / MAX( UNFL, ULP*MAX( TEMP3, TEMP4 ) )
1249 TEMP3 = ZERO
1255 TEMP3 = MAX( TEMP3, ABS( D1( J ) ), ABS( D3( J ) ) )
1260 RESULT( 12 ) = TEMP4 / MAX( UNFL, ULP*MAX( TEMP3, TEMP4 ) )
1501 TEMP3 = MAX( ABS( WA1( N ) ), ABS( WA1( 1 ) ) )
1503 TEMP3 = ZERO
1506 RESULT( 19 ) = ( TEMP1+TEMP2 ) / MAX( UNFL, TEMP3*ULP )
H A Dschkst2stg.f654 $ RTUNFL, TEMP1, TEMP2, TEMP3, TEMP4, ULP, local
1065 TEMP3 = ZERO
1071 TEMP3 = MAX( TEMP3, ABS( D1( J ) ), ABS( D3( J ) ) )
1076 RESULT( 4 ) = TEMP4 / MAX( UNFL, ULP*MAX( TEMP3, TEMP4 ) )
1249 TEMP3 = ZERO
1255 TEMP3 = MAX( TEMP3, ABS( D1( J ) ), ABS( D3( J ) ) )
1260 RESULT( 12 ) = TEMP4 / MAX( UNFL, ULP*MAX( TEMP3, TEMP4 ) )
1501 TEMP3 = MAX( ABS( WA1( N ) ), ABS( WA1( 1 ) ) )
1503 TEMP3 = ZERO
1506 RESULT( 19 ) = ( TEMP1+TEMP2 ) / MAX( UNFL, TEMP3*ULP )
/dports/math/lapacke/lapack-3.10.0/TESTING/EIG/
H A Ddchksb2stg.f367 $ TEMP1, TEMP2, TEMP3, TEMP4, ULP, ULPINV, UNFL
794 TEMP3 = ZERO
800 TEMP3 = MAX( TEMP3, ABS( D1( J ) ), ABS( D3( J ) ) )
805 RESULT(6) = TEMP4 / MAX( UNFL, ULP*MAX( TEMP3, TEMP4 ) )
H A Ddchkst2stg.f654 $ RTUNFL, TEMP1, TEMP2, TEMP3, TEMP4, ULP,
1065 TEMP3 = ZERO
1071 TEMP3 = MAX( TEMP3, ABS( D1( J ) ), ABS( D3( J ) ) )
1076 RESULT( 4 ) = TEMP4 / MAX( UNFL, ULP*MAX( TEMP3, TEMP4 ) )
1249 TEMP3 = ZERO
1255 TEMP3 = MAX( TEMP3, ABS( D1( J ) ), ABS( D3( J ) ) )
1260 RESULT( 12 ) = TEMP4 / MAX( UNFL, ULP*MAX( TEMP3, TEMP4 ) )
1501 TEMP3 = MAX( ABS( WA1( N ) ), ABS( WA1( 1 ) ) )
1503 TEMP3 = ZERO
1506 RESULT( 19 ) = ( TEMP1+TEMP2 ) / MAX( UNFL, TEMP3*ULP )
H A Dschkst2stg.f654 $ RTUNFL, TEMP1, TEMP2, TEMP3, TEMP4, ULP,
1065 TEMP3 = ZERO
1071 TEMP3 = MAX( TEMP3, ABS( D1( J ) ), ABS( D3( J ) ) )
1076 RESULT( 4 ) = TEMP4 / MAX( UNFL, ULP*MAX( TEMP3, TEMP4 ) )
1249 TEMP3 = ZERO
1255 TEMP3 = MAX( TEMP3, ABS( D1( J ) ), ABS( D3( J ) ) )
1260 RESULT( 12 ) = TEMP4 / MAX( UNFL, ULP*MAX( TEMP3, TEMP4 ) )
1501 TEMP3 = MAX( ABS( WA1( N ) ), ABS( WA1( 1 ) ) )
1503 TEMP3 = ZERO
1506 RESULT( 19 ) = ( TEMP1+TEMP2 ) / MAX( UNFL, TEMP3*ULP )
/dports/math/lapacke/lapack-3.10.0/SRC/
H A Dzlaqz3.f232 COMPLEX*16 :: TEMP, TEMP2, TEMP3, S
298 TEMP3 = BETA( I )*A( ILO+1, ILO )
301 $ ABS( TEMP3 ) .GT. SAFMAX ) THEN
303 TEMP3 = CZERO
306 CALL ZLARTG( TEMP2, TEMP3, C, S, TEMP )
/dports/math/openblas/OpenBLAS-0.3.18/lapack-netlib/TESTING/EIG/
H A Dschksb2stg.f354 $ TEMP1, TEMP2, TEMP3, TEMP4, ULP, ULPINV, UNFL
781 TEMP3 = ZERO
787 TEMP3 = MAX( TEMP3, ABS( D1( J ) ), ABS( D3( J ) ) )
792 RESULT(6) = TEMP4 / MAX( UNFL, ULP*MAX( TEMP3, TEMP4 ) )
H A Dzchkhb2stg.f364 $ TEMP1, TEMP2, TEMP3, TEMP4, ULP, ULPINV, UNFL
791 TEMP3 = ZERO
797 TEMP3 = MAX( TEMP3, ABS( D1( J ) ), ABS( D3( J ) ) )
802 RESULT(6) = TEMP4 / MAX( UNFL, ULP*MAX( TEMP3, TEMP4 ) )
H A Dcchkhb2stg.f364 $ TEMP1, TEMP2, TEMP3, TEMP4, ULP, ULPINV, UNFL
791 TEMP3 = ZERO
797 TEMP3 = MAX( TEMP3, ABS( D1( J ) ), ABS( D3( J ) ) )
802 RESULT(6) = TEMP4 / MAX( UNFL, ULP*MAX( TEMP3, TEMP4 ) )
H A Ddchksb2stg.f354 $ TEMP1, TEMP2, TEMP3, TEMP4, ULP, ULPINV, UNFL
781 TEMP3 = ZERO
787 TEMP3 = MAX( TEMP3, ABS( D1( J ) ), ABS( D3( J ) ) )
792 RESULT(6) = TEMP4 / MAX( UNFL, ULP*MAX( TEMP3, TEMP4 ) )
H A Ddchkst2stg.f657 $ RTUNFL, TEMP1, TEMP2, TEMP3, TEMP4, ULP,
1068 TEMP3 = ZERO
1074 TEMP3 = MAX( TEMP3, ABS( D1( J ) ), ABS( D3( J ) ) )
1079 RESULT( 4 ) = TEMP4 / MAX( UNFL, ULP*MAX( TEMP3, TEMP4 ) )
1252 TEMP3 = ZERO
1258 TEMP3 = MAX( TEMP3, ABS( D1( J ) ), ABS( D3( J ) ) )
1263 RESULT( 12 ) = TEMP4 / MAX( UNFL, ULP*MAX( TEMP3, TEMP4 ) )
1504 TEMP3 = MAX( ABS( WA1( N ) ), ABS( WA1( 1 ) ) )
1506 TEMP3 = ZERO
1509 RESULT( 19 ) = ( TEMP1+TEMP2 ) / MAX( UNFL, TEMP3*ULP )
H A Dschkst2stg.f657 $ RTUNFL, TEMP1, TEMP2, TEMP3, TEMP4, ULP,
1068 TEMP3 = ZERO
1074 TEMP3 = MAX( TEMP3, ABS( D1( J ) ), ABS( D3( J ) ) )
1079 RESULT( 4 ) = TEMP4 / MAX( UNFL, ULP*MAX( TEMP3, TEMP4 ) )
1252 TEMP3 = ZERO
1258 TEMP3 = MAX( TEMP3, ABS( D1( J ) ), ABS( D3( J ) ) )
1263 RESULT( 12 ) = TEMP4 / MAX( UNFL, ULP*MAX( TEMP3, TEMP4 ) )
1504 TEMP3 = MAX( ABS( WA1( N ) ), ABS( WA1( 1 ) ) )
1506 TEMP3 = ZERO
1509 RESULT( 19 ) = ( TEMP1+TEMP2 ) / MAX( UNFL, TEMP3*ULP )
/dports/math/cblas/lapack-3.10.0/SRC/
H A Dclaqz3.f230 COMPLEX :: TEMP, TEMP2, TEMP3, S
296 TEMP3 = BETA( I )*A( ILO+1, ILO )
299 $ ABS( TEMP3 ) .GT. SAFMAX ) THEN
301 TEMP3 = CZERO
304 CALL CLARTG( TEMP2, TEMP3, C, S, TEMP )
H A Dzlaqz3.f232 COMPLEX*16 :: TEMP, TEMP2, TEMP3, S
298 TEMP3 = BETA( I )*A( ILO+1, ILO )
301 $ ABS( TEMP3 ) .GT. SAFMAX ) THEN
303 TEMP3 = CZERO
306 CALL ZLARTG( TEMP2, TEMP3, C, S, TEMP )
/dports/math/cblas/lapack-3.10.0/TESTING/EIG/
H A Dzchkhb2stg.f376 $ TEMP1, TEMP2, TEMP3, TEMP4, ULP, ULPINV, UNFL
803 TEMP3 = ZERO
809 TEMP3 = MAX( TEMP3, ABS( D1( J ) ), ABS( D3( J ) ) )
814 RESULT(6) = TEMP4 / MAX( UNFL, ULP*MAX( TEMP3, TEMP4 ) )
H A Dcchkhb2stg.f379 $ TEMP1, TEMP2, TEMP3, TEMP4, ULP, ULPINV, UNFL
806 TEMP3 = ZERO
812 TEMP3 = MAX( TEMP3, ABS( D1( J ) ), ABS( D3( J ) ) )
817 RESULT(6) = TEMP4 / MAX( UNFL, ULP*MAX( TEMP3, TEMP4 ) )
H A Ddchksb2stg.f367 $ TEMP1, TEMP2, TEMP3, TEMP4, ULP, ULPINV, UNFL
794 TEMP3 = ZERO
800 TEMP3 = MAX( TEMP3, ABS( D1( J ) ), ABS( D3( J ) ) )
805 RESULT(6) = TEMP4 / MAX( UNFL, ULP*MAX( TEMP3, TEMP4 ) )
H A Dschksb2stg.f367 $ TEMP1, TEMP2, TEMP3, TEMP4, ULP, ULPINV, UNFL
794 TEMP3 = ZERO
800 TEMP3 = MAX( TEMP3, ABS( D1( J ) ), ABS( D3( J ) ) )
805 RESULT(6) = TEMP4 / MAX( UNFL, ULP*MAX( TEMP3, TEMP4 ) )
H A Ddchkst2stg.f654 $ RTUNFL, TEMP1, TEMP2, TEMP3, TEMP4, ULP,
1065 TEMP3 = ZERO
1071 TEMP3 = MAX( TEMP3, ABS( D1( J ) ), ABS( D3( J ) ) )
1076 RESULT( 4 ) = TEMP4 / MAX( UNFL, ULP*MAX( TEMP3, TEMP4 ) )
1249 TEMP3 = ZERO
1255 TEMP3 = MAX( TEMP3, ABS( D1( J ) ), ABS( D3( J ) ) )
1260 RESULT( 12 ) = TEMP4 / MAX( UNFL, ULP*MAX( TEMP3, TEMP4 ) )
1501 TEMP3 = MAX( ABS( WA1( N ) ), ABS( WA1( 1 ) ) )
1503 TEMP3 = ZERO
1506 RESULT( 19 ) = ( TEMP1+TEMP2 ) / MAX( UNFL, TEMP3*ULP )
H A Dschkst2stg.f654 $ RTUNFL, TEMP1, TEMP2, TEMP3, TEMP4, ULP,
1065 TEMP3 = ZERO
1071 TEMP3 = MAX( TEMP3, ABS( D1( J ) ), ABS( D3( J ) ) )
1076 RESULT( 4 ) = TEMP4 / MAX( UNFL, ULP*MAX( TEMP3, TEMP4 ) )
1249 TEMP3 = ZERO
1255 TEMP3 = MAX( TEMP3, ABS( D1( J ) ), ABS( D3( J ) ) )
1260 RESULT( 12 ) = TEMP4 / MAX( UNFL, ULP*MAX( TEMP3, TEMP4 ) )
1501 TEMP3 = MAX( ABS( WA1( N ) ), ABS( WA1( 1 ) ) )
1503 TEMP3 = ZERO
1506 RESULT( 19 ) = ( TEMP1+TEMP2 ) / MAX( UNFL, TEMP3*ULP )
/dports/math/xlapack/lapack-3.10.0/TESTING/EIG/
H A Dschkst2stg.f654 $ RTUNFL, TEMP1, TEMP2, TEMP3, TEMP4, ULP,
1065 TEMP3 = ZERO
1071 TEMP3 = MAX( TEMP3, ABS( D1( J ) ), ABS( D3( J ) ) )
1076 RESULT( 4 ) = TEMP4 / MAX( UNFL, ULP*MAX( TEMP3, TEMP4 ) )
1249 TEMP3 = ZERO
1255 TEMP3 = MAX( TEMP3, ABS( D1( J ) ), ABS( D3( J ) ) )
1260 RESULT( 12 ) = TEMP4 / MAX( UNFL, ULP*MAX( TEMP3, TEMP4 ) )
1501 TEMP3 = MAX( ABS( WA1( N ) ), ABS( WA1( 1 ) ) )
1503 TEMP3 = ZERO
1506 RESULT( 19 ) = ( TEMP1+TEMP2 ) / MAX( UNFL, TEMP3*ULP )
H A Ddchkst2stg.f654 $ RTUNFL, TEMP1, TEMP2, TEMP3, TEMP4, ULP,
1065 TEMP3 = ZERO
1071 TEMP3 = MAX( TEMP3, ABS( D1( J ) ), ABS( D3( J ) ) )
1076 RESULT( 4 ) = TEMP4 / MAX( UNFL, ULP*MAX( TEMP3, TEMP4 ) )
1249 TEMP3 = ZERO
1255 TEMP3 = MAX( TEMP3, ABS( D1( J ) ), ABS( D3( J ) ) )
1260 RESULT( 12 ) = TEMP4 / MAX( UNFL, ULP*MAX( TEMP3, TEMP4 ) )
1501 TEMP3 = MAX( ABS( WA1( N ) ), ABS( WA1( 1 ) ) )
1503 TEMP3 = ZERO
1506 RESULT( 19 ) = ( TEMP1+TEMP2 ) / MAX( UNFL, TEMP3*ULP )
/dports/math/blas/lapack-3.10.0/TESTING/EIG/
H A Dschkst2stg.f654 $ RTUNFL, TEMP1, TEMP2, TEMP3, TEMP4, ULP,
1065 TEMP3 = ZERO
1071 TEMP3 = MAX( TEMP3, ABS( D1( J ) ), ABS( D3( J ) ) )
1076 RESULT( 4 ) = TEMP4 / MAX( UNFL, ULP*MAX( TEMP3, TEMP4 ) )
1249 TEMP3 = ZERO
1255 TEMP3 = MAX( TEMP3, ABS( D1( J ) ), ABS( D3( J ) ) )
1260 RESULT( 12 ) = TEMP4 / MAX( UNFL, ULP*MAX( TEMP3, TEMP4 ) )
1501 TEMP3 = MAX( ABS( WA1( N ) ), ABS( WA1( 1 ) ) )
1503 TEMP3 = ZERO
1506 RESULT( 19 ) = ( TEMP1+TEMP2 ) / MAX( UNFL, TEMP3*ULP )
H A Ddchkst2stg.f654 $ RTUNFL, TEMP1, TEMP2, TEMP3, TEMP4, ULP,
1065 TEMP3 = ZERO
1071 TEMP3 = MAX( TEMP3, ABS( D1( J ) ), ABS( D3( J ) ) )
1076 RESULT( 4 ) = TEMP4 / MAX( UNFL, ULP*MAX( TEMP3, TEMP4 ) )
1249 TEMP3 = ZERO
1255 TEMP3 = MAX( TEMP3, ABS( D1( J ) ), ABS( D3( J ) ) )
1260 RESULT( 12 ) = TEMP4 / MAX( UNFL, ULP*MAX( TEMP3, TEMP4 ) )
1501 TEMP3 = MAX( ABS( WA1( N ) ), ABS( WA1( 1 ) ) )
1503 TEMP3 = ZERO
1506 RESULT( 19 ) = ( TEMP1+TEMP2 ) / MAX( UNFL, TEMP3*ULP )

12345678910>>...21