Home
last modified time | relevance | path

Searched refs:WRTMP (Results 1 – 25 of 84) sorted by relevance

1234

/dports/math/xlapack/lapack-3.10.0/TESTING/EIG/
H A Ddget38.f130 $ WR( LDT ), WRTMP( LDT )
229 CALL DCOPY( N, WR, 1, WRTMP, 1 )
233 VRMIN = WRTMP( I )
236 IF( WRTMP( J ).LT.VRMIN ) THEN
238 VRMIN = WRTMP( J )
242 WRTMP( KMIN ) = WRTMP( I )
244 WRTMP( I ) = VRMIN
258 CALL DTRSEN( 'B', 'V', SELECT, N, T, LDT, Q, LDT, WRTMP, WITMP,
398 CALL DTRSEN( 'E', 'V', SELECT, N, TTMP, LDT, QTMP, LDT, WRTMP,
426 CALL DTRSEN( 'V', 'V', SELECT, N, TTMP, LDT, QTMP, LDT, WRTMP,
[all …]
H A Dsget38.f130 $ WR( LDT ), WRTMP( LDT )
229 CALL SCOPY( N, WR, 1, WRTMP, 1 )
233 VRMIN = WRTMP( I )
236 IF( WRTMP( J ).LT.VRMIN ) THEN
238 VRMIN = WRTMP( J )
242 WRTMP( KMIN ) = WRTMP( I )
244 WRTMP( I ) = VRMIN
258 CALL STRSEN( 'B', 'V', SELECT, N, T, LDT, Q, LDT, WRTMP, WITMP,
398 CALL STRSEN( 'E', 'V', SELECT, N, TTMP, LDT, QTMP, LDT, WRTMP,
426 CALL STRSEN( 'V', 'V', SELECT, N, TTMP, LDT, QTMP, LDT, WRTMP,
[all …]
H A Ddget24.f340 $ H, HT, WR, WI, WRT, WIT, WRTMP, WITMP, VS,
359 $ WR( * ), WRT( * ), WRTMP( * )
473 CALL DCOPY( N, WR, 1, WRTMP, 1 )
881 SELWR( I ) = WRTMP( I )
886 VRMIN = WRTMP( I )
889 IF( WRTMP( J ).LT.VRMIN ) THEN
891 VRMIN = WRTMP( J )
895 WRTMP( KMIN ) = WRTMP( I )
897 WRTMP( I ) = VRMIN
H A Dsget24.f340 $ H, HT, WR, WI, WRT, WIT, WRTMP, WITMP, VS,
359 $ WR( * ), WRT( * ), WRTMP( * )
473 CALL SCOPY( N, WR, 1, WRTMP, 1 )
881 SELWR( I ) = WRTMP( I )
886 VRMIN = WRTMP( I )
889 IF( WRTMP( J ).LT.VRMIN ) THEN
891 VRMIN = WRTMP( J )
895 WRTMP( KMIN ) = WRTMP( I )
897 WRTMP( I ) = VRMIN
/dports/math/blas/lapack-3.10.0/TESTING/EIG/
H A Ddget38.f130 $ WR( LDT ), WRTMP( LDT )
229 CALL DCOPY( N, WR, 1, WRTMP, 1 )
233 VRMIN = WRTMP( I )
236 IF( WRTMP( J ).LT.VRMIN ) THEN
238 VRMIN = WRTMP( J )
242 WRTMP( KMIN ) = WRTMP( I )
244 WRTMP( I ) = VRMIN
258 CALL DTRSEN( 'B', 'V', SELECT, N, T, LDT, Q, LDT, WRTMP, WITMP,
398 CALL DTRSEN( 'E', 'V', SELECT, N, TTMP, LDT, QTMP, LDT, WRTMP,
426 CALL DTRSEN( 'V', 'V', SELECT, N, TTMP, LDT, QTMP, LDT, WRTMP,
[all …]
H A Dsget38.f130 $ WR( LDT ), WRTMP( LDT )
229 CALL SCOPY( N, WR, 1, WRTMP, 1 )
233 VRMIN = WRTMP( I )
236 IF( WRTMP( J ).LT.VRMIN ) THEN
238 VRMIN = WRTMP( J )
242 WRTMP( KMIN ) = WRTMP( I )
244 WRTMP( I ) = VRMIN
258 CALL STRSEN( 'B', 'V', SELECT, N, T, LDT, Q, LDT, WRTMP, WITMP,
398 CALL STRSEN( 'E', 'V', SELECT, N, TTMP, LDT, QTMP, LDT, WRTMP,
426 CALL STRSEN( 'V', 'V', SELECT, N, TTMP, LDT, QTMP, LDT, WRTMP,
[all …]
H A Ddget24.f340 $ H, HT, WR, WI, WRT, WIT, WRTMP, WITMP, VS,
359 $ WR( * ), WRT( * ), WRTMP( * )
473 CALL DCOPY( N, WR, 1, WRTMP, 1 )
881 SELWR( I ) = WRTMP( I )
886 VRMIN = WRTMP( I )
889 IF( WRTMP( J ).LT.VRMIN ) THEN
891 VRMIN = WRTMP( J )
895 WRTMP( KMIN ) = WRTMP( I )
897 WRTMP( I ) = VRMIN
H A Dsget24.f340 $ H, HT, WR, WI, WRT, WIT, WRTMP, WITMP, VS,
359 $ WR( * ), WRT( * ), WRTMP( * )
473 CALL SCOPY( N, WR, 1, WRTMP, 1 )
881 SELWR( I ) = WRTMP( I )
886 VRMIN = WRTMP( I )
889 IF( WRTMP( J ).LT.VRMIN ) THEN
891 VRMIN = WRTMP( J )
895 WRTMP( KMIN ) = WRTMP( I )
897 WRTMP( I ) = VRMIN
/dports/math/lapacke/lapack-3.10.0/TESTING/EIG/
H A Dsget38.f130 $ WR( LDT ), WRTMP( LDT )
229 CALL SCOPY( N, WR, 1, WRTMP, 1 )
233 VRMIN = WRTMP( I )
236 IF( WRTMP( J ).LT.VRMIN ) THEN
238 VRMIN = WRTMP( J )
242 WRTMP( KMIN ) = WRTMP( I )
244 WRTMP( I ) = VRMIN
258 CALL STRSEN( 'B', 'V', SELECT, N, T, LDT, Q, LDT, WRTMP, WITMP,
398 CALL STRSEN( 'E', 'V', SELECT, N, TTMP, LDT, QTMP, LDT, WRTMP,
426 CALL STRSEN( 'V', 'V', SELECT, N, TTMP, LDT, QTMP, LDT, WRTMP,
[all …]
H A Ddget38.f130 $ WR( LDT ), WRTMP( LDT )
229 CALL DCOPY( N, WR, 1, WRTMP, 1 )
233 VRMIN = WRTMP( I )
236 IF( WRTMP( J ).LT.VRMIN ) THEN
238 VRMIN = WRTMP( J )
242 WRTMP( KMIN ) = WRTMP( I )
244 WRTMP( I ) = VRMIN
258 CALL DTRSEN( 'B', 'V', SELECT, N, T, LDT, Q, LDT, WRTMP, WITMP,
398 CALL DTRSEN( 'E', 'V', SELECT, N, TTMP, LDT, QTMP, LDT, WRTMP,
426 CALL DTRSEN( 'V', 'V', SELECT, N, TTMP, LDT, QTMP, LDT, WRTMP,
[all …]
/dports/math/lapack/lapack-3.10.0/TESTING/EIG/
H A Dsget38.f130 $ WR( LDT ), WRTMP( LDT ) local
229 CALL SCOPY( N, WR, 1, WRTMP, 1 )
233 VRMIN = WRTMP( I )
236 IF( WRTMP( J ).LT.VRMIN ) THEN
238 VRMIN = WRTMP( J )
242 WRTMP( KMIN ) = WRTMP( I )
244 WRTMP( I ) = VRMIN
258 CALL STRSEN( 'B', 'V', SELECT, N, T, LDT, Q, LDT, WRTMP, WITMP,
398 CALL STRSEN( 'E', 'V', SELECT, N, TTMP, LDT, QTMP, LDT, WRTMP,
426 CALL STRSEN( 'V', 'V', SELECT, N, TTMP, LDT, QTMP, LDT, WRTMP,
[all …]
H A Ddget38.f130 $ WR( LDT ), WRTMP( LDT ) local
229 CALL DCOPY( N, WR, 1, WRTMP, 1 )
233 VRMIN = WRTMP( I )
236 IF( WRTMP( J ).LT.VRMIN ) THEN
238 VRMIN = WRTMP( J )
242 WRTMP( KMIN ) = WRTMP( I )
244 WRTMP( I ) = VRMIN
258 CALL DTRSEN( 'B', 'V', SELECT, N, T, LDT, Q, LDT, WRTMP, WITMP,
398 CALL DTRSEN( 'E', 'V', SELECT, N, TTMP, LDT, QTMP, LDT, WRTMP,
426 CALL DTRSEN( 'V', 'V', SELECT, N, TTMP, LDT, QTMP, LDT, WRTMP,
[all …]
/dports/math/libflame/libflame-5.2.0/netlib-test/lapack-3.4.2/TESTING/EIG/
H A Ddget38.f133 $ WR( LDT ), WRTMP( LDT ) local
232 CALL DCOPY( N, WR, 1, WRTMP, 1 )
236 VRMIN = WRTMP( I )
239 IF( WRTMP( J ).LT.VRMIN ) THEN
241 VRMIN = WRTMP( J )
245 WRTMP( KMIN ) = WRTMP( I )
247 WRTMP( I ) = VRMIN
261 CALL DTRSEN( 'B', 'V', SELECT, N, T, LDT, Q, LDT, WRTMP, WITMP,
401 CALL DTRSEN( 'E', 'V', SELECT, N, TTMP, LDT, QTMP, LDT, WRTMP,
429 CALL DTRSEN( 'V', 'V', SELECT, N, TTMP, LDT, QTMP, LDT, WRTMP,
[all …]
H A Dsget38.f133 $ WR( LDT ), WRTMP( LDT ) local
232 CALL SCOPY( N, WR, 1, WRTMP, 1 )
236 VRMIN = WRTMP( I )
239 IF( WRTMP( J ).LT.VRMIN ) THEN
241 VRMIN = WRTMP( J )
245 WRTMP( KMIN ) = WRTMP( I )
247 WRTMP( I ) = VRMIN
261 CALL STRSEN( 'B', 'V', SELECT, N, T, LDT, Q, LDT, WRTMP, WITMP,
401 CALL STRSEN( 'E', 'V', SELECT, N, TTMP, LDT, QTMP, LDT, WRTMP,
429 CALL STRSEN( 'V', 'V', SELECT, N, TTMP, LDT, QTMP, LDT, WRTMP,
[all …]
/dports/math/libflame/libflame-5.2.0/old/lapack-test/3.5.0/EIG/
H A Ddget38.f133 $ WR( LDT ), WRTMP( LDT ) local
232 CALL DCOPY( N, WR, 1, WRTMP, 1 )
236 VRMIN = WRTMP( I )
239 IF( WRTMP( J ).LT.VRMIN ) THEN
241 VRMIN = WRTMP( J )
245 WRTMP( KMIN ) = WRTMP( I )
247 WRTMP( I ) = VRMIN
261 CALL DTRSEN( 'B', 'V', SELECT, N, T, LDT, Q, LDT, WRTMP, WITMP,
401 CALL DTRSEN( 'E', 'V', SELECT, N, TTMP, LDT, QTMP, LDT, WRTMP,
429 CALL DTRSEN( 'V', 'V', SELECT, N, TTMP, LDT, QTMP, LDT, WRTMP,
[all …]
H A Dsget38.f133 $ WR( LDT ), WRTMP( LDT )
232 CALL SCOPY( N, WR, 1, WRTMP, 1 )
236 VRMIN = WRTMP( I )
239 IF( WRTMP( J ).LT.VRMIN ) THEN
241 VRMIN = WRTMP( J )
245 WRTMP( KMIN ) = WRTMP( I )
247 WRTMP( I ) = VRMIN
261 CALL STRSEN( 'B', 'V', SELECT, N, T, LDT, Q, LDT, WRTMP, WITMP,
401 CALL STRSEN( 'E', 'V', SELECT, N, TTMP, LDT, QTMP, LDT, WRTMP,
429 CALL STRSEN( 'V', 'V', SELECT, N, TTMP, LDT, QTMP, LDT, WRTMP,
[all …]
/dports/math/libflame/libflame-5.2.0/old/lapack-test/3.4.2/EIG/
H A Ddget38.f133 $ WR( LDT ), WRTMP( LDT ) local
232 CALL DCOPY( N, WR, 1, WRTMP, 1 )
236 VRMIN = WRTMP( I )
239 IF( WRTMP( J ).LT.VRMIN ) THEN
241 VRMIN = WRTMP( J )
245 WRTMP( KMIN ) = WRTMP( I )
247 WRTMP( I ) = VRMIN
261 CALL DTRSEN( 'B', 'V', SELECT, N, T, LDT, Q, LDT, WRTMP, WITMP,
401 CALL DTRSEN( 'E', 'V', SELECT, N, TTMP, LDT, QTMP, LDT, WRTMP,
429 CALL DTRSEN( 'V', 'V', SELECT, N, TTMP, LDT, QTMP, LDT, WRTMP,
[all …]
H A Dsget38.f133 $ WR( LDT ), WRTMP( LDT ) local
232 CALL SCOPY( N, WR, 1, WRTMP, 1 )
236 VRMIN = WRTMP( I )
239 IF( WRTMP( J ).LT.VRMIN ) THEN
241 VRMIN = WRTMP( J )
245 WRTMP( KMIN ) = WRTMP( I )
247 WRTMP( I ) = VRMIN
261 CALL STRSEN( 'B', 'V', SELECT, N, T, LDT, Q, LDT, WRTMP, WITMP,
401 CALL STRSEN( 'E', 'V', SELECT, N, TTMP, LDT, QTMP, LDT, WRTMP,
429 CALL STRSEN( 'V', 'V', SELECT, N, TTMP, LDT, QTMP, LDT, WRTMP,
[all …]
/dports/math/openblas/OpenBLAS-0.3.18/lapack-netlib/TESTING/EIG/
H A Ddget38.f133 $ WR( LDT ), WRTMP( LDT )
232 CALL DCOPY( N, WR, 1, WRTMP, 1 )
236 VRMIN = WRTMP( I )
239 IF( WRTMP( J ).LT.VRMIN ) THEN
241 VRMIN = WRTMP( J )
245 WRTMP( KMIN ) = WRTMP( I )
247 WRTMP( I ) = VRMIN
261 CALL DTRSEN( 'B', 'V', SELECT, N, T, LDT, Q, LDT, WRTMP, WITMP,
401 CALL DTRSEN( 'E', 'V', SELECT, N, TTMP, LDT, QTMP, LDT, WRTMP,
429 CALL DTRSEN( 'V', 'V', SELECT, N, TTMP, LDT, QTMP, LDT, WRTMP,
[all …]
H A Dsget38.f133 $ WR( LDT ), WRTMP( LDT )
232 CALL SCOPY( N, WR, 1, WRTMP, 1 )
236 VRMIN = WRTMP( I )
239 IF( WRTMP( J ).LT.VRMIN ) THEN
241 VRMIN = WRTMP( J )
245 WRTMP( KMIN ) = WRTMP( I )
247 WRTMP( I ) = VRMIN
261 CALL STRSEN( 'B', 'V', SELECT, N, T, LDT, Q, LDT, WRTMP, WITMP,
401 CALL STRSEN( 'E', 'V', SELECT, N, TTMP, LDT, QTMP, LDT, WRTMP,
429 CALL STRSEN( 'V', 'V', SELECT, N, TTMP, LDT, QTMP, LDT, WRTMP,
[all …]
/dports/math/cblas/lapack-3.10.0/TESTING/EIG/
H A Ddget38.f130 $ WR( LDT ), WRTMP( LDT )
229 CALL DCOPY( N, WR, 1, WRTMP, 1 )
233 VRMIN = WRTMP( I )
236 IF( WRTMP( J ).LT.VRMIN ) THEN
238 VRMIN = WRTMP( J )
242 WRTMP( KMIN ) = WRTMP( I )
244 WRTMP( I ) = VRMIN
258 CALL DTRSEN( 'B', 'V', SELECT, N, T, LDT, Q, LDT, WRTMP, WITMP,
398 CALL DTRSEN( 'E', 'V', SELECT, N, TTMP, LDT, QTMP, LDT, WRTMP,
426 CALL DTRSEN( 'V', 'V', SELECT, N, TTMP, LDT, QTMP, LDT, WRTMP,
[all …]
H A Dsget38.f130 $ WR( LDT ), WRTMP( LDT )
229 CALL SCOPY( N, WR, 1, WRTMP, 1 )
233 VRMIN = WRTMP( I )
236 IF( WRTMP( J ).LT.VRMIN ) THEN
238 VRMIN = WRTMP( J )
242 WRTMP( KMIN ) = WRTMP( I )
244 WRTMP( I ) = VRMIN
258 CALL STRSEN( 'B', 'V', SELECT, N, T, LDT, Q, LDT, WRTMP, WITMP,
398 CALL STRSEN( 'E', 'V', SELECT, N, TTMP, LDT, QTMP, LDT, WRTMP,
426 CALL STRSEN( 'V', 'V', SELECT, N, TTMP, LDT, QTMP, LDT, WRTMP,
[all …]
/dports/math/xlife++/xlifepp-sources-v2.0.1-2018-05-09/ext/LAPACKBLAS/TESTING/EIG/
H A Ddget38.f133 $ WR( LDT ), WRTMP( LDT )
232 CALL DCOPY( N, WR, 1, WRTMP, 1 )
236 VRMIN = WRTMP( I )
239 IF( WRTMP( J ).LT.VRMIN ) THEN
241 VRMIN = WRTMP( J )
245 WRTMP( KMIN ) = WRTMP( I )
247 WRTMP( I ) = VRMIN
261 CALL DTRSEN( 'B', 'V', SELECT, N, T, LDT, Q, LDT, WRTMP, WITMP,
401 CALL DTRSEN( 'E', 'V', SELECT, N, TTMP, LDT, QTMP, LDT, WRTMP,
429 CALL DTRSEN( 'V', 'V', SELECT, N, TTMP, LDT, QTMP, LDT, WRTMP,
[all …]
H A Dsget38.f133 $ WR( LDT ), WRTMP( LDT )
232 CALL SCOPY( N, WR, 1, WRTMP, 1 )
236 VRMIN = WRTMP( I )
239 IF( WRTMP( J ).LT.VRMIN ) THEN
241 VRMIN = WRTMP( J )
245 WRTMP( KMIN ) = WRTMP( I )
247 WRTMP( I ) = VRMIN
261 CALL STRSEN( 'B', 'V', SELECT, N, T, LDT, Q, LDT, WRTMP, WITMP,
401 CALL STRSEN( 'E', 'V', SELECT, N, TTMP, LDT, QTMP, LDT, WRTMP,
429 CALL STRSEN( 'V', 'V', SELECT, N, TTMP, LDT, QTMP, LDT, WRTMP,
[all …]
H A Ddget24.f342 $ H, HT, WR, WI, WRT, WIT, WRTMP, WITMP, VS,
362 $ WR( * ), WRT( * ), WRTMP( * )
476 CALL DCOPY( N, WR, 1, WRTMP, 1 )
884 SELWR( I ) = WRTMP( I )
889 VRMIN = WRTMP( I )
892 IF( WRTMP( J ).LT.VRMIN ) THEN
894 VRMIN = WRTMP( J )
898 WRTMP( KMIN ) = WRTMP( I )
900 WRTMP( I ) = VRMIN

1234