/dports/math/xlapack/lapack-3.10.0/SRC/ |
H A D | cheevr.f | 385 $ INDIWO, INDRD, INDRDD, INDRE, INDREE, INDRWK, 564 INDRE = INDRD + N 567 INDRDD = INDRE + N 593 CALL CHETRD( UPLO, N, A, LDA, RWORK( INDRD ), RWORK( INDRE ), 608 CALL SCOPY( N-1, RWORK( INDRE ), 1, RWORK( INDREE ), 1 ) 611 CALL SCOPY( N-1, RWORK( INDRE ), 1, RWORK( INDREE ), 1 ) 655 $ RWORK( INDRD ), RWORK( INDRE ), M, NSPLIT, W, 660 CALL CSTEIN( N, RWORK( INDRD ), RWORK( INDRE ), M, W,
|
H A D | zheevr.f | 385 $ INDIWO, INDRD, INDRDD, INDRE, INDREE, INDRWK, 564 INDRE = INDRD + N 567 INDRDD = INDRE + N 593 CALL ZHETRD( UPLO, N, A, LDA, RWORK( INDRD ), RWORK( INDRE ), 608 CALL DCOPY( N-1, RWORK( INDRE ), 1, RWORK( INDREE ), 1 ) 611 CALL DCOPY( N-1, RWORK( INDRE ), 1, RWORK( INDREE ), 1 ) 655 $ RWORK( INDRD ), RWORK( INDRE ), M, NSPLIT, W, 660 CALL ZSTEIN( N, RWORK( INDRD ), RWORK( INDRE ), M, W,
|
H A D | zheevr_2stage.f | 436 $ INDIWO, INDRD, INDRDD, INDRE, INDREE, INDRWK, 617 INDRE = INDRD + N 620 INDRDD = INDRE + N 647 $ RWORK( INDRE ), WORK( INDTAU ), 663 CALL DCOPY( N-1, RWORK( INDRE ), 1, RWORK( INDREE ), 1 ) 666 CALL DCOPY( N-1, RWORK( INDRE ), 1, RWORK( INDREE ), 1 ) 710 $ RWORK( INDRD ), RWORK( INDRE ), M, NSPLIT, W, 715 CALL ZSTEIN( N, RWORK( INDRD ), RWORK( INDRE ), M, W,
|
H A D | cheevr_2stage.f | 436 $ INDIWO, INDRD, INDRDD, INDRE, INDREE, INDRWK, 617 INDRE = INDRD + N 620 INDRDD = INDRE + N 647 $ RWORK( INDRE ), WORK( INDTAU ), 663 CALL SCOPY( N-1, RWORK( INDRE ), 1, RWORK( INDREE ), 1 ) 666 CALL SCOPY( N-1, RWORK( INDRE ), 1, RWORK( INDREE ), 1 ) 710 $ RWORK( INDRD ), RWORK( INDRE ), M, NSPLIT, W, 715 CALL CSTEIN( N, RWORK( INDRD ), RWORK( INDRE ), M, W,
|
/dports/math/blas/lapack-3.10.0/SRC/ |
H A D | zheevr.f | 385 $ INDIWO, INDRD, INDRDD, INDRE, INDREE, INDRWK, 564 INDRE = INDRD + N 567 INDRDD = INDRE + N 593 CALL ZHETRD( UPLO, N, A, LDA, RWORK( INDRD ), RWORK( INDRE ), 608 CALL DCOPY( N-1, RWORK( INDRE ), 1, RWORK( INDREE ), 1 ) 611 CALL DCOPY( N-1, RWORK( INDRE ), 1, RWORK( INDREE ), 1 ) 655 $ RWORK( INDRD ), RWORK( INDRE ), M, NSPLIT, W, 660 CALL ZSTEIN( N, RWORK( INDRD ), RWORK( INDRE ), M, W,
|
H A D | cheevr.f | 385 $ INDIWO, INDRD, INDRDD, INDRE, INDREE, INDRWK, 564 INDRE = INDRD + N 567 INDRDD = INDRE + N 593 CALL CHETRD( UPLO, N, A, LDA, RWORK( INDRD ), RWORK( INDRE ), 608 CALL SCOPY( N-1, RWORK( INDRE ), 1, RWORK( INDREE ), 1 ) 611 CALL SCOPY( N-1, RWORK( INDRE ), 1, RWORK( INDREE ), 1 ) 655 $ RWORK( INDRD ), RWORK( INDRE ), M, NSPLIT, W, 660 CALL CSTEIN( N, RWORK( INDRD ), RWORK( INDRE ), M, W,
|
H A D | zheevr_2stage.f | 436 $ INDIWO, INDRD, INDRDD, INDRE, INDREE, INDRWK, 617 INDRE = INDRD + N 620 INDRDD = INDRE + N 647 $ RWORK( INDRE ), WORK( INDTAU ), 663 CALL DCOPY( N-1, RWORK( INDRE ), 1, RWORK( INDREE ), 1 ) 666 CALL DCOPY( N-1, RWORK( INDRE ), 1, RWORK( INDREE ), 1 ) 710 $ RWORK( INDRD ), RWORK( INDRE ), M, NSPLIT, W, 715 CALL ZSTEIN( N, RWORK( INDRD ), RWORK( INDRE ), M, W,
|
H A D | cheevr_2stage.f | 436 $ INDIWO, INDRD, INDRDD, INDRE, INDREE, INDRWK, 617 INDRE = INDRD + N 620 INDRDD = INDRE + N 647 $ RWORK( INDRE ), WORK( INDTAU ), 663 CALL SCOPY( N-1, RWORK( INDRE ), 1, RWORK( INDREE ), 1 ) 666 CALL SCOPY( N-1, RWORK( INDRE ), 1, RWORK( INDREE ), 1 ) 710 $ RWORK( INDRD ), RWORK( INDRE ), M, NSPLIT, W, 715 CALL CSTEIN( N, RWORK( INDRD ), RWORK( INDRE ), M, W,
|
/dports/science/apbs/apbs-pdb2pqr-apbs-1.5-102-g500c1473/apbs/externals/fetk/punc/src/lapack/src_f77/ |
H A D | zheevr.f | 233 $ INDIWO, INDRD, INDRDD, INDRE, INDREE, INDRWK, local 394 INDRE = 1 395 INDRD = INDRE + N 400 CALL ZHETRD( UPLO, N, A, LDA, RWORK( INDRD ), RWORK( INDRE ), 410 CALL DCOPY( N-1, RWORK( INDRE ), 1, RWORK( INDREE ), 1 ) 413 CALL DCOPY( N-1, RWORK( INDRE ), 1, RWORK( INDREE ), 1 ) 456 $ RWORK( INDRD ), RWORK( INDRE ), M, NSPLIT, W, 461 CALL ZSTEIN( N, RWORK( INDRD ), RWORK( INDRE ), M, W,
|
H A D | cheevr.f | 233 $ INDIWO, INDRD, INDRDD, INDRE, INDREE, INDRWK, local 394 INDRE = 1 395 INDRD = INDRE + N 400 CALL CHETRD( UPLO, N, A, LDA, RWORK( INDRD ), RWORK( INDRE ), 410 CALL SCOPY( N-1, RWORK( INDRE ), 1, RWORK( INDREE ), 1 ) 413 CALL SCOPY( N-1, RWORK( INDRE ), 1, RWORK( INDREE ), 1 ) 456 $ RWORK( INDRD ), RWORK( INDRE ), M, NSPLIT, W, 461 CALL CSTEIN( N, RWORK( INDRD ), RWORK( INDRE ), M, W,
|
/dports/math/lapacke/lapack-3.10.0/SRC/ |
H A D | zheevr.f | 385 $ INDIWO, INDRD, INDRDD, INDRE, INDREE, INDRWK, 564 INDRE = INDRD + N 567 INDRDD = INDRE + N 593 CALL ZHETRD( UPLO, N, A, LDA, RWORK( INDRD ), RWORK( INDRE ), 608 CALL DCOPY( N-1, RWORK( INDRE ), 1, RWORK( INDREE ), 1 ) 611 CALL DCOPY( N-1, RWORK( INDRE ), 1, RWORK( INDREE ), 1 ) 655 $ RWORK( INDRD ), RWORK( INDRE ), M, NSPLIT, W, 660 CALL ZSTEIN( N, RWORK( INDRD ), RWORK( INDRE ), M, W,
|
H A D | cheevr.f | 385 $ INDIWO, INDRD, INDRDD, INDRE, INDREE, INDRWK, 564 INDRE = INDRD + N 567 INDRDD = INDRE + N 593 CALL CHETRD( UPLO, N, A, LDA, RWORK( INDRD ), RWORK( INDRE ), 608 CALL SCOPY( N-1, RWORK( INDRE ), 1, RWORK( INDREE ), 1 ) 611 CALL SCOPY( N-1, RWORK( INDRE ), 1, RWORK( INDREE ), 1 ) 655 $ RWORK( INDRD ), RWORK( INDRE ), M, NSPLIT, W, 660 CALL CSTEIN( N, RWORK( INDRD ), RWORK( INDRE ), M, W,
|
H A D | cheevr_2stage.f | 436 $ INDIWO, INDRD, INDRDD, INDRE, INDREE, INDRWK, 617 INDRE = INDRD + N 620 INDRDD = INDRE + N 647 $ RWORK( INDRE ), WORK( INDTAU ), 663 CALL SCOPY( N-1, RWORK( INDRE ), 1, RWORK( INDREE ), 1 ) 666 CALL SCOPY( N-1, RWORK( INDRE ), 1, RWORK( INDREE ), 1 ) 710 $ RWORK( INDRD ), RWORK( INDRE ), M, NSPLIT, W, 715 CALL CSTEIN( N, RWORK( INDRD ), RWORK( INDRE ), M, W,
|
/dports/math/lapack/lapack-3.10.0/SRC/ |
H A D | cheevr.f | 385 $ INDIWO, INDRD, INDRDD, INDRE, INDREE, INDRWK, 564 INDRE = INDRD + N 567 INDRDD = INDRE + N 593 CALL CHETRD( UPLO, N, A, LDA, RWORK( INDRD ), RWORK( INDRE ), 608 CALL SCOPY( N-1, RWORK( INDRE ), 1, RWORK( INDREE ), 1 ) 611 CALL SCOPY( N-1, RWORK( INDRE ), 1, RWORK( INDREE ), 1 ) 655 $ RWORK( INDRD ), RWORK( INDRE ), M, NSPLIT, W, 660 CALL CSTEIN( N, RWORK( INDRD ), RWORK( INDRE ), M, W,
|
H A D | zheevr.f | 385 $ INDIWO, INDRD, INDRDD, INDRE, INDREE, INDRWK, 564 INDRE = INDRD + N 567 INDRDD = INDRE + N 593 CALL ZHETRD( UPLO, N, A, LDA, RWORK( INDRD ), RWORK( INDRE ), 608 CALL DCOPY( N-1, RWORK( INDRE ), 1, RWORK( INDREE ), 1 ) 611 CALL DCOPY( N-1, RWORK( INDRE ), 1, RWORK( INDREE ), 1 ) 655 $ RWORK( INDRD ), RWORK( INDRE ), M, NSPLIT, W, 660 CALL ZSTEIN( N, RWORK( INDRD ), RWORK( INDRE ), M, W,
|
/dports/math/lapack95/LAPACK95/TESTING/ |
H A D | zheevr.f | 231 $ INDIWO, INDRD, INDRDD, INDRE, INDREE, INDRWK, 392 INDRE = 1 393 INDRD = INDRE + N 398 CALL ZHETRD( UPLO, N, A, LDA, RWORK( INDRD ), RWORK( INDRE ), 408 CALL DCOPY( N-1, RWORK( INDRE ), 1, RWORK( INDREE ), 1 ) 411 CALL DCOPY( N-1, RWORK( INDRE ), 1, RWORK( INDREE ), 1 ) 454 $ RWORK( INDRD ), RWORK( INDRE ), M, NSPLIT, W, 459 CALL ZSTEIN( N, RWORK( INDRD ), RWORK( INDRE ), M, W,
|
H A D | cheevr.f | 231 $ INDIWO, INDRD, INDRDD, INDRE, INDREE, INDRWK, 392 INDRE = 1 393 INDRD = INDRE + N 398 CALL CHETRD( UPLO, N, A, LDA, RWORK( INDRD ), RWORK( INDRE ), 408 CALL SCOPY( N-1, RWORK( INDRE ), 1, RWORK( INDREE ), 1 ) 411 CALL SCOPY( N-1, RWORK( INDRE ), 1, RWORK( INDREE ), 1 ) 454 $ RWORK( INDRD ), RWORK( INDRE ), M, NSPLIT, W, 459 CALL CSTEIN( N, RWORK( INDRD ), RWORK( INDRE ), M, W,
|
/dports/science/elmerfem/elmerfem-release-9.0/mathlibs/src/lapack/ |
H A D | cheevr.f | 233 $ INDIWO, INDRD, INDRDD, INDRE, INDREE, INDRWK, 394 INDRE = 1 395 INDRD = INDRE + N 400 CALL CHETRD( UPLO, N, A, LDA, RWORK( INDRD ), RWORK( INDRE ), 410 CALL SCOPY( N-1, RWORK( INDRE ), 1, RWORK( INDREE ), 1 ) 413 CALL SCOPY( N-1, RWORK( INDRE ), 1, RWORK( INDREE ), 1 ) 456 $ RWORK( INDRD ), RWORK( INDRE ), M, NSPLIT, W, 461 CALL CSTEIN( N, RWORK( INDRD ), RWORK( INDRE ), M, W,
|
H A D | zheevr.f | 233 $ INDIWO, INDRD, INDRDD, INDRE, INDREE, INDRWK, 394 INDRE = 1 395 INDRD = INDRE + N 400 CALL ZHETRD( UPLO, N, A, LDA, RWORK( INDRD ), RWORK( INDRE ), 410 CALL DCOPY( N-1, RWORK( INDRE ), 1, RWORK( INDREE ), 1 ) 413 CALL DCOPY( N-1, RWORK( INDRE ), 1, RWORK( INDREE ), 1 ) 456 $ RWORK( INDRD ), RWORK( INDRE ), M, NSPLIT, W, 461 CALL ZSTEIN( N, RWORK( INDRD ), RWORK( INDRE ), M, W,
|
/dports/math/openblas/OpenBLAS-0.3.18/lapack-netlib/SRC/ |
H A D | cheevr.f | 388 $ INDIWO, INDRD, INDRDD, INDRE, INDREE, INDRWK, local 567 INDRE = INDRD + N 570 INDRDD = INDRE + N 596 CALL CHETRD( UPLO, N, A, LDA, RWORK( INDRD ), RWORK( INDRE ), 611 CALL SCOPY( N-1, RWORK( INDRE ), 1, RWORK( INDREE ), 1 ) 614 CALL SCOPY( N-1, RWORK( INDRE ), 1, RWORK( INDREE ), 1 ) 658 $ RWORK( INDRD ), RWORK( INDRE ), M, NSPLIT, W, 663 CALL CSTEIN( N, RWORK( INDRD ), RWORK( INDRE ), M, W,
|
H A D | zheevr.f | 388 $ INDIWO, INDRD, INDRDD, INDRE, INDREE, INDRWK, local 567 INDRE = INDRD + N 570 INDRDD = INDRE + N 596 CALL ZHETRD( UPLO, N, A, LDA, RWORK( INDRD ), RWORK( INDRE ), 611 CALL DCOPY( N-1, RWORK( INDRE ), 1, RWORK( INDREE ), 1 ) 614 CALL DCOPY( N-1, RWORK( INDRE ), 1, RWORK( INDREE ), 1 ) 658 $ RWORK( INDRD ), RWORK( INDRE ), M, NSPLIT, W, 663 CALL ZSTEIN( N, RWORK( INDRD ), RWORK( INDRE ), M, W,
|
/dports/math/cblas/lapack-3.10.0/SRC/ |
H A D | cheevr.f | 385 $ INDIWO, INDRD, INDRDD, INDRE, INDREE, INDRWK, 564 INDRE = INDRD + N 567 INDRDD = INDRE + N 593 CALL CHETRD( UPLO, N, A, LDA, RWORK( INDRD ), RWORK( INDRE ), 608 CALL SCOPY( N-1, RWORK( INDRE ), 1, RWORK( INDREE ), 1 ) 611 CALL SCOPY( N-1, RWORK( INDRE ), 1, RWORK( INDREE ), 1 ) 655 $ RWORK( INDRD ), RWORK( INDRE ), M, NSPLIT, W, 660 CALL CSTEIN( N, RWORK( INDRD ), RWORK( INDRE ), M, W,
|
H A D | zheevr.f | 385 $ INDIWO, INDRD, INDRDD, INDRE, INDREE, INDRWK, 564 INDRE = INDRD + N 567 INDRDD = INDRE + N 593 CALL ZHETRD( UPLO, N, A, LDA, RWORK( INDRD ), RWORK( INDRE ), 608 CALL DCOPY( N-1, RWORK( INDRE ), 1, RWORK( INDREE ), 1 ) 611 CALL DCOPY( N-1, RWORK( INDRE ), 1, RWORK( INDREE ), 1 ) 655 $ RWORK( INDRD ), RWORK( INDRE ), M, NSPLIT, W, 660 CALL ZSTEIN( N, RWORK( INDRD ), RWORK( INDRE ), M, W,
|
/dports/math/xlife++/xlifepp-sources-v2.0.1-2018-05-09/ext/LAPACKBLAS/SRC/ |
H A D | cheevr.f | 379 $ INDIWO, INDRD, INDRDD, INDRE, INDREE, INDRWK, 558 INDRE = INDRD + N 561 INDRDD = INDRE + N 587 CALL CHETRD( UPLO, N, A, LDA, RWORK( INDRD ), RWORK( INDRE ), 602 CALL SCOPY( N-1, RWORK( INDRE ), 1, RWORK( INDREE ), 1 ) 605 CALL SCOPY( N-1, RWORK( INDRE ), 1, RWORK( INDREE ), 1 ) 649 $ RWORK( INDRD ), RWORK( INDRE ), M, NSPLIT, W, 654 CALL CSTEIN( N, RWORK( INDRD ), RWORK( INDRE ), M, W,
|
H A D | zheevr.f | 379 $ INDIWO, INDRD, INDRDD, INDRE, INDREE, INDRWK, 558 INDRE = INDRD + N 561 INDRDD = INDRE + N 587 CALL ZHETRD( UPLO, N, A, LDA, RWORK( INDRD ), RWORK( INDRE ), 602 CALL DCOPY( N-1, RWORK( INDRE ), 1, RWORK( INDREE ), 1 ) 605 CALL DCOPY( N-1, RWORK( INDRE ), 1, RWORK( INDREE ), 1 ) 649 $ RWORK( INDRD ), RWORK( INDRE ), M, NSPLIT, W, 654 CALL ZSTEIN( N, RWORK( INDRD ), RWORK( INDRE ), M, W,
|