| /dports/science/dakota/dakota-6.13.0-release-public.src-UI/packages/external/acro/packages/interfaces/src/libs/ |
| H A D | OPTpp.cpp | 575 : nlf(NULL)
581 { if (nlf) delete nlf; }
587 if (nlf) delete nlf;
588 nlf = new NLF0;
594 : nlf(NULL)
600 { if (nlf) delete nlf; }
605 if (nlf) delete nlf;
606 nlf = new NLF1;
612 : nlf(NULL)
618 { if (nlf) delete nlf; }
[all …]
|
| /dports/math/libflame/libflame-5.2.0/src/map/lapack2flamec/f2c/c/ |
| H A D | dlalsa.c | 266 …integer i__, j, i1, ic, lf, nd, ll, nl, nr, im1, nlf, nrf, lvl, ndb1, nlp1, lvl2, nrp1, nlvl, sqre; in dlalsa_() local
399 nlf = ic - nl; in dlalsa_()
401 …dgemm_("T", "N", &nl, nrhs, &nl, &c_b7, &u[nlf + u_dim1], ldu, &b[nlf + b_dim1], ldb, &c_b8, &bx[n… in dlalsa_()
447 nlf = ic - nl; in dlalsa_()
450 …nlf + bx_dim1], ldbx, & b[nlf + b_dim1], ldb, &perm[nlf + lvl * perm_dim1], & givptr[j], &givcol[n… in dlalsa_()
488 nlf = ic - nl; in dlalsa_()
499 …nlf + b_dim1], ldb, &bx[ nlf + bx_dim1], ldbx, &perm[nlf + lvl * perm_dim1], & givptr[j], &givcol[… in dlalsa_()
526 nlf = ic - nl; in dlalsa_()
528 …gemm_("T", "N", &nlp1, nrhs, &nlp1, &c_b7, &vt[nlf + vt_dim1], ldu, & b[nlf + b_dim1], ldb, &c_b8,… in dlalsa_()
|
| H A D | slalsa.c | 266 …integer i__, j, i1, ic, lf, nd, ll, nl, nr, im1, nlf, nrf, lvl, ndb1, nlp1, lvl2, nrp1, nlvl, sqre… in slalsa_() local
399 nlf = ic - nl; in slalsa_()
401 …sgemm_("T", "N", &nl, nrhs, &nl, &c_b7, &u[nlf + u_dim1], ldu, &b[nlf + b_dim1], ldb, &c_b8, &bx[n… in slalsa_()
447 nlf = ic - nl; in slalsa_()
450 …nlf + bx_dim1], ldbx, & b[nlf + b_dim1], ldb, &perm[nlf + lvl * perm_dim1], & givptr[j], &givcol[n… in slalsa_()
488 nlf = ic - nl; in slalsa_()
499 …nlf + b_dim1], ldb, &bx[ nlf + bx_dim1], ldbx, &perm[nlf + lvl * perm_dim1], & givptr[j], &givcol[… in slalsa_()
526 nlf = ic - nl; in slalsa_()
528 …gemm_("T", "N", &nlp1, nrhs, &nlp1, &c_b7, &vt[nlf + vt_dim1], ldu, & b[nlf + b_dim1], ldb, &c_b8,… in slalsa_()
|
| H A D | zlalsa.c | 402 nlf = ic - nl; in zlalsa_()
415 for (jrow = nlf; in zlalsa_()
434 for (jrow = nlf; in zlalsa_()
453 for (jrow = nlf; in zlalsa_()
580 nlf = ic - nl; in zlalsa_()
583 …nlf + bx_dim1], ldbx, & b[nlf + b_dim1], ldb, &perm[nlf + lvl * perm_dim1], & givptr[j], &givcol[n… in zlalsa_()
621 nlf = ic - nl; in zlalsa_()
632 …nlf + b_dim1], ldb, &bx[ nlf + bx_dim1], ldbx, &perm[nlf + lvl * perm_dim1], & givptr[j], &givcol[… in zlalsa_()
659 nlf = ic - nl; in zlalsa_()
672 for (jrow = nlf; in zlalsa_()
[all …]
|
| H A D | clalsa.c | 402 nlf = ic - nl; in clalsa_()
415 for (jrow = nlf; in clalsa_()
434 for (jrow = nlf; in clalsa_()
453 for (jrow = nlf; in clalsa_()
580 nlf = ic - nl; in clalsa_()
583 …nlf + bx_dim1], ldbx, & b[nlf + b_dim1], ldb, &perm[nlf + lvl * perm_dim1], & givptr[j], &givcol[n… in clalsa_()
621 nlf = ic - nl; in clalsa_()
632 …nlf + b_dim1], ldb, &bx[ nlf + bx_dim1], ldbx, &perm[nlf + lvl * perm_dim1], & givptr[j], &givcol[… in clalsa_()
659 nlf = ic - nl; in clalsa_()
672 for (jrow = nlf; in clalsa_()
[all …]
|
| H A D | dlasd0.c | 152 integer i__, j, m, i1, ic, lf, nd, ll, nl, nr, im1, ncc, nlf, nrf, iwk, lvl, ndb1, nlp1, nrp1; in dlasd0_() local
247 nlf = ic - nl; in dlasd0_()
250 …i, &nl, &nlp1, &nl, &ncc, &d__[nlf], &e[nlf], &vt[ nlf + nlf * vt_dim1], ldvt, &u[nlf + nlf * u_di… in dlasd0_()
255 itemp = idxq + nlf - 2; in dlasd0_()
316 nlf = ic - nl; in dlasd0_()
325 idxqc = idxq + nlf - 1; in dlasd0_()
328 …dlasd1_(&nl, &nr, &sqrei, &d__[nlf], &alpha, &beta, &u[nlf + nlf * u_dim1], ldu, &vt[nlf + nlf * v… in dlasd0_()
|
| H A D | slasd0.c | 150 integer i__, j, m, i1, ic, lf, nd, ll, nl, nr, im1, ncc, nlf, nrf, iwk, lvl, ndb1, nlp1, nrp1; in slasd0_() local
245 nlf = ic - nl; in slasd0_()
248 …i, &nl, &nlp1, &nl, &ncc, &d__[nlf], &e[nlf], &vt[ nlf + nlf * vt_dim1], ldvt, &u[nlf + nlf * u_di… in slasd0_()
253 itemp = idxq + nlf - 2; in slasd0_()
314 nlf = ic - nl; in slasd0_()
323 idxqc = idxq + nlf - 1; in slasd0_()
326 …slasd1_(&nl, &nr, &sqrei, &d__[nlf], &alpha, &beta, &u[nlf + nlf * u_dim1], ldu, &vt[nlf + nlf * v… in slasd0_()
|
| H A D | dlasda.c | 420 nlf = ic - nl; in dlasda_()
422 idxqi = idxq + nlf - 2; in dlasda_()
423 vfi = vf + nlf - 1; in dlasda_()
424 vli = vl + nlf - 1; in dlasda_()
429 …dlasdq_("U", &sqrei, &nl, &nlp1, &nru, &ncc, &d__[nlf], &e[nlf], & work[nwork1], &smlszp, &work[nw… in dlasda_()
438 …"U", &sqrei, &nl, &nlp1, &nl, &ncc, &d__[nlf], &e[nlf], & vt[nlf + vt_dim1], ldu, &u[nlf + u_dim1]… in dlasda_()
525 nlf = ic - nl; in dlasda_()
535 vfi = vf + nlf - 1; in dlasda_()
536 vli = vl + nlf - 1; in dlasda_()
537 idxqi = idxq + nlf - 1; in dlasda_()
[all …]
|
| H A D | slasda.c | 416 nlf = ic - nl; in slasda_()
418 idxqi = idxq + nlf - 2; in slasda_()
419 vfi = vf + nlf - 1; in slasda_()
420 vli = vl + nlf - 1; in slasda_()
425 …slasdq_("U", &sqrei, &nl, &nlp1, &nru, &ncc, &d__[nlf], &e[nlf], & work[nwork1], &smlszp, &work[nw… in slasda_()
434 …"U", &sqrei, &nl, &nlp1, &nl, &ncc, &d__[nlf], &e[nlf], & vt[nlf + vt_dim1], ldu, &u[nlf + u_dim1]… in slasda_()
521 nlf = ic - nl; in slasda_()
531 vfi = vf + nlf - 1; in slasda_()
532 vli = vl + nlf - 1; in slasda_()
533 idxqi = idxq + nlf - 1; in slasda_()
[all …]
|
| /dports/science/gromacs/gromacs-2021.4/src/gromacs/linearalgebra/gmx_lapack/ |
| H A D | dlasd0.cpp | 19 int i__, j, m, i1, ic, lf, nd, ll, nl, nr, im1, ncc, nlf, nrf, in F77_FUNC() local
85 nlf = ic - nl; in F77_FUNC()
88 F77_FUNC(dlasdq,DLASDQ)("U", &sqrei, &nl, &nlp1, &nl, &ncc, &d__[nlf], &e[nlf], &vt[ in F77_FUNC()
89 nlf + nlf * vt_dim1], ldvt, &u[nlf + nlf * u_dim1], ldu, &u[ in F77_FUNC()
90 nlf + nlf * u_dim1], ldu, &work[1], info); in F77_FUNC()
94 itemp = idxq + nlf - 2; in F77_FUNC()
134 nlf = ic - nl; in F77_FUNC()
140 idxqc = idxq + nlf - 1; in F77_FUNC()
143 F77_FUNC(dlasd1,DLASD1)(&nl, &nr, &sqrei, &d__[nlf], &alpha, &beta, &u[nlf + nlf * in F77_FUNC()
144 u_dim1], ldu, &vt[nlf + nlf * vt_dim1], ldvt, &iwork[ in F77_FUNC()
|
| H A D | slasd0.cpp | 19 int i__, j, m, i1, ic, lf, nd, ll, nl, nr, im1, ncc, nlf, nrf, in F77_FUNC() local
85 nlf = ic - nl; in F77_FUNC()
88 F77_FUNC(slasdq,SLASDQ)("U", &sqrei, &nl, &nlp1, &nl, &ncc, &d__[nlf], &e[nlf], &vt[ in F77_FUNC()
89 nlf + nlf * vt_dim1], ldvt, &u[nlf + nlf * u_dim1], ldu, &u[ in F77_FUNC()
90 nlf + nlf * u_dim1], ldu, &work[1], info); in F77_FUNC()
94 itemp = idxq + nlf - 2; in F77_FUNC()
134 nlf = ic - nl; in F77_FUNC()
140 idxqc = idxq + nlf - 1; in F77_FUNC()
143 F77_FUNC(slasd1,SLASD1)(&nl, &nr, &sqrei, &d__[nlf], &alpha, &beta, &u[nlf + nlf * in F77_FUNC()
144 u_dim1], ldu, &vt[nlf + nlf * vt_dim1], ldvt, &iwork[ in F77_FUNC()
|
| H A D | dlasda.cpp | 126 nlf = ic - nl; in F77_FUNC()
128 idxqi = idxq + nlf - 2; in F77_FUNC()
129 vfi = vf + nlf - 1; in F77_FUNC()
130 vli = vl + nlf - 1; in F77_FUNC()
134 F77_FUNC(dlasdq,DLASDQ)("U", &sqrei, &nl, &nlp1, &nru, &ncc, &d__[nlf], &e[nlf], & in F77_FUNC()
144 F77_FUNC(dlasdq,DLASDQ)("U", &sqrei, &nl, &nlp1, &nl, &ncc, &d__[nlf], &e[nlf], & in F77_FUNC()
145 vt[nlf + vt_dim1], ldu, &u[nlf + u_dim1], ldu, &u[nlf + in F77_FUNC()
213 nlf = ic - nl; in F77_FUNC()
219 vfi = vf + nlf - 1; in F77_FUNC()
220 vli = vl + nlf - 1; in F77_FUNC()
[all …]
|
| H A D | slasda.cpp | 126 nlf = ic - nl; in F77_FUNC()
128 idxqi = idxq + nlf - 2; in F77_FUNC()
129 vfi = vf + nlf - 1; in F77_FUNC()
130 vli = vl + nlf - 1; in F77_FUNC()
134 F77_FUNC(slasdq,SLASDQ)("U", &sqrei, &nl, &nlp1, &nru, &ncc, &d__[nlf], &e[nlf], & in F77_FUNC()
144 F77_FUNC(slasdq,SLASDQ)("U", &sqrei, &nl, &nlp1, &nl, &ncc, &d__[nlf], &e[nlf], & in F77_FUNC()
145 vt[nlf + vt_dim1], ldu, &u[nlf + u_dim1], ldu, &u[nlf + in F77_FUNC()
213 nlf = ic - nl; in F77_FUNC()
219 vfi = vf + nlf - 1; in F77_FUNC()
220 vli = vl + nlf - 1; in F77_FUNC()
[all …]
|
| /dports/science/apbs/apbs-pdb2pqr-apbs-1.5-102-g500c1473/apbs/externals/fetk/punc/src/lapack/ |
| H A D | slalsa.c | 305 nlf = ic - nl; in slalsa_()
352 nlf = ic - nl; in slalsa_()
356 b[nlf + b_dim1], ldb, &perm[nlf + lvl * perm_dim1], & in slalsa_()
358 givnum[nlf + lvl2 * givnum_dim1], ldu, &poles[nlf + lvl2 * in slalsa_()
359 poles_dim1], &difl[nlf + lvl * difl_dim1], &difr[nlf + in slalsa_()
397 nlf = ic - nl; in slalsa_()
406 nlf + bx_dim1], ldbx, &perm[nlf + lvl * perm_dim1], & in slalsa_()
408 givnum[nlf + lvl2 * givnum_dim1], ldu, &poles[nlf + lvl2 * in slalsa_()
409 poles_dim1], &difl[nlf + lvl * difl_dim1], &difr[nlf + in slalsa_()
434 nlf = ic - nl; in slalsa_()
[all …]
|
| H A D | dlalsa.c | 308 nlf = ic - nl; in dlalsa_()
355 nlf = ic - nl; in dlalsa_()
359 b[nlf + b_dim1], ldb, &perm[nlf + lvl * perm_dim1], & in dlalsa_()
361 givnum[nlf + lvl2 * givnum_dim1], ldu, &poles[nlf + lvl2 * in dlalsa_()
362 poles_dim1], &difl[nlf + lvl * difl_dim1], &difr[nlf + in dlalsa_()
400 nlf = ic - nl; in dlalsa_()
409 nlf + bx_dim1], ldbx, &perm[nlf + lvl * perm_dim1], & in dlalsa_()
411 givnum[nlf + lvl2 * givnum_dim1], ldu, &poles[nlf + lvl2 * in dlalsa_()
412 poles_dim1], &difl[nlf + lvl * difl_dim1], &difr[nlf + in dlalsa_()
437 nlf = ic - nl; in dlalsa_()
[all …]
|
| H A D | zlalsa.c | 311 nlf = ic - nl; in zlalsa_()
323 i__3 = nlf + nl - 1; in zlalsa_()
459 nlf = ic - nl; in zlalsa_()
463 b[nlf + b_dim1], ldb, &perm[nlf + lvl * perm_dim1], & in zlalsa_()
465 givnum[nlf + lvl2 * givnum_dim1], ldu, &poles[nlf + lvl2 * in zlalsa_()
466 poles_dim1], &difl[nlf + lvl * difl_dim1], &difr[nlf + in zlalsa_()
504 nlf = ic - nl; in zlalsa_()
513 nlf + bx_dim1], ldbx, &perm[nlf + lvl * perm_dim1], & in zlalsa_()
515 givnum[nlf + lvl2 * givnum_dim1], ldu, &poles[nlf + lvl2 * in zlalsa_()
516 poles_dim1], &difl[nlf + lvl * difl_dim1], &difr[nlf + in zlalsa_()
[all …]
|
| H A D | clalsa.c | 310 nlf = ic - nl; in clalsa_()
322 i__3 = nlf + nl - 1; in clalsa_()
458 nlf = ic - nl; in clalsa_()
462 b[nlf + b_dim1], ldb, &perm[nlf + lvl * perm_dim1], & in clalsa_()
464 givnum[nlf + lvl2 * givnum_dim1], ldu, &poles[nlf + lvl2 * in clalsa_()
465 poles_dim1], &difl[nlf + lvl * difl_dim1], &difr[nlf + in clalsa_()
503 nlf = ic - nl; in clalsa_()
512 nlf + bx_dim1], ldbx, &perm[nlf + lvl * perm_dim1], & in clalsa_()
514 givnum[nlf + lvl2 * givnum_dim1], ldu, &poles[nlf + lvl2 * in clalsa_()
515 poles_dim1], &difl[nlf + lvl * difl_dim1], &difr[nlf + in clalsa_()
[all …]
|
| H A D | slasd0.c | 24 static integer i__, j, m, i1, ic, lf, nd, ll, nl, nr, im1, ncc, nlf, nrf, in slasd0_() local
202 nlf = ic - nl; in slasd0_()
205 slasdq_("U", &sqrei, &nl, &nlp1, &nl, &ncc, &d__[nlf], &e[nlf], &vt[ in slasd0_()
206 nlf + nlf * vt_dim1], ldvt, &u[nlf + nlf * u_dim1], ldu, &u[ in slasd0_()
207 nlf + nlf * u_dim1], ldu, &work[1], info, (ftnlen)1); in slasd0_()
211 itemp = idxq + nlf - 2; in slasd0_()
259 nlf = ic - nl; in slasd0_()
265 idxqc = idxq + nlf - 1; in slasd0_()
268 slasd1_(&nl, &nr, &sqrei, &d__[nlf], &alpha, &beta, &u[nlf + nlf * in slasd0_()
269 u_dim1], ldu, &vt[nlf + nlf * vt_dim1], ldvt, &iwork[ in slasd0_()
|
| H A D | dlasd0.c | 25 static integer i__, j, m, i1, ic, lf, nd, ll, nl, nr, im1, ncc, nlf, nrf, in dlasd0_() local
204 nlf = ic - nl; in dlasd0_()
207 dlasdq_("U", &sqrei, &nl, &nlp1, &nl, &ncc, &d__[nlf], &e[nlf], &vt[ in dlasd0_()
208 nlf + nlf * vt_dim1], ldvt, &u[nlf + nlf * u_dim1], ldu, &u[ in dlasd0_()
209 nlf + nlf * u_dim1], ldu, &work[1], info, (ftnlen)1); in dlasd0_()
213 itemp = idxq + nlf - 2; in dlasd0_()
261 nlf = ic - nl; in dlasd0_()
267 idxqc = idxq + nlf - 1; in dlasd0_()
270 dlasd1_(&nl, &nr, &sqrei, &d__[nlf], &alpha, &beta, &u[nlf + nlf * in dlasd0_()
271 u_dim1], ldu, &vt[nlf + nlf * vt_dim1], ldvt, &iwork[ in dlasd0_()
|
| H A D | slasda.c | 339 nlf = ic - nl; in slasda_()
341 idxqi = idxq + nlf - 2; in slasda_()
342 vfi = vf + nlf - 1; in slasda_()
343 vli = vl + nlf - 1; in slasda_()
348 slasdq_("U", &sqrei, &nl, &nlp1, &nru, &ncc, &d__[nlf], &e[nlf], & in slasda_()
359 slasdq_("U", &sqrei, &nl, &nlp1, &nl, &ncc, &d__[nlf], &e[nlf], & in slasda_()
360 vt[nlf + vt_dim1], ldu, &u[nlf + u_dim1], ldu, &u[nlf + in slasda_()
438 nlf = ic - nl; in slasda_()
445 vfi = vf + nlf - 1; in slasda_()
446 vli = vl + nlf - 1; in slasda_()
[all …]
|
| H A D | dlasda.c | 344 nlf = ic - nl; in dlasda_()
346 idxqi = idxq + nlf - 2; in dlasda_()
347 vfi = vf + nlf - 1; in dlasda_()
348 vli = vl + nlf - 1; in dlasda_()
353 dlasdq_("U", &sqrei, &nl, &nlp1, &nru, &ncc, &d__[nlf], &e[nlf], & in dlasda_()
364 dlasdq_("U", &sqrei, &nl, &nlp1, &nl, &ncc, &d__[nlf], &e[nlf], & in dlasda_()
365 vt[nlf + vt_dim1], ldu, &u[nlf + u_dim1], ldu, &u[nlf + in dlasda_()
443 nlf = ic - nl; in dlasda_()
450 vfi = vf + nlf - 1; in dlasda_()
451 vli = vl + nlf - 1; in dlasda_()
[all …]
|
| /dports/misc/visp/visp-3.4.0/3rdparty/clapack/src/ |
| H A D | dlasd0.c | 33 integer i__, j, m, i1, ic, lf, nd, ll, nl, nr, im1, ncc, nlf, nrf, iwk, in dlasd0_() local
210 nlf = ic - nl; in dlasd0_()
213 dlasdq_("U", &sqrei, &nl, &nlp1, &nl, &ncc, &d__[nlf], &e[nlf], &vt[ in dlasd0_()
214 nlf + nlf * vt_dim1], ldvt, &u[nlf + nlf * u_dim1], ldu, &u[ in dlasd0_()
215 nlf + nlf * u_dim1], ldu, &work[1], info); in dlasd0_()
219 itemp = idxq + nlf - 2; in dlasd0_()
267 nlf = ic - nl; in dlasd0_()
273 idxqc = idxq + nlf - 1; in dlasd0_()
276 dlasd1_(&nl, &nr, &sqrei, &d__[nlf], &alpha, &beta, &u[nlf + nlf * in dlasd0_()
277 u_dim1], ldu, &vt[nlf + nlf * vt_dim1], ldvt, &iwork[ in dlasd0_()
|
| H A D | dlasda.c | 350 nlf = ic - nl; in dlasda_()
352 idxqi = idxq + nlf - 2; in dlasda_()
353 vfi = vf + nlf - 1; in dlasda_()
354 vli = vl + nlf - 1; in dlasda_()
358 dlasdq_("U", &sqrei, &nl, &nlp1, &nru, &ncc, &d__[nlf], &e[nlf], & in dlasda_()
368 dlasdq_("U", &sqrei, &nl, &nlp1, &nl, &ncc, &d__[nlf], &e[nlf], & in dlasda_()
369 vt[nlf + vt_dim1], ldu, &u[nlf + u_dim1], ldu, &u[nlf + in dlasda_()
445 nlf = ic - nl; in dlasda_()
452 vfi = vf + nlf - 1; in dlasda_()
453 vli = vl + nlf - 1; in dlasda_()
[all …]
|
| /dports/math/xlife++/xlifepp-sources-v2.0.1-2018-05-09/src/form/ |
| H A D | LinearForm.cpp | 450 for(number_t n = 1; n <= nlf.size(); n++) { nlf(n).second *= -1; } in operator -()
451 return nlf; in operator -()
471 return nlf *= c; in operator *()
477 return nlf *= c; in operator *()
483 return nlf /= c; in operator /()
868 return nlf *= r; in operator *()
874 return nlf *= c; in operator *()
898 return nlf *= r; in operator *()
904 return nlf *= c; in operator *()
932 return nlf /= r; in operator /()
[all …]
|
| /dports/math/mfem/mfem-4.3/fem/ |
| H A D | nonlinearform_ext.cpp | 21 NonlinearFormExtension::NonlinearFormExtension(const NonlinearForm *nlf) in NonlinearFormExtension() argument
22 : Operator(nlf->FESpace()->GetVSize()), nlf(nlf) { } in NonlinearFormExtension()
24 PANonlinearFormExtension::PANonlinearFormExtension(const NonlinearForm *nlf): in PANonlinearFormExtension() argument
25 NonlinearFormExtension(nlf), in PANonlinearFormExtension()
26 fes(*nlf->FESpace()), in PANonlinearFormExtension()
27 dnfi(*nlf->GetDNFI()), in PANonlinearFormExtension()
51 MFEM_VERIFY(nlf->GetInteriorFaceIntegrators().Size() == 0 && in Assemble()
52 nlf->GetBdrFaceIntegrators().Size() == 0, in Assemble()
150 const Array<NonlinearFormIntegrator*> &integrators = *nlf->GetDNFI(); in Assemble()
160 const Array<NonlinearFormIntegrator*> &integrators = *nlf->GetDNFI(); in Mult()
|