| /dports/science/apbs/apbs-pdb2pqr-apbs-1.5-102-g500c1473/apbs/externals/fetk/punc/src/lapack/ |
| H A D | dlaed9.c | 14 rho, doublereal *dlamda, doublereal *w, doublereal *s, integer *lds, in dlaed9_() argument
132 --dlamda; in dlaed9_()
185 dlamda[i__] = dlamc3_(&dlamda[i__], &dlamda[i__]) - dlamda[i__]; in dlaed9_()
191 dlaed4_(k, &j, &dlamda[1], &w[1], &q[j * q_dim1 + 1], rho, &d__[j], in dlaed9_()
227 w[i__] *= q[i__ + j * q_dim1] / (dlamda[i__] - dlamda[j]); in dlaed9_()
232 w[i__] *= q[i__ + j * q_dim1] / (dlamda[i__] - dlamda[j]); in dlaed9_()
|
| H A D | slaed9.c | 13 integer *n, real *d__, real *q, integer *ldq, real *rho, real *dlamda, in slaed9_() argument
130 --dlamda; in slaed9_()
183 dlamda[i__] = slamc3_(&dlamda[i__], &dlamda[i__]) - dlamda[i__]; in slaed9_()
189 slaed4_(k, &j, &dlamda[1], &w[1], &q[j * q_dim1 + 1], rho, &d__[j], in slaed9_()
225 w[i__] *= q[i__ + j * q_dim1] / (dlamda[i__] - dlamda[j]); in slaed9_()
230 w[i__] *= q[i__ + j * q_dim1] / (dlamda[i__] - dlamda[j]); in slaed9_()
|
| H A D | dlaed3.c | 15 d__, doublereal *q, integer *ldq, doublereal *rho, doublereal *dlamda, in dlaed3_() argument
171 --dlamda; in dlaed3_()
219 dlamda[i__] = dlamc3_(&dlamda[i__], &dlamda[i__]) - dlamda[i__]; in dlaed3_()
225 dlaed4_(k, &j, &dlamda[1], &w[1], &q[j * q_dim1 + 1], rho, &d__[j], in dlaed3_()
265 w[i__] *= q[i__ + j * q_dim1] / (dlamda[i__] - dlamda[j]); in dlaed3_()
270 w[i__] *= q[i__ + j * q_dim1] / (dlamda[i__] - dlamda[j]); in dlaed3_()
|
| H A D | slaed3.c | 15 real *q, integer *ldq, real *rho, real *dlamda, real *q2, integer * in slaed3_() argument
168 --dlamda; in slaed3_()
216 dlamda[i__] = slamc3_(&dlamda[i__], &dlamda[i__]) - dlamda[i__]; in slaed3_()
222 slaed4_(k, &j, &dlamda[1], &w[1], &q[j * q_dim1 + 1], rho, &d__[j], in slaed3_()
262 w[i__] *= q[i__ + j * q_dim1] / (dlamda[i__] - dlamda[j]); in slaed3_()
267 w[i__] *= q[i__ + j * q_dim1] / (dlamda[i__] - dlamda[j]); in slaed3_()
|
| H A D | dlaed8.c | 15 doublereal *rho, integer *cutpnt, doublereal *z__, doublereal *dlamda, in dlaed8_() argument
204 --dlamda; in dlaed8_()
271 dlamda[i__] = d__[indxq[i__]]; in dlaed8_()
277 dlamrg_(&n1, &n2, &dlamda[1], &c__1, &c__1, &indx[1]); in dlaed8_()
280 d__[i__] = dlamda[indx[i__]]; in dlaed8_()
409 dlamda[*k] = d__[jlam]; in dlaed8_()
421 dlamda[*k] = d__[jlam]; in dlaed8_()
435 dlamda[j] = d__[jp]; in dlaed8_()
443 dlamda[j] = d__[jp]; in dlaed8_()
457 dcopy_(&i__1, &dlamda[*k + 1], &c__1, &d__[*k + 1], &c__1); in dlaed8_()
[all …]
|
| H A D | slaed8.c | 15 integer *cutpnt, real *z__, real *dlamda, real *q2, integer *ldq2, in slaed8_() argument
202 --dlamda; in slaed8_()
269 dlamda[i__] = d__[indxq[i__]]; in slaed8_()
275 slamrg_(&n1, &n2, &dlamda[1], &c__1, &c__1, &indx[1]); in slaed8_()
278 d__[i__] = dlamda[indx[i__]]; in slaed8_()
407 dlamda[*k] = d__[jlam]; in slaed8_()
419 dlamda[*k] = d__[jlam]; in slaed8_()
433 dlamda[j] = d__[jp]; in slaed8_()
441 dlamda[j] = d__[jp]; in slaed8_()
455 scopy_(&i__1, &dlamda[*k + 1], &c__1, &d__[*k + 1], &c__1); in slaed8_()
[all …]
|
| H A D | zlaed8.c | 15 integer *cutpnt, doublereal *z__, doublereal *dlamda, doublecomplex * in zlaed8_() argument
191 --dlamda; in zlaed8_()
257 dlamda[i__] = d__[indxq[i__]]; in zlaed8_()
263 dlamrg_(&n1, &n2, &dlamda[1], &c__1, &c__1, &indx[1]); in zlaed8_()
266 d__[i__] = dlamda[indx[i__]]; in zlaed8_()
385 dlamda[*k] = d__[jlam]; in zlaed8_()
397 dlamda[*k] = d__[jlam]; in zlaed8_()
410 dlamda[j] = d__[jp]; in zlaed8_()
422 dcopy_(&i__1, &dlamda[*k + 1], &c__1, &d__[*k + 1], &c__1); in zlaed8_()
|
| H A D | claed8.c | 15 real *dlamda, complex *q2, integer *ldq2, real *w, integer *indxp, in claed8_() argument
189 --dlamda; in claed8_()
255 dlamda[i__] = d__[indxq[i__]]; in claed8_()
261 slamrg_(&n1, &n2, &dlamda[1], &c__1, &c__1, &indx[1]); in claed8_()
264 d__[i__] = dlamda[indx[i__]]; in claed8_()
383 dlamda[*k] = d__[jlam]; in claed8_()
395 dlamda[*k] = d__[jlam]; in claed8_()
408 dlamda[j] = d__[jp]; in claed8_()
420 scopy_(&i__1, &dlamda[*k + 1], &c__1, &d__[*k + 1], &c__1); in claed8_()
|
| H A D | slaed2.c | 15 dlamda, real *w, real *q2, integer *indx, integer *indxc, integer * in slaed2_()
189 --dlamda; in slaed2_()
252 dlamda[i__] = d__[indxq[i__]]; in slaed2_()
255 slamrg_(n1, &n2, &dlamda[1], &c__1, &c__1, &indxc[1]); in slaed2_()
283 dlamda[j] = d__[i__]; in slaed2_()
288 scopy_(n, &dlamda[1], &c__1, &d__[1], &c__1); in slaed2_()
399 dlamda[*k] = d__[pj]; in slaed2_()
411 dlamda[*k] = d__[pj]; in slaed2_()
|
| H A D | dlaed2.c | 15 doublereal *z__, doublereal *dlamda, doublereal *w, doublereal *q2, in dlaed2_() argument
193 --dlamda; in dlaed2_()
256 dlamda[i__] = d__[indxq[i__]]; in dlaed2_()
259 dlamrg_(n1, &n2, &dlamda[1], &c__1, &c__1, &indxc[1]); in dlaed2_()
287 dlamda[j] = d__[i__]; in dlaed2_()
292 dcopy_(n, &dlamda[1], &c__1, &d__[1], &c__1); in dlaed2_()
403 dlamda[*k] = d__[pj]; in dlaed2_()
415 dlamda[*k] = d__[pj]; in dlaed2_()
|
| /dports/math/libflame/libflame-5.2.0/src/map/lapack2flamec/f2c/c/ |
| H A D | dlaed9.c | 145 …blereal *d__, doublereal *q, integer *ldq, doublereal * rho, doublereal *dlamda, doublereal *w, do… in dlaed9_() argument
185 --dlamda; in dlaed9_()
249 dlamda[i__] = dlamc3_(&dlamda[i__], &dlamda[i__]) - dlamda[i__]; in dlaed9_()
257 dlaed4_(k, &j, &dlamda[1], &w[1], &q[j * q_dim1 + 1], rho, &d__[j], info); in dlaed9_()
299 w[i__] *= q[i__ + j * q_dim1] / (dlamda[i__] - dlamda[j]); in dlaed9_()
307 w[i__] *= q[i__ + j * q_dim1] / (dlamda[i__] - dlamda[j]); in dlaed9_()
|
| H A D | slaed9.c | 145 …r *kstop, integer *n, real *d__, real *q, integer *ldq, real *rho, real *dlamda, real *w, real *s,… in slaed9_() argument
185 --dlamda; in slaed9_()
249 dlamda[i__] = slamc3_(&dlamda[i__], &dlamda[i__]) - dlamda[i__]; in slaed9_()
257 slaed4_(k, &j, &dlamda[1], &w[1], &q[j * q_dim1 + 1], rho, &d__[j], info); in slaed9_()
299 w[i__] *= q[i__ + j * q_dim1] / (dlamda[i__] - dlamda[j]); in slaed9_()
307 w[i__] *= q[i__ + j * q_dim1] / (dlamda[i__] - dlamda[j]); in slaed9_()
|
| H A D | dlaed3.c | 177 …blereal * d__, doublereal *q, integer *ldq, doublereal *rho, doublereal *dlamda, doublereal *q2, i… in dlaed3_() argument
219 --dlamda; in dlaed3_()
272 dlamda[i__] = dlamc3_(&dlamda[i__], &dlamda[i__]) - dlamda[i__]; in dlaed3_()
280 dlaed4_(k, &j, &dlamda[1], &w[1], &q[j * q_dim1 + 1], rho, &d__[j], info); in dlaed3_()
324 w[i__] *= q[i__ + j * q_dim1] / (dlamda[i__] - dlamda[j]); in dlaed3_()
332 w[i__] *= q[i__ + j * q_dim1] / (dlamda[i__] - dlamda[j]); in dlaed3_()
|
| H A D | slaed3.c | 177 …eger *n, integer *n1, real *d__, real *q, integer *ldq, real *rho, real *dlamda, real *q2, integer… in slaed3_() argument
219 --dlamda; in slaed3_()
272 dlamda[i__] = slamc3_(&dlamda[i__], &dlamda[i__]) - dlamda[i__]; in slaed3_()
280 slaed4_(k, &j, &dlamda[1], &w[1], &q[j * q_dim1 + 1], rho, &d__[j], info); in slaed3_()
324 w[i__] *= q[i__ + j * q_dim1] / (dlamda[i__] - dlamda[j]); in slaed3_()
332 w[i__] *= q[i__ + j * q_dim1] / (dlamda[i__] - dlamda[j]); in slaed3_()
|
| H A D | dlaed8.c | 232 …r *indxq, doublereal *rho, integer *cutpnt, doublereal *z__, doublereal *dlamda, doublereal *q2, i… in dlaed8_() argument
280 --dlamda; in dlaed8_()
365 dlamda[i__] = d__[indxq[i__]]; in dlaed8_()
371 dlamrg_(&n1, &n2, &dlamda[1], &c__1, &c__1, &indx[1]); in dlaed8_()
377 d__[i__] = dlamda[indx[i__]]; in dlaed8_()
515 dlamda[*k] = d__[jlam]; in dlaed8_()
524 dlamda[*k] = d__[jlam]; in dlaed8_()
538 dlamda[j] = d__[jp]; in dlaed8_()
551 dlamda[j] = d__[jp]; in dlaed8_()
564 dcopy_(&i__1, &dlamda[*k + 1], &c__1, &d__[*k + 1], &c__1); in dlaed8_()
[all …]
|
| H A D | slaed8.c | 232 …teger *ldq, integer *indxq, real *rho, integer *cutpnt, real *z__, real *dlamda, real *q2, integer… in slaed8_() argument
282 --dlamda; in slaed8_()
367 dlamda[i__] = d__[indxq[i__]]; in slaed8_()
373 slamrg_(&n1, &n2, &dlamda[1], &c__1, &c__1, &indx[1]); in slaed8_()
379 d__[i__] = dlamda[indx[i__]]; in slaed8_()
517 dlamda[*k] = d__[jlam]; in slaed8_()
526 dlamda[*k] = d__[jlam]; in slaed8_()
540 dlamda[j] = d__[jp]; in slaed8_()
553 dlamda[j] = d__[jp]; in slaed8_()
566 scopy_(&i__1, &dlamda[*k + 1], &c__1, &d__[*k + 1], &c__1); in slaed8_()
[all …]
|
| H A D | zlaed8.c | 218 …eal *d__, doublereal *rho, integer *cutpnt, doublereal *z__, doublereal *dlamda, doublecomplex * q… in zlaed8_() argument
265 --dlamda; in zlaed8_()
347 dlamda[i__] = d__[indxq[i__]]; in zlaed8_()
353 dlamrg_(&n1, &n2, &dlamda[1], &c__1, &c__1, &indx[1]); in zlaed8_()
359 d__[i__] = dlamda[indx[i__]]; in zlaed8_()
480 dlamda[*k] = d__[jlam]; in zlaed8_()
489 dlamda[*k] = d__[jlam]; in zlaed8_()
501 dlamda[j] = d__[jp]; in zlaed8_()
511 dcopy_(&i__1, &dlamda[*k + 1], &c__1, &d__[*k + 1], &c__1); in zlaed8_()
|
| H A D | claed8.c | 218 …q, integer *ldq, real *d__, real *rho, integer *cutpnt, real *z__, real *dlamda, complex *q2, inte… in claed8_() argument
267 --dlamda; in claed8_()
349 dlamda[i__] = d__[indxq[i__]]; in claed8_()
355 slamrg_(&n1, &n2, &dlamda[1], &c__1, &c__1, &indx[1]); in claed8_()
361 d__[i__] = dlamda[indx[i__]]; in claed8_()
482 dlamda[*k] = d__[jlam]; in claed8_()
491 dlamda[*k] = d__[jlam]; in claed8_()
503 dlamda[j] = d__[jp]; in claed8_()
513 scopy_(&i__1, &dlamda[*k + 1], &c__1, &d__[*k + 1], &c__1); in claed8_()
|
| H A D | slaed2.c | 206 …d__, real *q, integer *ldq, integer *indxq, real *rho, real *z__, real * dlamda, real *w, real *q2… in slaed2_() argument
258 --dlamda; in slaed2_()
323 dlamda[i__] = d__[indxq[i__]]; in slaed2_()
326 slamrg_(n1, &n2, &dlamda[1], &c__1, &c__1, &indxc[1]); in slaed2_()
357 dlamda[j] = d__[i__]; in slaed2_()
362 scopy_(n, &dlamda[1], &c__1, &d__[1], &c__1); in slaed2_()
485 dlamda[*k] = d__[pj]; in slaed2_()
494 dlamda[*k] = d__[pj]; in slaed2_()
|
| H A D | dlaed2.c | 206 …eger *ldq, integer *indxq, doublereal *rho, doublereal *z__, doublereal *dlamda, doublereal *w, do… in dlaed2_() argument
259 --dlamda; in dlaed2_()
324 dlamda[i__] = d__[indxq[i__]]; in dlaed2_()
327 dlamrg_(n1, &n2, &dlamda[1], &c__1, &c__1, &indxc[1]); in dlaed2_()
358 dlamda[j] = d__[i__]; in dlaed2_()
363 dcopy_(n, &dlamda[1], &c__1, &d__[1], &c__1); in dlaed2_()
486 dlamda[*k] = d__[pj]; in dlaed2_()
495 dlamda[*k] = d__[pj]; in dlaed2_()
|
| /dports/science/votca/votca-2021.2-18560-gfbe18d971/csg/src/tools/ |
| H A D | csg_reupdate.cc | 315 Eigen::VectorXd dlamda = cholesky.solve(-DS_); in REUpdateLamda() local
348 dlamda = -DS_; in REUpdateLamda()
352 lamda_ = lamda_ + relax_ * dlamda; in REUpdateLamda()
|
| /dports/science/votca/votca-2021.2-18560-gfbe18d971/csg/csg-da5c1dc/src/tools/ |
| H A D | csg_reupdate.cc | 315 Eigen::VectorXd dlamda = cholesky.solve(-DS_); in REUpdateLamda() local
348 dlamda = -DS_; in REUpdateLamda()
352 lamda_ = lamda_ + relax_ * dlamda; in REUpdateLamda()
|
| /dports/audio/praat/praat-6.2.03/external/clapack/ |
| H A D | lapack_dlaq.cpp | 4072 --dlamda;
4294 dlamda[*k] = d__[pj];
4555 --dlamda;
4603 dlamda[i__] = dlamc3_(&dlamda[i__], &dlamda[i__]) - dlamda[i__];
4649 w[i__] *= q[i__ + j * q_dim1] / (dlamda[i__] - dlamda[j]);
4654 w[i__] *= q[i__ + j * q_dim1] / (dlamda[i__] - dlamda[j]);
6640 --dlamda;
7020 --dlamda;
7073 dlamda[i__] = dlamc3_(&dlamda[i__], &dlamda[i__]) - dlamda[i__];
7115 w[i__] *= q[i__ + j * q_dim1] / (dlamda[i__] - dlamda[j]);
[all …]
|
| /dports/math/tmv/tmv-0.75/src/ |
| H A D | flapack.h | 813 float *dlamda, void *q2, int *ldq2, float *w, int *indxp,
1725 double *z__, double *dlamda, double *w, double *q2,
1730 d__, double *q, int *ldq, double *rho, double *dlamda,
1754 double *rho, int *cutpnt, double *z__, double *dlamda,
1761 rho, double *dlamda, double *w, double *s, int *lds,
2990 dlamda, float *w, float *q2, int *indx, int *indxc, int *
2994 float *q, int *ldq, float *rho, float *dlamda, float *q2, int *
3015 int *cutpnt, float *z__, float *dlamda, float *q2, int *ldq2,
3020 int *n, float *d__, float *q, int *ldq, float *rho, float *dlamda,
4357 int *cutpnt, double *z__, double *dlamda, void *
|
| /dports/math/gretl/gretl-2021d/lib/src/ |
| H A D | clapack_double.h | 383 double *z__, double *dlamda, double *w, double *q2,
388 d__, double *q, integer *ldq, double *rho, double *dlamda,
412 double *rho, integer *cutpnt, double *z__, double *dlamda,
419 rho, double *dlamda, double *w, double *s, integer *lds,
|