/dports/science/apbs/apbs-pdb2pqr-apbs-1.5-102-g500c1473/apbs/externals/fetk/punc/src/lapack/ |
H A D | zlaed8.c | 21 integer q_dim1, q_offset, q2_dim1, q2_offset, i__1; in zlaed8_() local 192 q2_dim1 = *ldq2; in zlaed8_() 193 q2_offset = 1 + q2_dim1; in zlaed8_() 287 zcopy_(qsiz, &q[perm[j] * q_dim1 + 1], &c__1, &q2[j * q2_dim1 + 1] in zlaed8_() 291 zlacpy_("A", qsiz, n, &q2[q2_dim1 + 1], ldq2, &q[q_dim1 + 1], ldq, ( in zlaed8_() 412 zcopy_(qsiz, &q[perm[j] * q_dim1 + 1], &c__1, &q2[j * q2_dim1 + 1], & in zlaed8_() 424 zlacpy_("A", qsiz, &i__1, &q2[(*k + 1) * q2_dim1 + 1], ldq2, &q[(*k + in zlaed8_()
|
H A D | claed8.c | 20 integer q_dim1, q_offset, q2_dim1, q2_offset, i__1; in claed8_() local 190 q2_dim1 = *ldq2; in claed8_() 191 q2_offset = 1 + q2_dim1; in claed8_() 285 ccopy_(qsiz, &q[perm[j] * q_dim1 + 1], &c__1, &q2[j * q2_dim1 + 1] in claed8_() 289 clacpy_("A", qsiz, n, &q2[q2_dim1 + 1], ldq2, &q[q_dim1 + 1], ldq, ( in claed8_() 410 ccopy_(qsiz, &q[perm[j] * q_dim1 + 1], &c__1, &q2[j * q2_dim1 + 1], & in claed8_() 422 clacpy_("A", qsiz, &i__1, &q2[(*k + 1) * q2_dim1 + 1], ldq2, &q[(*k + in claed8_()
|
H A D | dlaed8.c | 21 integer q_dim1, q_offset, q2_dim1, q2_offset, i__1; in dlaed8_() local 205 q2_dim1 = *ldq2; in dlaed8_() 206 q2_offset = 1 + q2_dim1; in dlaed8_() 308 dcopy_(qsiz, &q[perm[j] * q_dim1 + 1], &c__1, &q2[j * q2_dim1 in dlaed8_() 312 dlacpy_("A", qsiz, n, &q2[q2_dim1 + 1], ldq2, &q[q_dim1 + 1], ldq, in dlaed8_() 445 dcopy_(qsiz, &q[perm[j] * q_dim1 + 1], &c__1, &q2[j * q2_dim1 + 1] in dlaed8_() 462 dlacpy_("A", qsiz, &i__1, &q2[(*k + 1) * q2_dim1 + 1], ldq2, &q[(* in dlaed8_()
|
H A D | slaed8.c | 20 integer q_dim1, q_offset, q2_dim1, q2_offset, i__1; in slaed8_() local 203 q2_dim1 = *ldq2; in slaed8_() 204 q2_offset = 1 + q2_dim1; in slaed8_() 306 scopy_(qsiz, &q[perm[j] * q_dim1 + 1], &c__1, &q2[j * q2_dim1 in slaed8_() 310 slacpy_("A", qsiz, n, &q2[q2_dim1 + 1], ldq2, &q[q_dim1 + 1], ldq, in slaed8_() 443 scopy_(qsiz, &q[perm[j] * q_dim1 + 1], &c__1, &q2[j * q2_dim1 + 1] in slaed8_() 460 slacpy_("A", qsiz, &i__1, &q2[(*k + 1) * q2_dim1 + 1], ldq2, &q[(* in slaed8_()
|
/dports/math/libflame/libflame-5.2.0/src/map/lapack2flamec/f2c/c/ |
H A D | zlaed8.c | 221 integer q_dim1, q_offset, q2_dim1, q2_offset, i__1; in zlaed8_() local 266 q2_dim1 = *ldq2; in zlaed8_() 267 q2_offset = 1 + q2_dim1; in zlaed8_() 380 zcopy_(qsiz, &q[perm[j] * q_dim1 + 1], &c__1, &q2[j * q2_dim1 + 1] , &c__1); in zlaed8_() 383 zlacpy_("A", qsiz, n, &q2[q2_dim1 + 1], ldq2, &q[q_dim1 + 1], ldq); in zlaed8_() 503 zcopy_(qsiz, &q[perm[j] * q_dim1 + 1], &c__1, &q2[j * q2_dim1 + 1], & c__1); in zlaed8_() 513 … zlacpy_("A", qsiz, &i__1, &q2[(*k + 1) * q2_dim1 + 1], ldq2, &q[(*k + 1) * q_dim1 + 1], ldq); in zlaed8_()
|
H A D | claed8.c | 221 integer q_dim1, q_offset, q2_dim1, q2_offset, i__1; in claed8_() local 268 q2_dim1 = *ldq2; in claed8_() 269 q2_offset = 1 + q2_dim1; in claed8_() 382 ccopy_(qsiz, &q[perm[j] * q_dim1 + 1], &c__1, &q2[j * q2_dim1 + 1] , &c__1); in claed8_() 385 clacpy_("A", qsiz, n, &q2[q2_dim1 + 1], ldq2, &q[q_dim1 + 1], ldq); in claed8_() 505 ccopy_(qsiz, &q[perm[j] * q_dim1 + 1], &c__1, &q2[j * q2_dim1 + 1], & c__1); in claed8_() 515 … clacpy_("A", qsiz, &i__1, &q2[(*k + 1) * q2_dim1 + 1], ldq2, &q[(*k + 1) * q_dim1 + 1], ldq); in claed8_()
|
H A D | dlaed8.c | 235 integer q_dim1, q_offset, q2_dim1, q2_offset, i__1; in dlaed8_() local 281 q2_dim1 = *ldq2; in dlaed8_() 282 q2_offset = 1 + q2_dim1; in dlaed8_() 411 dcopy_(qsiz, &q[perm[j] * q_dim1 + 1], &c__1, &q2[j * q2_dim1 + 1], &c__1); in dlaed8_() 414 dlacpy_("A", qsiz, n, &q2[q2_dim1 + 1], ldq2, &q[q_dim1 + 1], ldq); in dlaed8_() 553 dcopy_(qsiz, &q[perm[j] * q_dim1 + 1], &c__1, &q2[j * q2_dim1 + 1] , &c__1); in dlaed8_() 571 … dlacpy_("A", qsiz, &i__1, &q2[(*k + 1) * q2_dim1 + 1], ldq2, &q[(* k + 1) * q_dim1 + 1], ldq); in dlaed8_()
|
H A D | slaed8.c | 235 integer q_dim1, q_offset, q2_dim1, q2_offset, i__1; in slaed8_() local 283 q2_dim1 = *ldq2; in slaed8_() 284 q2_offset = 1 + q2_dim1; in slaed8_() 413 scopy_(qsiz, &q[perm[j] * q_dim1 + 1], &c__1, &q2[j * q2_dim1 + 1], &c__1); in slaed8_() 416 slacpy_("A", qsiz, n, &q2[q2_dim1 + 1], ldq2, &q[q_dim1 + 1], ldq); in slaed8_() 555 scopy_(qsiz, &q[perm[j] * q_dim1 + 1], &c__1, &q2[j * q2_dim1 + 1] , &c__1); in slaed8_() 573 … slacpy_("A", qsiz, &i__1, &q2[(*k + 1) * q2_dim1 + 1], ldq2, &q[(* k + 1) * q_dim1 + 1], ldq); in slaed8_()
|
H A D | sorbdb5.c | 147 integer q1_dim1, q1_offset, q2_dim1, q2_offset, i__1, i__2; in sorbdb5_() local 180 q2_dim1 = *ldq2; in sorbdb5_() 181 q2_offset = 1 + q2_dim1; in sorbdb5_()
|
H A D | dorbdb5.c | 147 integer q1_dim1, q1_offset, q2_dim1, q2_offset, i__1, i__2; in dorbdb5_() local 180 q2_dim1 = *ldq2; in dorbdb5_() 181 q2_offset = 1 + q2_dim1; in dorbdb5_()
|
H A D | cunbdb5.c | 147 integer q1_dim1, q1_offset, q2_dim1, q2_offset, i__1, i__2, i__3; in cunbdb5_() local 181 q2_dim1 = *ldq2; in cunbdb5_() 182 q2_offset = 1 + q2_dim1; in cunbdb5_()
|
H A D | zunbdb5.c | 147 integer q1_dim1, q1_offset, q2_dim1, q2_offset, i__1, i__2, i__3; in zunbdb5_() local 181 q2_dim1 = *ldq2; in zunbdb5_() 182 q2_offset = 1 + q2_dim1; in zunbdb5_()
|
H A D | sorbdb6.c | 150 integer q1_dim1, q1_offset, q2_dim1, q2_offset, i__1; in sorbdb6_() local 183 q2_dim1 = *ldq2; in sorbdb6_() 184 q2_offset = 1 + q2_dim1; in sorbdb6_()
|
H A D | dorbdb6.c | 150 integer q1_dim1, q1_offset, q2_dim1, q2_offset, i__1; in dorbdb6_() local 183 q2_dim1 = *ldq2; in dorbdb6_() 184 q2_offset = 1 + q2_dim1; in dorbdb6_()
|
H A D | cunbdb6.c | 162 integer q1_dim1, q1_offset, q2_dim1, q2_offset, i__1, i__2; in cunbdb6_() local 195 q2_dim1 = *ldq2; in cunbdb6_() 196 q2_offset = 1 + q2_dim1; in cunbdb6_()
|
H A D | zunbdb6.c | 162 integer q1_dim1, q1_offset, q2_dim1, q2_offset, i__1, i__2; in zunbdb6_() local 195 q2_dim1 = *ldq2; in zunbdb6_() 196 q2_offset = 1 + q2_dim1; in zunbdb6_()
|
/dports/audio/praat/praat-6.2.03/external/clapack/ |
H A D | lapack_dlaq.cpp | 6473 integer q_dim1, q_offset, q2_dim1, q2_offset, i__1; 6641 q2_dim1 = *ldq2; 6642 q2_offset = 1 + q2_dim1; 6744 dcopy_(qsiz, &q[perm[j] * q_dim1 + 1], &c__1, &q2[j * q2_dim1 6748 dlacpy_("A", qsiz, n, &q2[q2_dim1 + 1], ldq2, &q[q_dim1 + 1], ldq); 6880 dcopy_(qsiz, &q[perm[j] * q_dim1 + 1], &c__1, &q2[j * q2_dim1 + 1] 6897 dlacpy_("A", qsiz, &i__1, &q2[(*k + 1) * q2_dim1 + 1], ldq2, &q[(*
|
/dports/math/py-numpy/numpy-1.20.3/numpy/linalg/lapack_lite/ |
H A D | f2c_c_lapack.c | 10025 integer q_dim1, q_offset, q2_dim1, q2_offset, i__1; in claed8_() local 10179 q2_dim1 = *ldq2; in claed8_() 10180 q2_offset = 1 + q2_dim1; in claed8_() 10285 ccopy_(qsiz, &q[perm[j] * q_dim1 + 1], &c__1, &q2[j * q2_dim1 + 1] in claed8_() 10289 clacpy_("A", qsiz, n, &q2[q2_dim1 + 1], ldq2, &q[q_dim1 + 1], ldq); in claed8_() 10414 ccopy_(qsiz, &q[perm[j] * q_dim1 + 1], &c__1, &q2[j * q2_dim1 + 1], & in claed8_() 10428 clacpy_("A", qsiz, &i__1, &q2[(*k + 1) * q2_dim1 + 1], ldq2, &q[(*k + in claed8_()
|
H A D | f2c_z_lapack.c | 10084 integer q_dim1, q_offset, q2_dim1, q2_offset, i__1; in zlaed8_() local 10237 q2_dim1 = *ldq2; in zlaed8_() 10238 q2_offset = 1 + q2_dim1; in zlaed8_() 10343 zcopy_(qsiz, &q[perm[j] * q_dim1 + 1], &c__1, &q2[j * q2_dim1 + 1] in zlaed8_() 10347 zlacpy_("A", qsiz, n, &q2[q2_dim1 + 1], ldq2, &q[q_dim1 + 1], ldq); in zlaed8_() 10472 zcopy_(qsiz, &q[perm[j] * q_dim1 + 1], &c__1, &q2[j * q2_dim1 + 1], & in zlaed8_() 10486 zlacpy_("A", qsiz, &i__1, &q2[(*k + 1) * q2_dim1 + 1], ldq2, &q[(*k + in zlaed8_()
|
H A D | f2c_d_lapack.c | 11921 integer q_dim1, q_offset, q2_dim1, q2_offset, i__1; in dlaed8_() local 12086 q2_dim1 = *ldq2; in dlaed8_() 12087 q2_offset = 1 + q2_dim1; in dlaed8_() 12200 dcopy_(qsiz, &q[perm[j] * q_dim1 + 1], &c__1, &q2[j * q2_dim1 in dlaed8_() 12204 dlacpy_("A", qsiz, n, &q2[q2_dim1 + 1], ldq2, &q[q_dim1 + 1], ldq); in dlaed8_() 12341 dcopy_(qsiz, &q[perm[j] * q_dim1 + 1], &c__1, &q2[j * q2_dim1 + 1] in dlaed8_() 12360 dlacpy_("A", qsiz, &i__1, &q2[(*k + 1) * q2_dim1 + 1], ldq2, &q[(* in dlaed8_()
|
H A D | f2c_s_lapack.c | 11884 integer q_dim1, q_offset, q2_dim1, q2_offset, i__1; in slaed8_() local 12050 q2_dim1 = *ldq2; in slaed8_() 12051 q2_offset = 1 + q2_dim1; in slaed8_() 12164 scopy_(qsiz, &q[perm[j] * q_dim1 + 1], &c__1, &q2[j * q2_dim1 in slaed8_() 12168 slacpy_("A", qsiz, n, &q2[q2_dim1 + 1], ldq2, &q[q_dim1 + 1], ldq); in slaed8_() 12305 scopy_(qsiz, &q[perm[j] * q_dim1 + 1], &c__1, &q2[j * q2_dim1 + 1] in slaed8_() 12324 slacpy_("A", qsiz, &i__1, &q2[(*k + 1) * q2_dim1 + 1], ldq2, &q[(* in slaed8_()
|