| /dports/science/apbs/apbs-pdb2pqr-apbs-1.5-102-g500c1473/apbs/externals/fetk/punc/src/lapack/src_f77/ |
| H A D | zhpgst.f | 19 * ZHPGST reduces a complex Hermitian-definite generalized argument
67 DOUBLE PRECISION ONE, HALF
69 COMPLEX*16 CONE
74 INTEGER J, J1, J1J1, JJ, K, K1, K1K1, KK local
75 DOUBLE PRECISION AJJ, AKK, BJJ, BKK
76 COMPLEX*16 CT
104 CALL XERBLA( 'ZHPGST', -INFO ) argument
131 10 CONTINUE
159 20 CONTINUE
186 30 CONTINUE
[all …]
|
| /dports/math/lapack/lapack-3.10.0/SRC/ |
| H A D | zhpgst.f | 120 INTEGER INFO, ITYPE, N
123 COMPLEX*16 AP( * ), BP( * )
129 DOUBLE PRECISION ONE, HALF
136 INTEGER J, J1, J1J1, JJ, K, K1, K1K1, KK local
137 DOUBLE PRECISION AJJ, AKK, BJJ, BKK
138 COMPLEX*16 CT
166 CALL XERBLA( 'ZHPGST', -INFO ) argument
193 10 CONTINUE
221 20 CONTINUE
248 30 CONTINUE
[all …]
|
| /dports/math/openblas/OpenBLAS-0.3.18/lapack-netlib/SRC/ |
| H A D | zhpgst.f | 123 INTEGER INFO, ITYPE, N
126 COMPLEX*16 AP( * ), BP( * )
132 DOUBLE PRECISION ONE, HALF
139 INTEGER J, J1, J1J1, JJ, K, K1, K1K1, KK local
140 DOUBLE PRECISION AJJ, AKK, BJJ, BKK
141 COMPLEX*16 CT
169 CALL XERBLA( 'ZHPGST', -INFO ) argument
196 10 CONTINUE
224 20 CONTINUE
251 30 CONTINUE
[all …]
|
| /dports/math/xlife++/xlifepp-sources-v2.0.1-2018-05-09/ext/LAPACKBLAS/SRC/ |
| H A D | zhpgst.f | 114 SUBROUTINE ZHPGST( ITYPE, UPLO, N, AP, BP, INFO ) subroutine
196 10 CONTINUE
224 20 CONTINUE
251 30 CONTINUE
279 * End of ZHPGST argument
|
| /dports/math/xlapack/lapack-3.10.0/SRC/ |
| H A D | zhpgst.f | 112 SUBROUTINE ZHPGST( ITYPE, UPLO, N, AP, BP, INFO ) subroutine
193 10 CONTINUE
221 20 CONTINUE
248 30 CONTINUE
276 * End of ZHPGST argument
|
| /dports/math/blas/lapack-3.10.0/SRC/ |
| H A D | zhpgst.f | 112 SUBROUTINE ZHPGST( ITYPE, UPLO, N, AP, BP, INFO ) subroutine
193 10 CONTINUE
221 20 CONTINUE
248 30 CONTINUE
276 * End of ZHPGST argument
|
| /dports/math/lapacke/lapack-3.10.0/SRC/ |
| H A D | zhpgst.f | 112 SUBROUTINE ZHPGST( ITYPE, UPLO, N, AP, BP, INFO ) subroutine
193 10 CONTINUE
221 20 CONTINUE
248 30 CONTINUE
276 * End of ZHPGST argument
|
| /dports/science/elk/elk-7.2.42/src/LAPACK/ |
| H A D | zhpgst.f | 114 SUBROUTINE ZHPGST( ITYPE, UPLO, N, AP, BP, INFO ) subroutine
196 10 CONTINUE
224 20 CONTINUE
251 30 CONTINUE
279 * End of ZHPGST argument
|
| /dports/science/elmerfem/elmerfem-release-9.0/mathlibs/src/lapack/ |
| H A D | zhpgst.f | 1 SUBROUTINE ZHPGST( ITYPE, UPLO, N, AP, BP, INFO ) subroutine
131 10 CONTINUE
159 20 CONTINUE
186 30 CONTINUE
214 * End of ZHPGST argument
|
| /dports/math/cblas/lapack-3.10.0/SRC/ |
| H A D | zhpgst.f | 112 SUBROUTINE ZHPGST( ITYPE, UPLO, N, AP, BP, INFO ) subroutine
193 10 CONTINUE
221 20 CONTINUE
248 30 CONTINUE
276 * End of ZHPGST argument
|
| /dports/science/siesta/siesta-4.1.5/Src/Libs/ |
| H A D | lapack.F | 34343 SUBROUTINE ZHPGST( ITYPE, UPLO, N, AP, BP, INFO ) subroutine
34344 CHARACTER UPLO
34345 INTEGER INFO, ITYPE, N
34346 COMPLEX*16 AP( * ), BP( * )
34347 DOUBLE PRECISION ONE, HALF
34371 CALL XERBLA( 'ZHPGST', -INFO ) argument
34389 10 CONTINUE
34409 20 CONTINUE
34428 30 CONTINUE
34460 EXTERNAL XERBLA, ZHPEV, ZHPGST, ZPPTRF, ZTPMV, ZTPSV argument
|