/dports/math/xlife++/xlifepp-sources-v2.0.1-2018-05-09/ext/LAPACKBLAS/SRC/ |
H A D | chptri.f | 228 AP( KC+K-1 ) = AP( KC+K-1 ) - 253 AP( KC+K-1 ) = AP( KC+K-1 ) - 261 AP( KCNEXT+K ) = AP( KCNEXT+K ) - 281 AP( KC+J-1 ) = CONJG( AP( KX ) ) 286 AP( KC+K-1 ) = AP( KPC+KP-1 ) 290 AP( KC+K+K-1 ) = AP( KC+K+KP-1 ) 324 AP( KC ) = ONE / REAL( AP( KC ) ) 365 AP( KCNEXT ) = AP( KCNEXT ) - 386 AP( KC+J-K ) = CONJG( AP( KX ) ) 391 AP( KC ) = AP( KPC ) [all …]
|
H A D | zhptri.f | 228 AP( KC+K-1 ) = AP( KC+K-1 ) - 253 AP( KC+K-1 ) = AP( KC+K-1 ) - 261 AP( KCNEXT+K ) = AP( KCNEXT+K ) - 281 AP( KC+J-1 ) = DCONJG( AP( KX ) ) 286 AP( KC+K-1 ) = AP( KPC+KP-1 ) 290 AP( KC+K+K-1 ) = AP( KC+K+KP-1 ) 324 AP( KC ) = ONE / DBLE( AP( KC ) ) 359 AP( KCNEXT+1 ) = AP( KCNEXT+1 ) - 365 AP( KCNEXT ) = AP( KCNEXT ) - 391 AP( KC ) = AP( KPC ) [all …]
|
H A D | csptri.f | 218 AP( KC+K-1 ) = ONE / AP( KC+K-1 ) 226 AP( KC+K-1 ) = AP( KC+K-1 ) - 251 AP( KC+K-1 ) = AP( KC+K-1 ) - 278 AP( KC+J-1 ) = AP( KX ) 282 AP( KC+K-1 ) = AP( KPC+KP-1 ) 320 AP( KC ) = ONE / AP( KC ) 328 AP( KC ) = AP( KC ) - CDOTU( N-K, WORK, 1, AP( KC+1 ), 353 AP( KC ) = AP( KC ) - CDOTU( N-K, WORK, 1, AP( KC+1 ), 361 AP( KCNEXT ) = AP( KCNEXT ) - 381 AP( KC+J-K ) = AP( KX ) [all …]
|
H A D | zsptri.f | 218 AP( KC+K-1 ) = ONE / AP( KC+K-1 ) 226 AP( KC+K-1 ) = AP( KC+K-1 ) - 251 AP( KC+K-1 ) = AP( KC+K-1 ) - 278 AP( KC+J-1 ) = AP( KX ) 282 AP( KC+K-1 ) = AP( KPC+KP-1 ) 320 AP( KC ) = ONE / AP( KC ) 328 AP( KC ) = AP( KC ) - ZDOTU( N-K, WORK, 1, AP( KC+1 ), 353 AP( KC ) = AP( KC ) - ZDOTU( N-K, WORK, 1, AP( KC+1 ), 361 AP( KCNEXT ) = AP( KCNEXT ) - 381 AP( KC+J-K ) = AP( KX ) [all …]
|
H A D | ssptri.f | 217 AP( KC+K-1 ) = ONE / AP( KC+K-1 ) 225 AP( KC+K-1 ) = AP( KC+K-1 ) - 250 AP( KC+K-1 ) = AP( KC+K-1 ) - 277 AP( KC+J-1 ) = AP( KX ) 281 AP( KC+K-1 ) = AP( KPC+KP-1 ) 319 AP( KC ) = ONE / AP( KC ) 327 AP( KC ) = AP( KC ) - SDOT( N-K, WORK, 1, AP( KC+1 ), 1 ) 351 AP( KC ) = AP( KC ) - SDOT( N-K, WORK, 1, AP( KC+1 ), 1 ) 358 AP( KCNEXT ) = AP( KCNEXT ) - 378 AP( KC+J-K ) = AP( KX ) [all …]
|
H A D | dsptri.f | 217 AP( KC+K-1 ) = ONE / AP( KC+K-1 ) 225 AP( KC+K-1 ) = AP( KC+K-1 ) - 250 AP( KC+K-1 ) = AP( KC+K-1 ) - 277 AP( KC+J-1 ) = AP( KX ) 281 AP( KC+K-1 ) = AP( KPC+KP-1 ) 319 AP( KC ) = ONE / AP( KC ) 327 AP( KC ) = AP( KC ) - DDOT( N-K, WORK, 1, AP( KC+1 ), 1 ) 351 AP( KC ) = AP( KC ) - DDOT( N-K, WORK, 1, AP( KC+1 ), 1 ) 358 AP( KCNEXT ) = AP( KCNEXT ) - 378 AP( KC+J-K ) = AP( KX ) [all …]
|
/dports/math/xlapack/lapack-3.10.0/SRC/ |
H A D | chptri.f | 225 AP( KC+K-1 ) = AP( KC+K-1 ) - 250 AP( KC+K-1 ) = AP( KC+K-1 ) - 258 AP( KCNEXT+K ) = AP( KCNEXT+K ) - 278 AP( KC+J-1 ) = CONJG( AP( KX ) ) 283 AP( KC+K-1 ) = AP( KPC+KP-1 ) 287 AP( KC+K+K-1 ) = AP( KC+K+KP-1 ) 321 AP( KC ) = ONE / REAL( AP( KC ) ) 362 AP( KCNEXT ) = AP( KCNEXT ) - 383 AP( KC+J-K ) = CONJG( AP( KX ) ) 388 AP( KC ) = AP( KPC ) [all …]
|
H A D | zhptri.f | 225 AP( KC+K-1 ) = AP( KC+K-1 ) - 250 AP( KC+K-1 ) = AP( KC+K-1 ) - 258 AP( KCNEXT+K ) = AP( KCNEXT+K ) - 278 AP( KC+J-1 ) = DCONJG( AP( KX ) ) 283 AP( KC+K-1 ) = AP( KPC+KP-1 ) 287 AP( KC+K+K-1 ) = AP( KC+K+KP-1 ) 321 AP( KC ) = ONE / DBLE( AP( KC ) ) 356 AP( KCNEXT+1 ) = AP( KCNEXT+1 ) - 362 AP( KCNEXT ) = AP( KCNEXT ) - 388 AP( KC ) = AP( KPC ) [all …]
|
H A D | dsptri.f | 214 AP( KC+K-1 ) = ONE / AP( KC+K-1 ) 222 AP( KC+K-1 ) = AP( KC+K-1 ) - 247 AP( KC+K-1 ) = AP( KC+K-1 ) - 274 AP( KC+J-1 ) = AP( KX ) 278 AP( KC+K-1 ) = AP( KPC+KP-1 ) 316 AP( KC ) = ONE / AP( KC ) 324 AP( KC ) = AP( KC ) - DDOT( N-K, WORK, 1, AP( KC+1 ), 1 ) 348 AP( KC ) = AP( KC ) - DDOT( N-K, WORK, 1, AP( KC+1 ), 1 ) 355 AP( KCNEXT ) = AP( KCNEXT ) - 375 AP( KC+J-K ) = AP( KX ) [all …]
|
H A D | zsptri.f | 215 AP( KC+K-1 ) = ONE / AP( KC+K-1 ) 223 AP( KC+K-1 ) = AP( KC+K-1 ) - 248 AP( KC+K-1 ) = AP( KC+K-1 ) - 275 AP( KC+J-1 ) = AP( KX ) 279 AP( KC+K-1 ) = AP( KPC+KP-1 ) 317 AP( KC ) = ONE / AP( KC ) 325 AP( KC ) = AP( KC ) - ZDOTU( N-K, WORK, 1, AP( KC+1 ), 350 AP( KC ) = AP( KC ) - ZDOTU( N-K, WORK, 1, AP( KC+1 ), 358 AP( KCNEXT ) = AP( KCNEXT ) - 378 AP( KC+J-K ) = AP( KX ) [all …]
|
H A D | ssptri.f | 214 AP( KC+K-1 ) = ONE / AP( KC+K-1 ) 222 AP( KC+K-1 ) = AP( KC+K-1 ) - 247 AP( KC+K-1 ) = AP( KC+K-1 ) - 274 AP( KC+J-1 ) = AP( KX ) 278 AP( KC+K-1 ) = AP( KPC+KP-1 ) 316 AP( KC ) = ONE / AP( KC ) 324 AP( KC ) = AP( KC ) - SDOT( N-K, WORK, 1, AP( KC+1 ), 1 ) 348 AP( KC ) = AP( KC ) - SDOT( N-K, WORK, 1, AP( KC+1 ), 1 ) 355 AP( KCNEXT ) = AP( KCNEXT ) - 375 AP( KC+J-K ) = AP( KX ) [all …]
|
/dports/math/blas/lapack-3.10.0/SRC/ |
H A D | zhptri.f | 225 AP( KC+K-1 ) = AP( KC+K-1 ) - 250 AP( KC+K-1 ) = AP( KC+K-1 ) - 258 AP( KCNEXT+K ) = AP( KCNEXT+K ) - 278 AP( KC+J-1 ) = DCONJG( AP( KX ) ) 283 AP( KC+K-1 ) = AP( KPC+KP-1 ) 287 AP( KC+K+K-1 ) = AP( KC+K+KP-1 ) 321 AP( KC ) = ONE / DBLE( AP( KC ) ) 356 AP( KCNEXT+1 ) = AP( KCNEXT+1 ) - 362 AP( KCNEXT ) = AP( KCNEXT ) - 388 AP( KC ) = AP( KPC ) [all …]
|
H A D | chptri.f | 225 AP( KC+K-1 ) = AP( KC+K-1 ) - 250 AP( KC+K-1 ) = AP( KC+K-1 ) - 258 AP( KCNEXT+K ) = AP( KCNEXT+K ) - 278 AP( KC+J-1 ) = CONJG( AP( KX ) ) 283 AP( KC+K-1 ) = AP( KPC+KP-1 ) 287 AP( KC+K+K-1 ) = AP( KC+K+KP-1 ) 321 AP( KC ) = ONE / REAL( AP( KC ) ) 362 AP( KCNEXT ) = AP( KCNEXT ) - 383 AP( KC+J-K ) = CONJG( AP( KX ) ) 388 AP( KC ) = AP( KPC ) [all …]
|
/dports/science/apbs/apbs-pdb2pqr-apbs-1.5-102-g500c1473/apbs/externals/fetk/punc/src/lapack/src_f77/ |
H A D | zhptri.f | 162 AP( KC+K-1 ) = AP( KC+K-1 ) - 187 AP( KC+K-1 ) = AP( KC+K-1 ) - 195 AP( KCNEXT+K ) = AP( KCNEXT+K ) - 215 AP( KC+J-1 ) = DCONJG( AP( KX ) ) 220 AP( KC+K-1 ) = AP( KPC+KP-1 ) 224 AP( KC+K+K-1 ) = AP( KC+K+KP-1 ) 258 AP( KC ) = ONE / DBLE( AP( KC ) ) 293 AP( KCNEXT+1 ) = AP( KCNEXT+1 ) - 299 AP( KCNEXT ) = AP( KCNEXT ) - 325 AP( KC ) = AP( KPC ) [all …]
|
H A D | chptri.f | 162 AP( KC+K-1 ) = AP( KC+K-1 ) - 187 AP( KC+K-1 ) = AP( KC+K-1 ) - 195 AP( KCNEXT+K ) = AP( KCNEXT+K ) - 215 AP( KC+J-1 ) = CONJG( AP( KX ) ) 220 AP( KC+K-1 ) = AP( KPC+KP-1 ) 224 AP( KC+K+K-1 ) = AP( KC+K+KP-1 ) 258 AP( KC ) = ONE / REAL( AP( KC ) ) 299 AP( KCNEXT ) = AP( KCNEXT ) - 320 AP( KC+J-K ) = CONJG( AP( KX ) ) 325 AP( KC ) = AP( KPC ) [all …]
|
/dports/math/lapacke/lapack-3.10.0/SRC/ |
H A D | chptri.f | 225 AP( KC+K-1 ) = AP( KC+K-1 ) - 250 AP( KC+K-1 ) = AP( KC+K-1 ) - 258 AP( KCNEXT+K ) = AP( KCNEXT+K ) - 278 AP( KC+J-1 ) = CONJG( AP( KX ) ) 283 AP( KC+K-1 ) = AP( KPC+KP-1 ) 287 AP( KC+K+K-1 ) = AP( KC+K+KP-1 ) 321 AP( KC ) = ONE / REAL( AP( KC ) ) 362 AP( KCNEXT ) = AP( KCNEXT ) - 383 AP( KC+J-K ) = CONJG( AP( KX ) ) 388 AP( KC ) = AP( KPC ) [all …]
|
H A D | zhptri.f | 225 AP( KC+K-1 ) = AP( KC+K-1 ) - 250 AP( KC+K-1 ) = AP( KC+K-1 ) - 258 AP( KCNEXT+K ) = AP( KCNEXT+K ) - 278 AP( KC+J-1 ) = DCONJG( AP( KX ) ) 283 AP( KC+K-1 ) = AP( KPC+KP-1 ) 287 AP( KC+K+K-1 ) = AP( KC+K+KP-1 ) 321 AP( KC ) = ONE / DBLE( AP( KC ) ) 356 AP( KCNEXT+1 ) = AP( KCNEXT+1 ) - 362 AP( KCNEXT ) = AP( KCNEXT ) - 388 AP( KC ) = AP( KPC ) [all …]
|
/dports/math/lapack/lapack-3.10.0/SRC/ |
H A D | chptri.f | 225 AP( KC+K-1 ) = AP( KC+K-1 ) - 250 AP( KC+K-1 ) = AP( KC+K-1 ) - 258 AP( KCNEXT+K ) = AP( KCNEXT+K ) - 278 AP( KC+J-1 ) = CONJG( AP( KX ) ) 283 AP( KC+K-1 ) = AP( KPC+KP-1 ) 287 AP( KC+K+K-1 ) = AP( KC+K+KP-1 ) 321 AP( KC ) = ONE / REAL( AP( KC ) ) 362 AP( KCNEXT ) = AP( KCNEXT ) - 383 AP( KC+J-K ) = CONJG( AP( KX ) ) 388 AP( KC ) = AP( KPC ) [all …]
|
H A D | zhptri.f | 225 AP( KC+K-1 ) = AP( KC+K-1 ) - 250 AP( KC+K-1 ) = AP( KC+K-1 ) - 258 AP( KCNEXT+K ) = AP( KCNEXT+K ) - 278 AP( KC+J-1 ) = DCONJG( AP( KX ) ) 283 AP( KC+K-1 ) = AP( KPC+KP-1 ) 287 AP( KC+K+K-1 ) = AP( KC+K+KP-1 ) 321 AP( KC ) = ONE / DBLE( AP( KC ) ) 356 AP( KCNEXT+1 ) = AP( KCNEXT+1 ) - 362 AP( KCNEXT ) = AP( KCNEXT ) - 388 AP( KC ) = AP( KPC ) [all …]
|
/dports/science/elmerfem/elmerfem-release-9.0/mathlibs/src/lapack/ |
H A D | chptri.f | 162 AP( KC+K-1 ) = AP( KC+K-1 ) - 187 AP( KC+K-1 ) = AP( KC+K-1 ) - 195 AP( KCNEXT+K ) = AP( KCNEXT+K ) - 215 AP( KC+J-1 ) = CONJG( AP( KX ) ) 220 AP( KC+K-1 ) = AP( KPC+KP-1 ) 224 AP( KC+K+K-1 ) = AP( KC+K+KP-1 ) 258 AP( KC ) = ONE / REAL( AP( KC ) ) 299 AP( KCNEXT ) = AP( KCNEXT ) - 320 AP( KC+J-K ) = CONJG( AP( KX ) ) 325 AP( KC ) = AP( KPC ) [all …]
|
H A D | zhptri.f | 162 AP( KC+K-1 ) = AP( KC+K-1 ) - 187 AP( KC+K-1 ) = AP( KC+K-1 ) - 195 AP( KCNEXT+K ) = AP( KCNEXT+K ) - 215 AP( KC+J-1 ) = DCONJG( AP( KX ) ) 220 AP( KC+K-1 ) = AP( KPC+KP-1 ) 224 AP( KC+K+K-1 ) = AP( KC+K+KP-1 ) 258 AP( KC ) = ONE / DBLE( AP( KC ) ) 293 AP( KCNEXT+1 ) = AP( KCNEXT+1 ) - 299 AP( KCNEXT ) = AP( KCNEXT ) - 325 AP( KC ) = AP( KPC ) [all …]
|
/dports/math/openblas/OpenBLAS-0.3.18/lapack-netlib/SRC/ |
H A D | chptri.f | 228 AP( KC+K-1 ) = AP( KC+K-1 ) - 253 AP( KC+K-1 ) = AP( KC+K-1 ) - 261 AP( KCNEXT+K ) = AP( KCNEXT+K ) - 281 AP( KC+J-1 ) = CONJG( AP( KX ) ) 286 AP( KC+K-1 ) = AP( KPC+KP-1 ) 290 AP( KC+K+K-1 ) = AP( KC+K+KP-1 ) 324 AP( KC ) = ONE / REAL( AP( KC ) ) 365 AP( KCNEXT ) = AP( KCNEXT ) - 386 AP( KC+J-K ) = CONJG( AP( KX ) ) 391 AP( KC ) = AP( KPC ) [all …]
|
H A D | zhptri.f | 228 AP( KC+K-1 ) = AP( KC+K-1 ) - 253 AP( KC+K-1 ) = AP( KC+K-1 ) - 261 AP( KCNEXT+K ) = AP( KCNEXT+K ) - 281 AP( KC+J-1 ) = DCONJG( AP( KX ) ) 286 AP( KC+K-1 ) = AP( KPC+KP-1 ) 290 AP( KC+K+K-1 ) = AP( KC+K+KP-1 ) 324 AP( KC ) = ONE / DBLE( AP( KC ) ) 359 AP( KCNEXT+1 ) = AP( KCNEXT+1 ) - 365 AP( KCNEXT ) = AP( KCNEXT ) - 391 AP( KC ) = AP( KPC ) [all …]
|
/dports/math/cblas/lapack-3.10.0/SRC/ |
H A D | zhptri.f | 225 AP( KC+K-1 ) = AP( KC+K-1 ) - 250 AP( KC+K-1 ) = AP( KC+K-1 ) - 258 AP( KCNEXT+K ) = AP( KCNEXT+K ) - 278 AP( KC+J-1 ) = DCONJG( AP( KX ) ) 283 AP( KC+K-1 ) = AP( KPC+KP-1 ) 287 AP( KC+K+K-1 ) = AP( KC+K+KP-1 ) 321 AP( KC ) = ONE / DBLE( AP( KC ) ) 356 AP( KCNEXT+1 ) = AP( KCNEXT+1 ) - 362 AP( KCNEXT ) = AP( KCNEXT ) - 388 AP( KC ) = AP( KPC ) [all …]
|
H A D | chptri.f | 225 AP( KC+K-1 ) = AP( KC+K-1 ) - 250 AP( KC+K-1 ) = AP( KC+K-1 ) - 258 AP( KCNEXT+K ) = AP( KCNEXT+K ) - 278 AP( KC+J-1 ) = CONJG( AP( KX ) ) 283 AP( KC+K-1 ) = AP( KPC+KP-1 ) 287 AP( KC+K+K-1 ) = AP( KC+K+KP-1 ) 321 AP( KC ) = ONE / REAL( AP( KC ) ) 362 AP( KCNEXT ) = AP( KCNEXT ) - 383 AP( KC+J-K ) = CONJG( AP( KX ) ) 388 AP( KC ) = AP( KPC ) [all …]
|