| /dports/science/apbs/apbs-pdb2pqr-apbs-1.5-102-g500c1473/apbs/externals/fetk/punc/src/lapack/src_f77/ |
| H A D | zhptri.f | 20 * ZHPTRI computes the inverse of a complex Hermitian indefinite matrix argument
64 COMPLEX*16 CONE, ZERO
70 INTEGER J, K, KC, KCNEXT, KP, KPC, KSTEP, KX, NPP
71 DOUBLE PRECISION AK, AKP1, D, T local
72 COMPLEX*16 AKKP1, TEMP
97 CALL XERBLA( 'ZHPTRI', -INFO ) argument
117 10 CONTINUE
127 20 CONTINUE
140 30 CONTINUE
232 50 CONTINUE
[all …]
|
| /dports/math/lapack/lapack-3.10.0/SRC/ |
| H A D | zhptri.f | 116 INTEGER INFO, N
120 COMPLEX*16 AP( * ), WORK( * )
127 COMPLEX*16 CONE, ZERO
133 INTEGER J, K, KC, KCNEXT, KP, KPC, KSTEP, KX, NPP
134 DOUBLE PRECISION AK, AKP1, D, T local
135 COMPLEX*16 AKKP1, TEMP
160 CALL XERBLA( 'ZHPTRI', -INFO ) argument
180 10 CONTINUE
190 20 CONTINUE
203 30 CONTINUE
[all …]
|
| /dports/math/openblas/OpenBLAS-0.3.18/lapack-netlib/SRC/ |
| H A D | zhptri.f | 119 INTEGER INFO, N
123 COMPLEX*16 AP( * ), WORK( * )
130 COMPLEX*16 CONE, ZERO
136 INTEGER J, K, KC, KCNEXT, KP, KPC, KSTEP, KX, NPP
137 DOUBLE PRECISION AK, AKP1, D, T local
138 COMPLEX*16 AKKP1, TEMP
163 CALL XERBLA( 'ZHPTRI', -INFO ) argument
183 10 CONTINUE
193 20 CONTINUE
206 30 CONTINUE
[all …]
|
| /dports/math/xlife++/xlifepp-sources-v2.0.1-2018-05-09/ext/LAPACKBLAS/SRC/ |
| H A D | zhptri.f | 110 SUBROUTINE ZHPTRI( UPLO, N, AP, IPIV, WORK, INFO ) subroutine
183 10 CONTINUE
193 20 CONTINUE
206 30 CONTINUE
283 40 CONTINUE
298 50 CONTINUE
310 60 CONTINUE
408 * End of ZHPTRI argument
|
| /dports/math/xlapack/lapack-3.10.0/SRC/ |
| H A D | zhptri.f | 108 SUBROUTINE ZHPTRI( UPLO, N, AP, IPIV, WORK, INFO ) subroutine
180 10 CONTINUE
190 20 CONTINUE
203 30 CONTINUE
280 40 CONTINUE
295 50 CONTINUE
307 60 CONTINUE
405 * End of ZHPTRI argument
|
| /dports/math/blas/lapack-3.10.0/SRC/ |
| H A D | zhptri.f | 108 SUBROUTINE ZHPTRI( UPLO, N, AP, IPIV, WORK, INFO ) subroutine
180 10 CONTINUE
190 20 CONTINUE
203 30 CONTINUE
280 40 CONTINUE
295 50 CONTINUE
307 60 CONTINUE
405 * End of ZHPTRI argument
|
| /dports/math/lapacke/lapack-3.10.0/SRC/ |
| H A D | zhptri.f | 108 SUBROUTINE ZHPTRI( UPLO, N, AP, IPIV, WORK, INFO ) subroutine
180 10 CONTINUE
190 20 CONTINUE
203 30 CONTINUE
280 40 CONTINUE
295 50 CONTINUE
307 60 CONTINUE
405 * End of ZHPTRI argument
|
| /dports/science/elmerfem/elmerfem-release-9.0/mathlibs/src/lapack/ |
| H A D | zhptri.f | 1 SUBROUTINE ZHPTRI( UPLO, N, AP, IPIV, WORK, INFO ) subroutine
117 10 CONTINUE
127 20 CONTINUE
140 30 CONTINUE
217 40 CONTINUE
232 50 CONTINUE
244 60 CONTINUE
342 * End of ZHPTRI argument
|
| /dports/math/cblas/lapack-3.10.0/SRC/ |
| H A D | zhptri.f | 108 SUBROUTINE ZHPTRI( UPLO, N, AP, IPIV, WORK, INFO ) subroutine
180 10 CONTINUE
190 20 CONTINUE
203 30 CONTINUE
280 40 CONTINUE
295 50 CONTINUE
307 60 CONTINUE
405 * End of ZHPTRI argument
|