/dports/misc/libemos/libemos-4.5.9-Source/bufrdc_wmo/ |
H A D | setlalo.F | 18 KLA=9 22 KLA=9 26 KLA=9 30 KLA=9 34 KLA=9 38 KLA=10 42 KLA=10 46 KLA=10 66 KLA=8 70 KLA=8 [all …]
|
H A D | fmmh.F | 11 SUBROUTINE FMMH(KLA,KLO,KELEM,VALUES,KSEC3,RMINLAT,RMINLON, argument 95 KLAI=KELEM*(I-1)+KLA 107 KLAI=KELEM*(I-1)+KLA 134 KLAI=KELEM*(I-1)+KLA 145 KLAI=KELEM*(I-1)+KLA 183 KLAI=KELEM*(I-1)+KLA
|
/dports/math/xlife++/xlifepp-sources-v2.0.1-2018-05-09/ext/LAPACKBLAS/TESTING/EIG/ |
H A D | dlatb9.f | 169 SUBROUTINE DLATB9( PATH, IMAT, M, P, N, TYPE, KLA, KUA, KLB, KUB, argument 181 INTEGER IMAT, KLA, KLB, KUA, KUB, M, MODEA, MODEB, N, P 253 KLA = 0 262 KLA = 0 271 KLA = MAX( M-1, 0 ) 280 KLA = MAX( M-1, 0 ) 296 KLA = 0 304 KLA = MAX( N-1, 0 ) 313 KLA = MAX( N-1, 0 ) 322 KLA = MAX( N-1, 0 )
|
H A D | slatb9.f | 169 SUBROUTINE SLATB9( PATH, IMAT, M, P, N, TYPE, KLA, KUA, argument 181 INTEGER IMAT, KLA, KUA, KLB, KUB, M, P, MODEA, MODEB, N 253 KLA = 0 262 KLA = 0 271 KLA = MAX( M-1, 0 ) 280 KLA = MAX( M-1, 0 ) 296 KLA = 0 304 KLA = MAX( N-1, 0 ) 313 KLA = MAX( N-1, 0 ) 322 KLA = MAX( N-1, 0 )
|
/dports/math/xlapack/lapack-3.10.0/TESTING/EIG/ |
H A D | dlatb9.f | 167 SUBROUTINE DLATB9( PATH, IMAT, M, P, N, TYPE, KLA, KUA, KLB, KUB, argument 178 INTEGER IMAT, KLA, KLB, KUA, KUB, M, MODEA, MODEB, N, P 250 KLA = 0 259 KLA = 0 268 KLA = MAX( M-1, 0 ) 277 KLA = MAX( M-1, 0 ) 293 KLA = 0 301 KLA = MAX( N-1, 0 ) 310 KLA = MAX( N-1, 0 ) 319 KLA = MAX( N-1, 0 )
|
H A D | slatb9.f | 167 SUBROUTINE SLATB9( PATH, IMAT, M, P, N, TYPE, KLA, KUA, argument 178 INTEGER IMAT, KLA, KUA, KLB, KUB, M, P, MODEA, MODEB, N 250 KLA = 0 259 KLA = 0 268 KLA = MAX( M-1, 0 ) 277 KLA = MAX( M-1, 0 ) 293 KLA = 0 301 KLA = MAX( N-1, 0 ) 310 KLA = MAX( N-1, 0 ) 319 KLA = MAX( N-1, 0 )
|
H A D | zckgqr.f | 240 INTEGER I, IINFO, IM, IMAT, IN, IP, KLA, KLB, KUA, KUB, 297 CALL DLATB9( 'GRQ', IMAT, M, P, N, TYPE, KLA, KUA, 302 $ CNDNMA, ANORM, KLA, KUA, 'No packing', A, 346 CALL DLATB9( 'GQR', IMAT, M, P, N, TYPE, KLA, KUA, 351 $ CNDNMA, ANORM, KLA, KUA, 'No packing', A,
|
/dports/math/blas/lapack-3.10.0/TESTING/EIG/ |
H A D | dlatb9.f | 167 SUBROUTINE DLATB9( PATH, IMAT, M, P, N, TYPE, KLA, KUA, KLB, KUB, argument 178 INTEGER IMAT, KLA, KLB, KUA, KUB, M, MODEA, MODEB, N, P 250 KLA = 0 259 KLA = 0 268 KLA = MAX( M-1, 0 ) 277 KLA = MAX( M-1, 0 ) 293 KLA = 0 301 KLA = MAX( N-1, 0 ) 310 KLA = MAX( N-1, 0 ) 319 KLA = MAX( N-1, 0 )
|
H A D | slatb9.f | 167 SUBROUTINE SLATB9( PATH, IMAT, M, P, N, TYPE, KLA, KUA, argument 178 INTEGER IMAT, KLA, KUA, KLB, KUB, M, P, MODEA, MODEB, N 250 KLA = 0 259 KLA = 0 268 KLA = MAX( M-1, 0 ) 277 KLA = MAX( M-1, 0 ) 293 KLA = 0 301 KLA = MAX( N-1, 0 ) 310 KLA = MAX( N-1, 0 ) 319 KLA = MAX( N-1, 0 )
|
/dports/math/lapacke/lapack-3.10.0/TESTING/EIG/ |
H A D | dlatb9.f | 167 SUBROUTINE DLATB9( PATH, IMAT, M, P, N, TYPE, KLA, KUA, KLB, KUB, argument 178 INTEGER IMAT, KLA, KLB, KUA, KUB, M, MODEA, MODEB, N, P 250 KLA = 0 259 KLA = 0 268 KLA = MAX( M-1, 0 ) 277 KLA = MAX( M-1, 0 ) 293 KLA = 0 301 KLA = MAX( N-1, 0 ) 310 KLA = MAX( N-1, 0 ) 319 KLA = MAX( N-1, 0 )
|
H A D | slatb9.f | 167 SUBROUTINE SLATB9( PATH, IMAT, M, P, N, TYPE, KLA, KUA, argument 178 INTEGER IMAT, KLA, KUA, KLB, KUB, M, P, MODEA, MODEB, N 250 KLA = 0 259 KLA = 0 268 KLA = MAX( M-1, 0 ) 277 KLA = MAX( M-1, 0 ) 293 KLA = 0 301 KLA = MAX( N-1, 0 ) 310 KLA = MAX( N-1, 0 ) 319 KLA = MAX( N-1, 0 )
|
/dports/math/lapack/lapack-3.10.0/TESTING/EIG/ |
H A D | dlatb9.f | 167 SUBROUTINE DLATB9( PATH, IMAT, M, P, N, TYPE, KLA, KUA, KLB, KUB, argument 178 INTEGER IMAT, KLA, KLB, KUA, KUB, M, MODEA, MODEB, N, P local 250 KLA = 0 259 KLA = 0 268 KLA = MAX( M-1, 0 ) 277 KLA = MAX( M-1, 0 ) 293 KLA = 0 301 KLA = MAX( N-1, 0 ) 310 KLA = MAX( N-1, 0 ) 319 KLA = MAX( N-1, 0 )
|
H A D | slatb9.f | 167 SUBROUTINE SLATB9( PATH, IMAT, M, P, N, TYPE, KLA, KUA, argument 178 INTEGER IMAT, KLA, KUA, KLB, KUB, M, P, MODEA, MODEB, N local 250 KLA = 0 259 KLA = 0 268 KLA = MAX( M-1, 0 ) 277 KLA = MAX( M-1, 0 ) 293 KLA = 0 301 KLA = MAX( N-1, 0 ) 310 KLA = MAX( N-1, 0 ) 319 KLA = MAX( N-1, 0 )
|
/dports/math/libflame/libflame-5.2.0/old/lapack-test/3.5.0/EIG/ |
H A D | dlatb9.f | 169 SUBROUTINE DLATB9( PATH, IMAT, M, P, N, TYPE, KLA, KUA, KLB, KUB, argument 181 INTEGER IMAT, KLA, KLB, KUA, KUB, M, MODEA, MODEB, N, P local 253 KLA = 0 262 KLA = 0 271 KLA = MAX( M-1, 0 ) 280 KLA = MAX( M-1, 0 ) 296 KLA = 0 304 KLA = MAX( N-1, 0 ) 313 KLA = MAX( N-1, 0 ) 322 KLA = MAX( N-1, 0 )
|
H A D | slatb9.f | 169 SUBROUTINE SLATB9( PATH, IMAT, M, P, N, TYPE, KLA, KUA, argument 181 INTEGER IMAT, KLA, KUA, KLB, KUB, M, P, MODEA, MODEB, N local 253 KLA = 0 262 KLA = 0 271 KLA = MAX( M-1, 0 ) 280 KLA = MAX( M-1, 0 ) 296 KLA = 0 304 KLA = MAX( N-1, 0 ) 313 KLA = MAX( N-1, 0 ) 322 KLA = MAX( N-1, 0 )
|
/dports/math/libflame/libflame-5.2.0/old/lapack-test/3.4.2/EIG/ |
H A D | dlatb9.f | 169 SUBROUTINE DLATB9( PATH, IMAT, M, P, N, TYPE, KLA, KUA, KLB, KUB, argument 181 INTEGER IMAT, KLA, KLB, KUA, KUB, M, MODEA, MODEB, N, P local 253 KLA = 0 262 KLA = 0 271 KLA = MAX( M-1, 0 ) 280 KLA = MAX( M-1, 0 ) 296 KLA = 0 304 KLA = MAX( N-1, 0 ) 313 KLA = MAX( N-1, 0 ) 322 KLA = MAX( N-1, 0 )
|
H A D | slatb9.f | 169 SUBROUTINE SLATB9( PATH, IMAT, M, P, N, TYPE, KLA, KUA, argument 181 INTEGER IMAT, KLA, KUA, KLB, KUB, M, P, MODEA, MODEB, N local 253 KLA = 0 262 KLA = 0 271 KLA = MAX( M-1, 0 ) 280 KLA = MAX( M-1, 0 ) 296 KLA = 0 304 KLA = MAX( N-1, 0 ) 313 KLA = MAX( N-1, 0 ) 322 KLA = MAX( N-1, 0 )
|
/dports/math/libflame/libflame-5.2.0/netlib-test/lapack-3.4.2/TESTING/EIG/ |
H A D | dlatb9.f | 169 SUBROUTINE DLATB9( PATH, IMAT, M, P, N, TYPE, KLA, KUA, KLB, KUB, argument 181 INTEGER IMAT, KLA, KLB, KUA, KUB, M, MODEA, MODEB, N, P local 253 KLA = 0 262 KLA = 0 271 KLA = MAX( M-1, 0 ) 280 KLA = MAX( M-1, 0 ) 296 KLA = 0 304 KLA = MAX( N-1, 0 ) 313 KLA = MAX( N-1, 0 ) 322 KLA = MAX( N-1, 0 )
|
H A D | slatb9.f | 169 SUBROUTINE SLATB9( PATH, IMAT, M, P, N, TYPE, KLA, KUA, argument 181 INTEGER IMAT, KLA, KUA, KLB, KUB, M, P, MODEA, MODEB, N local 253 KLA = 0 262 KLA = 0 271 KLA = MAX( M-1, 0 ) 280 KLA = MAX( M-1, 0 ) 296 KLA = 0 304 KLA = MAX( N-1, 0 ) 313 KLA = MAX( N-1, 0 ) 322 KLA = MAX( N-1, 0 )
|
/dports/math/openblas/OpenBLAS-0.3.18/lapack-netlib/TESTING/EIG/ |
H A D | dlatb9.f | 169 SUBROUTINE DLATB9( PATH, IMAT, M, P, N, TYPE, KLA, KUA, KLB, KUB, argument 181 INTEGER IMAT, KLA, KLB, KUA, KUB, M, MODEA, MODEB, N, P 253 KLA = 0 262 KLA = 0 271 KLA = MAX( M-1, 0 ) 280 KLA = MAX( M-1, 0 ) 296 KLA = 0 304 KLA = MAX( N-1, 0 ) 313 KLA = MAX( N-1, 0 ) 322 KLA = MAX( N-1, 0 )
|
H A D | slatb9.f | 169 SUBROUTINE SLATB9( PATH, IMAT, M, P, N, TYPE, KLA, KUA, argument 181 INTEGER IMAT, KLA, KUA, KLB, KUB, M, P, MODEA, MODEB, N 253 KLA = 0 262 KLA = 0 271 KLA = MAX( M-1, 0 ) 280 KLA = MAX( M-1, 0 ) 296 KLA = 0 304 KLA = MAX( N-1, 0 ) 313 KLA = MAX( N-1, 0 ) 322 KLA = MAX( N-1, 0 )
|
/dports/math/cblas/lapack-3.10.0/TESTING/EIG/ |
H A D | dlatb9.f | 167 SUBROUTINE DLATB9( PATH, IMAT, M, P, N, TYPE, KLA, KUA, KLB, KUB, argument 178 INTEGER IMAT, KLA, KLB, KUA, KUB, M, MODEA, MODEB, N, P 250 KLA = 0 259 KLA = 0 268 KLA = MAX( M-1, 0 ) 277 KLA = MAX( M-1, 0 ) 293 KLA = 0 301 KLA = MAX( N-1, 0 ) 310 KLA = MAX( N-1, 0 ) 319 KLA = MAX( N-1, 0 )
|
H A D | slatb9.f | 167 SUBROUTINE SLATB9( PATH, IMAT, M, P, N, TYPE, KLA, KUA, argument 178 INTEGER IMAT, KLA, KUA, KLB, KUB, M, P, MODEA, MODEB, N 250 KLA = 0 259 KLA = 0 268 KLA = MAX( M-1, 0 ) 277 KLA = MAX( M-1, 0 ) 293 KLA = 0 301 KLA = MAX( N-1, 0 ) 310 KLA = MAX( N-1, 0 ) 319 KLA = MAX( N-1, 0 )
|
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/lucia/ |
H A D | diis_simple.F | 39 CALL MEMMAN(KLA,(NVEC-1)**2,'ADDL ',2,'AMAT ') 66 WORK(KLA-1+(IVEC-1)*(NVEC-1)+IVEC) = EEII 75 WORK(KLA-1+(IVEC-1)*(NVEC-1)+JVEC) = EEIJ 76 WORK(KLA-1+(JVEC-1)*(NVEC-1)+IVEC) = EEIJ 84 CALL WRTMAT(WORK(KLA),NVEC-1,NVEC-1,NVEC-1,NVEC-1) 91 CALL INVERT_BY_DIAG2(WORK(KLA),WORK(KLSCRM1),WORK(KLSCRM2), 94 CALL MATVCB(WORK(KLA),WORK(KLRHS),C,NVEC-1,NVEC-1,0)
|
/dports/science/nwchem-data/nwchem-7.0.2-release/src/lucia/ |
H A D | diis_simple.F | 39 CALL MEMMAN(KLA,(NVEC-1)**2,'ADDL ',2,'AMAT ') 66 WORK(KLA-1+(IVEC-1)*(NVEC-1)+IVEC) = EEII 75 WORK(KLA-1+(IVEC-1)*(NVEC-1)+JVEC) = EEIJ 76 WORK(KLA-1+(JVEC-1)*(NVEC-1)+IVEC) = EEIJ 84 CALL WRTMAT(WORK(KLA),NVEC-1,NVEC-1,NVEC-1,NVEC-1) 91 CALL INVERT_BY_DIAG2(WORK(KLA),WORK(KLSCRM1),WORK(KLSCRM2), 94 CALL MATVCB(WORK(KLA),WORK(KLRHS),C,NVEC-1,NVEC-1,0)
|