/dports/math/xlife++/xlifepp-sources-v2.0.1-2018-05-09/ext/LAPACKBLAS/TESTING/EIG/ |
H A D | zdrvst.f | 378 INTEGER I, IDIAG, IHBW, IINFO, IL, IMODE, INDWRK, INDX, 601 IHBW = INT( ( N-1 )*DLARND( 1, ISEED3 ) ) 603 $ ANORM, IHBW, IHBW, 'Z', U, LDU, WORK, 609 DO 100 IDIAG = -IHBW, IHBW 610 IROW = IHBW - IDIAG + 1 1307 KD = IHBW 1802 KD = IHBW
|
/dports/math/xlapack/lapack-3.10.0/TESTING/EIG/ |
H A D | zdrvst.f | 375 INTEGER I, IDIAG, IHBW, IINFO, IL, IMODE, INDWRK, INDX, 598 IHBW = INT( ( N-1 )*DLARND( 1, ISEED3 ) ) 600 $ ANORM, IHBW, IHBW, 'Z', U, LDU, WORK, 606 DO 100 IDIAG = -IHBW, IHBW 607 IROW = IHBW - IDIAG + 1 1304 KD = IHBW 1799 KD = IHBW
|
H A D | zdrvst2stg.f | 375 INTEGER I, IDIAG, IHBW, IINFO, IL, IMODE, INDWRK, INDX, 600 IHBW = INT( ( N-1 )*DLARND( 1, ISEED3 ) ) 602 $ ANORM, IHBW, IHBW, 'Z', U, LDU, WORK, 608 DO 100 IDIAG = -IHBW, IHBW 609 IROW = IHBW - IDIAG + 1 1313 KD = IHBW 1817 KD = IHBW
|
H A D | cdrvst.f | 375 INTEGER I, IDIAG, IHBW, IINFO, IL, IMODE, INDWRK, INDX, 598 IHBW = INT( ( N-1 )*SLARND( 1, ISEED3 ) ) 600 $ ANORM, IHBW, IHBW, 'Z', U, LDU, WORK, 606 DO 100 IDIAG = -IHBW, IHBW 607 IROW = IHBW - IDIAG + 1 1304 KD = IHBW 1799 KD = IHBW
|
H A D | cdrvst2stg.f | 375 INTEGER I, IDIAG, IHBW, IINFO, IL, IMODE, INDWRK, INDX, 600 IHBW = INT( ( N-1 )*SLARND( 1, ISEED3 ) ) 602 $ ANORM, IHBW, IHBW, 'Z', U, LDU, WORK, 608 DO 100 IDIAG = -IHBW, IHBW 609 IROW = IHBW - IDIAG + 1 1313 KD = IHBW 1817 KD = IHBW
|
/dports/math/blas/lapack-3.10.0/TESTING/EIG/ |
H A D | zdrvst.f | 375 INTEGER I, IDIAG, IHBW, IINFO, IL, IMODE, INDWRK, INDX, 598 IHBW = INT( ( N-1 )*DLARND( 1, ISEED3 ) ) 600 $ ANORM, IHBW, IHBW, 'Z', U, LDU, WORK, 606 DO 100 IDIAG = -IHBW, IHBW 607 IROW = IHBW - IDIAG + 1 1304 KD = IHBW 1799 KD = IHBW
|
H A D | cdrvst.f | 375 INTEGER I, IDIAG, IHBW, IINFO, IL, IMODE, INDWRK, INDX, 598 IHBW = INT( ( N-1 )*SLARND( 1, ISEED3 ) ) 600 $ ANORM, IHBW, IHBW, 'Z', U, LDU, WORK, 606 DO 100 IDIAG = -IHBW, IHBW 607 IROW = IHBW - IDIAG + 1 1304 KD = IHBW 1799 KD = IHBW
|
H A D | cdrvst2stg.f | 375 INTEGER I, IDIAG, IHBW, IINFO, IL, IMODE, INDWRK, INDX, 600 IHBW = INT( ( N-1 )*SLARND( 1, ISEED3 ) ) 602 $ ANORM, IHBW, IHBW, 'Z', U, LDU, WORK, 608 DO 100 IDIAG = -IHBW, IHBW 609 IROW = IHBW - IDIAG + 1 1313 KD = IHBW 1817 KD = IHBW
|
H A D | zdrvst2stg.f | 375 INTEGER I, IDIAG, IHBW, IINFO, IL, IMODE, INDWRK, INDX, 600 IHBW = INT( ( N-1 )*DLARND( 1, ISEED3 ) ) 602 $ ANORM, IHBW, IHBW, 'Z', U, LDU, WORK, 608 DO 100 IDIAG = -IHBW, IHBW 609 IROW = IHBW - IDIAG + 1 1313 KD = IHBW 1817 KD = IHBW
|
/dports/math/lapacke/lapack-3.10.0/TESTING/EIG/ |
H A D | zdrvst.f | 375 INTEGER I, IDIAG, IHBW, IINFO, IL, IMODE, INDWRK, INDX, 598 IHBW = INT( ( N-1 )*DLARND( 1, ISEED3 ) ) 600 $ ANORM, IHBW, IHBW, 'Z', U, LDU, WORK, 606 DO 100 IDIAG = -IHBW, IHBW 607 IROW = IHBW - IDIAG + 1 1304 KD = IHBW 1799 KD = IHBW
|
H A D | cdrvst.f | 375 INTEGER I, IDIAG, IHBW, IINFO, IL, IMODE, INDWRK, INDX, 598 IHBW = INT( ( N-1 )*SLARND( 1, ISEED3 ) ) 600 $ ANORM, IHBW, IHBW, 'Z', U, LDU, WORK, 606 DO 100 IDIAG = -IHBW, IHBW 607 IROW = IHBW - IDIAG + 1 1304 KD = IHBW 1799 KD = IHBW
|
H A D | cdrvst2stg.f | 375 INTEGER I, IDIAG, IHBW, IINFO, IL, IMODE, INDWRK, INDX, 600 IHBW = INT( ( N-1 )*SLARND( 1, ISEED3 ) ) 602 $ ANORM, IHBW, IHBW, 'Z', U, LDU, WORK, 608 DO 100 IDIAG = -IHBW, IHBW 609 IROW = IHBW - IDIAG + 1 1313 KD = IHBW 1817 KD = IHBW
|
H A D | zdrvst2stg.f | 375 INTEGER I, IDIAG, IHBW, IINFO, IL, IMODE, INDWRK, INDX, 600 IHBW = INT( ( N-1 )*DLARND( 1, ISEED3 ) ) 602 $ ANORM, IHBW, IHBW, 'Z', U, LDU, WORK, 608 DO 100 IDIAG = -IHBW, IHBW 609 IROW = IHBW - IDIAG + 1 1313 KD = IHBW 1817 KD = IHBW
|
/dports/math/lapack95/LAPACK95/TESTING/ |
H A D | la_zdrvst.f | 330 INTEGER I, IDIAG, IHBW, IINFO, IL, IMODE, INDWRK, INDX, 559 IHBW = INT( ( N-1 )*DLARND( 1, ISEED3 ) ) 561 $ ANORM, IHBW, IHBW, 'Z', U, LDU, WORK, 567 DO 100 IDIAG = -IHBW, IHBW 568 IROW = IHBW - IDIAG + 1 1292 KD = IHBW 1807 KD = IHBW
|
H A D | la_cdrvst.f | 330 INTEGER I, IDIAG, IHBW, IINFO, IL, IMODE, INDWRK, INDX, 555 IHBW = INT( ( N-1 )*SLARND( 1, ISEED3 ) ) 557 $ ANORM, IHBW, IHBW, 'Z', U, LDU, WORK, 563 DO 100 IDIAG = -IHBW, IHBW 564 IROW = IHBW - IDIAG + 1 1291 KD = IHBW 1808 KD = IHBW
|
/dports/math/lapack/lapack-3.10.0/TESTING/EIG/ |
H A D | cdrvst2stg.f | 375 INTEGER I, IDIAG, IHBW, IINFO, IL, IMODE, INDWRK, INDX, local 600 IHBW = INT( ( N-1 )*SLARND( 1, ISEED3 ) ) 602 $ ANORM, IHBW, IHBW, 'Z', U, LDU, WORK, 608 DO 100 IDIAG = -IHBW, IHBW 609 IROW = IHBW - IDIAG + 1 1313 KD = IHBW 1817 KD = IHBW
|
H A D | zdrvst2stg.f | 375 INTEGER I, IDIAG, IHBW, IINFO, IL, IMODE, INDWRK, INDX, local 600 IHBW = INT( ( N-1 )*DLARND( 1, ISEED3 ) ) 602 $ ANORM, IHBW, IHBW, 'Z', U, LDU, WORK, 608 DO 100 IDIAG = -IHBW, IHBW 609 IROW = IHBW - IDIAG + 1 1313 KD = IHBW 1817 KD = IHBW
|
H A D | cdrvst.f | 375 INTEGER I, IDIAG, IHBW, IINFO, IL, IMODE, INDWRK, INDX, local 598 IHBW = INT( ( N-1 )*SLARND( 1, ISEED3 ) ) 600 $ ANORM, IHBW, IHBW, 'Z', U, LDU, WORK, 606 DO 100 IDIAG = -IHBW, IHBW 607 IROW = IHBW - IDIAG + 1 1304 KD = IHBW 1799 KD = IHBW
|
H A D | zdrvst.f | 375 INTEGER I, IDIAG, IHBW, IINFO, IL, IMODE, INDWRK, INDX, local 598 IHBW = INT( ( N-1 )*DLARND( 1, ISEED3 ) ) 600 $ ANORM, IHBW, IHBW, 'Z', U, LDU, WORK, 606 DO 100 IDIAG = -IHBW, IHBW 607 IROW = IHBW - IDIAG + 1 1304 KD = IHBW 1799 KD = IHBW
|
/dports/math/libflame/libflame-5.2.0/netlib-test/lapack-3.4.2/TESTING/EIG/ |
H A D | zdrvst.f | 378 INTEGER I, IDIAG, IHBW, IINFO, IL, IMODE, INDWRK, INDX, local 601 IHBW = INT( ( N-1 )*DLARND( 1, ISEED3 ) ) 603 $ ANORM, IHBW, IHBW, 'Z', U, LDU, WORK, 609 DO 100 IDIAG = -IHBW, IHBW 610 IROW = IHBW - IDIAG + 1 1307 KD = IHBW 1802 KD = IHBW
|
H A D | cdrvst.f | 378 INTEGER I, IDIAG, IHBW, IINFO, IL, IMODE, INDWRK, INDX, local 601 IHBW = INT( ( N-1 )*SLARND( 1, ISEED3 ) ) 603 $ ANORM, IHBW, IHBW, 'Z', U, LDU, WORK, 609 DO 100 IDIAG = -IHBW, IHBW 610 IROW = IHBW - IDIAG + 1 1307 KD = IHBW 1802 KD = IHBW
|
/dports/math/libflame/libflame-5.2.0/old/lapack-test/3.4.2/EIG/ |
H A D | zdrvst.f | 378 INTEGER I, IDIAG, IHBW, IINFO, IL, IMODE, INDWRK, INDX, local 601 IHBW = INT( ( N-1 )*DLARND( 1, ISEED3 ) ) 603 $ ANORM, IHBW, IHBW, 'Z', U, LDU, WORK, 609 DO 100 IDIAG = -IHBW, IHBW 610 IROW = IHBW - IDIAG + 1 1307 KD = IHBW 1802 KD = IHBW
|
H A D | cdrvst.f | 378 INTEGER I, IDIAG, IHBW, IINFO, IL, IMODE, INDWRK, INDX, local 601 IHBW = INT( ( N-1 )*SLARND( 1, ISEED3 ) ) 603 $ ANORM, IHBW, IHBW, 'Z', U, LDU, WORK, 609 DO 100 IDIAG = -IHBW, IHBW 610 IROW = IHBW - IDIAG + 1 1307 KD = IHBW 1802 KD = IHBW
|
/dports/math/libflame/libflame-5.2.0/old/lapack-test/3.5.0/EIG/ |
H A D | cdrvst.f | 378 INTEGER I, IDIAG, IHBW, IINFO, IL, IMODE, INDWRK, INDX, 601 IHBW = INT( ( N-1 )*SLARND( 1, ISEED3 ) ) 603 $ ANORM, IHBW, IHBW, 'Z', U, LDU, WORK, 609 DO 100 IDIAG = -IHBW, IHBW 610 IROW = IHBW - IDIAG + 1 1307 KD = IHBW 1802 KD = IHBW
|
H A D | zdrvst.f | 378 INTEGER I, IDIAG, IHBW, IINFO, IL, IMODE, INDWRK, INDX, 601 IHBW = INT( ( N-1 )*DLARND( 1, ISEED3 ) ) 603 $ ANORM, IHBW, IHBW, 'Z', U, LDU, WORK, 609 DO 100 IDIAG = -IHBW, IHBW 610 IROW = IHBW - IDIAG + 1 1307 KD = IHBW 1802 KD = IHBW
|