Home
last modified time | relevance | path

Searched refs:spdiam (Results 1 – 25 of 49) sorted by relevance

12

/dports/science/siconos/siconos-4.4.0/externals/numeric_bindings/boost/numeric/bindings/lapack/auxiliary/
H A Dlarrb.hpp57 const float spdiam, const fortran_int_t twist ) { in larrb() argument
60 wgap, werr, work, iwork, &pivmin, &spdiam, &twist, &info ); in larrb()
74 const double spdiam, const fortran_int_t twist ) { in larrb() argument
77 wgap, werr, work, iwork, &pivmin, &spdiam, &twist, &info ); in larrb()
106 const real_type spdiam, const fortran_int_t twist, in invoke()
142 pivmin, spdiam, twist ); in invoke()
159 const real_type spdiam, const fortran_int_t twist, in invoke()
184 const real_type spdiam, const fortran_int_t twist, in invoke()
235 VectorD >::type >::type spdiam, const fortran_int_t twist, in larrb()
239 offset, w, wgap, werr, pivmin, spdiam, twist, work ); in larrb()
[all …]
/dports/math/xtensor-blas/xtensor-blas-0.20.0/include/xflens/cxxlapack/interface/
H A Dlarrb.tcc58 float spdiam, in larrb() argument
76 &spdiam, in larrb()
105 double spdiam, in larrb() argument
123 &spdiam, in larrb()
H A Dlarrf.tcc53 float spdiam, in larrf() argument
74 &spdiam, in larrf()
103 double spdiam, in larrf() argument
124 &spdiam, in larrf()
H A Dlarrf.h51 float spdiam,
71 double spdiam,
H A Dlarrb.h56 float spdiam,
75 double spdiam,
/dports/science/ergo/ergo-3.8/source/matrix/template_lapack/lapack/
H A Dtemplate_lapack_larre.h86 Treal safmin, spdiam; in template_lapack_larre() local
371 spdiam = gu - gl; in template_lapack_larre()
455 spdiam = gu - gl; in template_lapack_larre()
523 spdiam = isrght - isleft; in template_lapack_larre()
554 s1 = isleft + spdiam * .25; in template_lapack_larre()
555 s2 = isrght - spdiam * .25; in template_lapack_larre()
561 s1 = isleft + spdiam * .25; in template_lapack_larre()
562 s2 = isrght - spdiam * .25; in template_lapack_larre()
612 tau = spdiam * eps * *n + *pivmin * 2.; in template_lapack_larre()
660 if (dmax__ > spdiam * 64.) { in template_lapack_larre()
[all …]
H A Dtemplate_lapack_larrf.h44 Treal *wgap, Treal *werr, Treal *spdiam, Treal * in template_lapack_larrf() argument
236 fail = (Treal) (*n - 1) * mingap / (*spdiam * eps); in template_lapack_larrf()
237 fail2 = (Treal) (*n - 1) * mingap / (*spdiam * template_blas_sqrt(eps)); in template_lapack_larrf()
242 growthbound = *spdiam * 8.; in template_lapack_larrf()
372 rrr1 = tmp / (*spdiam * template_blas_sqrt(znm2)); in template_lapack_larrf()
399 rrr2 = tmp / (*spdiam * template_blas_sqrt(znm2)); in template_lapack_larrf()
H A Dtemplate_lapack_larrv.h91 Treal spdiam; in template_lapack_larrv() local
400 spdiam = gu - gl; in template_lapack_larrv()
530 iindwk], pivmin, &spdiam, &in, &iinfo); in template_lapack_larrv()
642 spdiam, &in, &iinfo); in template_lapack_larrv()
665 &wgap[wbegin], &werr[wbegin], &spdiam, &lgap, in template_lapack_larrv()
801 iindwk], pivmin, &spdiam, &itmp1, &iinfo); in template_lapack_larrv()
/dports/science/madness/madness-ebb3fd7/src/madness/external/elemental/external/pmrrr/src/lapack/
H A Dodrre.c77 double safmin, spdiam; in odrre() local
357 spdiam = gu - gl; in odrre()
441 spdiam = gu - gl; in odrre()
509 spdiam = isrght - isleft; in odrre()
540 s1 = isleft + spdiam * .25; in odrre()
541 s2 = isrght - spdiam * .25; in odrre()
547 s1 = isleft + spdiam * .25; in odrre()
548 s2 = isrght - spdiam * .25; in odrre()
598 tau = spdiam * eps * *n + *pivmin * 2.; in odrre()
647 if (dmax__ > spdiam * 64.) { in odrre()
[all …]
H A Dodrrf.c18 double *wgap, double *werr, double *spdiam, double * in odrrf() argument
209 fail = (double) (*n - 1) * mingap / (*spdiam * eps); in odrrf()
210 fail2 = (double) (*n - 1) * mingap / (*spdiam * sqrt(eps)); in odrrf()
215 growthbound = *spdiam * 8.; in odrrf()
345 rrr1 = tmp / (*spdiam * sqrt(znm2)); in odrrf()
372 rrr2 = tmp / (*spdiam * sqrt(znm2)); in odrrf()
H A Dodrrv.c82 double spdiam; in odrrv() local
390 spdiam = gu - gl; in odrrv()
520 iindwk], pivmin, &spdiam, &in, &iinfo); in odrrv()
632 spdiam, &in, &iinfo); in odrrv()
655 &wgap[wbegin], &werr[wbegin], &spdiam, &lgap, in odrrv()
791 iindwk], pivmin, &spdiam, &itmp1, &iinfo); in odrrv()
H A Dodrrj.c14 double *pivmin, double *spdiam, int *info) in odrrj() argument
140 maxitr = (int) ((log(*spdiam + *pivmin) - log(*pivmin)) / log(2.)) + in odrrj()
/dports/math/igraph/igraph-0.9.5/vendor/lapack/
H A Ddlarre.c374 doublereal safmin, spdiam; in igraphdlarre_() local
482 spdiam = gu - gl; in igraphdlarre_()
566 spdiam = gu - gl; in igraphdlarre_()
634 spdiam = isrght - isleft; in igraphdlarre_()
665 s1 = isleft + spdiam * .25; in igraphdlarre_()
666 s2 = isrght - spdiam * .25; in igraphdlarre_()
672 s1 = isleft + spdiam * .25; in igraphdlarre_()
673 s2 = isrght - spdiam * .25; in igraphdlarre_()
723 tau = spdiam * eps * *n + *pivmin * 2.; in igraphdlarre_()
774 if (dmax__ > spdiam * 64.) { in igraphdlarre_()
[all …]
H A Ddlarrf.c211 doublereal *wgap, doublereal *werr, doublereal *spdiam, doublereal * in igraphdlarrf_() argument
312 fail = (doublereal) (*n - 1) * mingap / (*spdiam * eps); in igraphdlarrf_()
313 fail2 = (doublereal) (*n - 1) * mingap / (*spdiam * sqrt(eps)); in igraphdlarrf_()
318 growthbound = *spdiam * 8.; in igraphdlarrf_()
448 rrr1 = tmp / (*spdiam * sqrt(znm2)); in igraphdlarrf_()
475 rrr2 = tmp / (*spdiam * sqrt(znm2)); in igraphdlarrf_()
H A Ddlarrv.c362 doublereal spdiam; in igraphdlarrv_() local
508 spdiam = gu - gl; in igraphdlarrv_()
638 iindwk], pivmin, &spdiam, &in, &iinfo); in igraphdlarrv_()
750 spdiam, &in, &iinfo); in igraphdlarrv_()
773 &wgap[wbegin], &werr[wbegin], &spdiam, &lgap, in igraphdlarrv_()
909 iindwk], pivmin, &spdiam, &itmp1, &iinfo); in igraphdlarrv_()
/dports/math/libflame/libflame-5.2.0/src/map/lapack2flamec/f2c/c/
H A Dslarre.c326 real safmin, spdiam; in slarre_() local
460 spdiam = gu - gl; in slarre_()
552 spdiam = gu - gl; in slarre_()
635 spdiam = isrght - isleft; in slarre_()
669 s1 = isleft + spdiam * .25f; in slarre_()
670 s2 = isrght - spdiam * .25f; in slarre_()
679 s1 = isleft + spdiam * .25f; in slarre_()
680 s2 = isrght - spdiam * .25f; in slarre_()
748 tau = spdiam * eps * *n + *pivmin * 2.f; in slarre_()
815 if (dmax__ > spdiam * 64.f) in slarre_()
[all …]
H A Ddlarre.c332 doublereal safmin, spdiam; in dlarre_() local
460 spdiam = gu - gl; in dlarre_()
552 spdiam = gu - gl; in dlarre_()
635 spdiam = isrght - isleft; in dlarre_()
669 s1 = isleft + spdiam * .25; in dlarre_()
670 s2 = isrght - spdiam * .25; in dlarre_()
679 s1 = isleft + spdiam * .25; in dlarre_()
680 s2 = isrght - spdiam * .25; in dlarre_()
748 tau = spdiam * eps * *n + *pivmin * 2.; in dlarre_()
815 if (dmax__ > spdiam * 64.) in dlarre_()
[all …]
H A Dslarrf.c180 … integer *clstrt, integer *clend, real *w, real *wgap, real *werr, real *spdiam, real *clgapl, rea… in slarrf_() argument
284 fail = (real) (*n - 1) * mingap / (*spdiam * eps); in slarrf_()
285 fail2 = (real) (*n - 1) * mingap / (*spdiam * sqrt(eps)); in slarrf_()
289 growthbound = *spdiam * 8.f; in slarrf_()
451 rrr1 = tmp / (*spdiam * sqrt(znm2)); in slarrf_()
487 rrr2 = tmp / (*spdiam * sqrt(znm2)); in slarrf_()
H A Ddlarrf.c180 …r *clend, doublereal *w, doublereal *wgap, doublereal *werr, doublereal *spdiam, doublereal * clga… in dlarrf_() argument
284 fail = (doublereal) (*n - 1) * mingap / (*spdiam * eps); in dlarrf_()
285 fail2 = (doublereal) (*n - 1) * mingap / (*spdiam * sqrt(eps)); in dlarrf_()
289 growthbound = *spdiam * 8.; in dlarrf_()
451 rrr1 = tmp / (*spdiam * sqrt(znm2)); in dlarrf_()
487 rrr2 = tmp / (*spdiam * sqrt(znm2)); in dlarrf_()
H A Dslarrv.c319 real spdiam; in slarrv_() local
491 spdiam = gu - gl; in slarrv_()
639 …gin], &wgap[ wbegin], &werr[wbegin], &work[indwrk], &iwork[ iindwk], pivmin, &spdiam, &in, &iinfo); in slarrv_()
770 …gin], &wgap[wbegin], &werr[wbegin] , &work[indwrk], &iwork[iindwk], pivmin, & spdiam, &in, &iinfo); in slarrv_()
787 …in - 1], &newfst, &newlst, &work[wbegin], &wgap[wbegin], &werr[wbegin], &spdiam, &lgap, &rgap, piv… in slarrv_()
932 …], &wgap[wbegin], & werr[wbegin], &work[indwrk], &iwork[ iindwk], pivmin, &spdiam, &itmp1, &iinfo); in slarrv_()
H A Ddlarrv.c322 doublereal spdiam; in dlarrv_() local
496 spdiam = gu - gl; in dlarrv_()
644 …gin], &wgap[ wbegin], &werr[wbegin], &work[indwrk], &iwork[ iindwk], pivmin, &spdiam, &in, &iinfo); in dlarrv_()
775 …gin], &wgap[wbegin], &werr[wbegin] , &work[indwrk], &iwork[iindwk], pivmin, & spdiam, &in, &iinfo); in dlarrv_()
792 …in - 1], &newfst, &newlst, &work[wbegin], &wgap[wbegin], &werr[wbegin], &spdiam, &lgap, &rgap, piv… in dlarrv_()
937 …], &wgap[wbegin], & werr[wbegin], &work[indwrk], &iwork[ iindwk], pivmin, &spdiam, &itmp1, &iinfo); in dlarrv_()
/dports/science/madness/madness-ebb3fd7/src/madness/external/elemental/external/pmrrr/src/
H A Dtasks.c51 double spdiam, double lgap, rrr_t *RRR) in PMR_create_s_task() argument
67 s->bl_spdiam = spdiam; in PMR_create_s_task()
81 int bl_begin, int bl_end, double spdiam, in PMR_create_c_task() argument
100 c->bl_spdiam = spdiam; in PMR_create_c_task()
H A Dplarre.c215 Dstruct->spdiam = gu - gl; in plarre()
567 double isleft, isright, spdiam; in eigval_root_proc() local
601 spdiam = gu - gl; in eigval_root_proc()
617 spdiam = isright - isleft; in eigval_root_proc()
620 s1 = isleft + HALF * spdiam; in eigval_root_proc()
645 tau = spdiam*DBL_EPSILON*n + 2.0*pivmin; in eigval_root_proc()
676 if (Dmax > MAX_GROWTH*spdiam) { in eigval_root_proc()
762 double spdiam; in eigval_refine_proc() local
795 spdiam = gu - gl; in eigval_refine_proc()
843 pivmin, spdiam); in eigval_refine_proc()
[all …]
H A Dplarrv.c322 double sigma, gl, gu, avggap, spdiam; in init_workQ() local
355 spdiam = gu - gl; in init_workQ()
356 avggap = spdiam / (isize-1); in init_workQ()
460 iend, spdiam, lgap, RRR); in init_workQ()
516 iend, spdiam, lgap, iWbegin, in init_workQ()
554 iend, spdiam, lgap, iWbegin, iWend, in init_workQ()
/dports/science/madness/madness-ebb3fd7/src/madness/external/elemental/external/pmrrr/include/
H A Dtasks.h100 int bl_begin, int bl_end, double spdiam,
104 int bl_begin, int bl_end, double spdiam,

12