Home
last modified time | relevance | path

Searched refs:relstp (Results 1 – 25 of 28) sorted by relevance

12

/dports/math/scilab/scilab-6.1.1/scilab/modules/polynomials/src/fortran/
H A Dquadit.f28 real mp, omp, ee, relstp, t, zm
67 if (relstp.gt..01 .or. mp.lt.omp .or. tried)
72 if (relstp.lt.eta) relstp = eta
73 relstp = sqrt(relstp)
74 u = u - u*relstp
75 v = v + v*relstp
91 relstp = abs((vi-v)/vi)
/dports/science/py-scipy/scipy-1.7.1/scipy/special/cdflib/
H A Ddinvr.f67 DOUBLE PRECISION absstp,abstol,big,fbig,fsmall,relstp,reltol, local
140 step = max(absstp,relstp*abs(x))
339 relstp = 0d0
367 relstp = zrelst
/dports/math/lidia/lidia-2.3.0+latte-patches-2014-10-04/src/base/polynomial/
H A Djenkins_traub.cc479 bigfloat mp, ms, omp, relstp, r1, r2, tp; in vrshft() local
502 if (!(b || mp< omp || relstp >= 0.05)) { in vrshft()
506 tp = relstp; in vrshft()
508 if (relstp < eta) in vrshft()
531 relstp = abs(t/s); in vrshft()
1092 if (relstp < eta) in quadit()
1093 relstp = eta; in quadit()
1094 relstp = sqrt(relstp); in quadit()
1095 u -= u*relstp; in quadit()
1096 v += v*relstp; in quadit()
[all …]
/dports/math/scilab/scilab-6.1.1/scilab/modules/statistics/src/dcdflib/
H A Ddinvr.f69 DOUBLE PRECISION absstp,abstol,big,fbig,fsmall,relstp,reltol, local
148 step = max(absstp,relstp*abs(x))
347 relstp = zrelst
/dports/science/simbody/simbody-Simbody-3.7/SimTKcommon/Polynomial/src/
H A Drpoly.cpp400 T mp,omp,ee,relstp,t,zm; in quadit() local
473 if (relstp > 0.01 || mp < omp || tried) goto _50; in quadit()
478 if (relstp < eta) relstp = eta; in quadit()
479 relstp = sqrt(relstp); in quadit()
480 u = u - u*relstp; in quadit()
481 v = v + v*relstp; in quadit()
498 relstp = std::abs((vi-v)/vi); in quadit()
H A Dcpoly.cpp350 T mp, ms, omp, relstp, r1, r2, tp; in vrshft() local
375 if( !( b || mp < omp || relstp >= 0.05 ) ) in vrshft()
379 tp = relstp; in vrshft()
381 if( relstp < eta ) tp = eta; in vrshft()
408 relstp = cmod( tr, ti ) / cmod( sr, si ); in vrshft()
/dports/math/gap/gap-4.11.0/pkg/float-0.9.1/src/
H A Dcpoly.C202 xreal mp, ms, omp = 0.0, relstp = 0.0, tp; in vrshft() local
229 if(!(b || mp < omp || relstp >= 0.05)){ in vrshft()
233 tp = relstp; in vrshft()
235 if(relstp < xeta(P[0])) tp = xeta(P[0]); in vrshft()
260 relstp = xabs(t) / xabs(*s); in vrshft()
/dports/science/InsightToolkit/ITK-5.0.1/Modules/ThirdParty/VNL/src/vxl/v3p/netlib/toms/
H A Drpoly.c495 real relstp=0, omp=0; in quadit_() local
545 if (relstp > 0.01f || mp < omp || tried) { in quadit_()
551 if (relstp < global_1.eta) { in quadit_()
552 relstp = global_1.eta; in quadit_()
554 relstp = (float)sqrt(relstp); in quadit_()
555 global_1.u -= global_1.u * relstp; in quadit_()
556 global_1.v += global_1.v * relstp; in quadit_()
575 relstp = (real)abs((vi - global_1.v) / vi); in quadit_()
/dports/misc/vxl/vxl-3.3.2/v3p/netlib/toms/
H A Drpoly.c495 real relstp=0, omp=0; in quadit_() local
545 if (relstp > 0.01f || mp < omp || tried) { in quadit_()
551 if (relstp < global_1.eta) { in quadit_()
552 relstp = global_1.eta; in quadit_()
554 relstp = (float)sqrt(relstp); in quadit_()
555 global_1.u -= global_1.u * relstp; in quadit_()
556 global_1.v += global_1.v * relstp; in quadit_()
575 relstp = (real)abs((vi - global_1.v) / vi); in quadit_()
/dports/math/universal/universal-3.48/applications/roots/
H A Drpoly_ak1.cpp565 double c, ee, mp, omp, relstp, t, u, ui, v, vi, zm; in QuadIT_ak1() local
569 relstp = 0.01; in QuadIT_ak1()
613 if ((relstp <= 0.01) && (mp >= omp) && (!triedFlag)){ in QuadIT_ak1()
617 relstp = ((relstp < DBL_EPSILON) ? sqrt(DBL_EPSILON) : sqrt(relstp)); in QuadIT_ak1()
619 u -= u*relstp; in QuadIT_ak1()
620 v += v*relstp; in QuadIT_ak1()
647 relstp = fabs((-v + vi)/vi); in QuadIT_ak1()
/dports/math/R-cran-forecast/forecast/src/
H A Detspolyroot.c361 static double r1, r2, mp, ms, tp, relstp; in vrshft() local
387 if (!b && mp >= omp && relstp < .05) { in vrshft()
394 tp = relstp; in vrshft()
396 if (relstp < eta) in vrshft()
428 relstp = hypot(tr, ti) / hypot(sr, si); in vrshft()
/dports/math/maxima/maxima-5.43.2/src/
H A Dcpoly.lisp324 (t (setq tp relstp bool1 t)
679 (and (< relstp *are*) (setq relstp *are*))
680 (setq relstp (sqrt relstp)
681 *u* (- *u* (* *u* relstp))
682 *v* (+ *v* (* *v* relstp)))
1133 (relstp)
1157 (setq tp relstp
1159 (when (fpgreaterp *are* relstp)
1712 (relstp)
1736 (setq relstp *are*))
[all …]
/dports/math/PDL/PDL-2.019/Basic/Math/
H A Dcpoly.c447 double mp,ms,omp,relstp,r1,r2,tp; in vrshft() local
471 if (!b && mp>=omp && relstp < .05L) { in vrshft()
476 if (relstp < eta) in vrshft()
479 tp = relstp; in vrshft()
506 relstp = cmod(tr,ti)/cmod(sr,si); in vrshft()
/dports/math/R/R-4.1.2/src/main/
H A Dcomplex.c1223 static double r1, r2, mp, ms, tp, relstp; in vrshft() local
1249 if (!b && mp >= omp && relstp < .05) { in vrshft()
1256 tp = relstp; in vrshft()
1258 if (relstp < eta) in vrshft()
1290 relstp = hypot(tr, ti) / hypot(sr, si); in vrshft()
/dports/math/libRmath/R-4.1.1/src/main/
H A Dcomplex.c1223 static double r1, r2, mp, ms, tp, relstp; in vrshft() local
1249 if (!b && mp >= omp && relstp < .05) { in vrshft()
1256 tp = relstp; in vrshft()
1258 if (relstp < eta) in vrshft()
1290 relstp = hypot(tr, ti) / hypot(sr, si); in vrshft()
/dports/math/R/R-4.1.2/src/appl/
H A Duncmin.c1921 double d, relgrd, relstp, rgx, rsx; in opt_stop() local
1949 relstp = fabs(xpls[i] - x[i]) / fmax2(fabs(xpls[i]), 1./sx[i]); in opt_stop()
1950 if(rsx < relstp) rsx = relstp; in opt_stop()
/dports/math/libRmath/R-4.1.1/src/appl/
H A Duncmin.c1921 double d, relgrd, relstp, rgx, rsx; in opt_stop() local
1949 relstp = fabs(xpls[i] - x[i]) / fmax2(fabs(xpls[i]), 1./sx[i]); in opt_stop()
1950 if(rsx < relstp) rsx = relstp; in opt_stop()
/dports/math/p5-Math-CDF/Math-CDF-0.1/cdflib/
H A Ddcdflib.c6339 static double absstp,abstol,big,fbig,fsmall,relstp,reltol,small,step,stpmul,xhi, in E0000() local
6396 step = fifdmax1(absstp,relstp*fabs(*x)); in E0000()
6522 relstp = *zrelst; in E0000()
/dports/math/pecl-stats2/stats-2.0.3/
H A Ddcdflib.c6339 static double absstp,abstol,big,fbig,fsmall,relstp,reltol,small,step,stpmul,xhi, in E0000() local
6396 step = fifdmax1(absstp,relstp*fabs(*x)); in E0000()
6522 relstp = *zrelst; in E0000()
/dports/biology/vcflib/vcflib-1.0.2/src/
H A Dcdflib.cpp6859 static double big,fbig,fsmall,relstp,reltol,small,step,stpmul,xhi, in E0000() local
6919 step = fifdmax1(absstp,relstp*fabs(*x)); in E0000()
7039 relstp = *zrelst; in E0000()
/dports/biology/freebayes/freebayes-1.3.5/vcflib-temp/src/
H A Dcdflib.cpp6850 static double big,fbig,fsmall,relstp,reltol,small,step,stpmul,xhi, in E0000() local
6910 step = fifdmax1(absstp,relstp*fabs(*x)); in E0000()
7030 relstp = *zrelst; in E0000()
/dports/biology/freebayes/freebayes-1.3.5/vcflib/src/
H A Dcdflib.cpp6850 static double big,fbig,fsmall,relstp,reltol,small,step,stpmul,xhi, in E0000() local
6910 step = fifdmax1(absstp,relstp*fabs(*x)); in E0000()
7030 relstp = *zrelst; in E0000()
/dports/science/dakota/dakota-6.13.0-release-public.src-UI/packages/external/DDACE/src/Random/
H A Ddcdflib.c6020 static double absstp,abstol,big,fbig,fsmall,relstp,reltol,small,step,stpmul,xhi, in E0000() local
6077 step = fifdmax1(absstp,relstp*fabs(*x)); in E0000()
6203 relstp = *zrelst; in E0000()
/dports/biology/plink/plink-ng-79b2df8c/1.9/
H A Ddcdflib.c6017 static double absstp,abstol,big,fbig,fsmall,relstp,reltol,small,step,stpmul,xhi, in E0000() local
6074 step = fifdmax1(absstp,relstp*fabs(*x)); in E0000()
6199 relstp = *zrelst; in E0000()
/dports/biology/gcta/gcta_1.26.0_src/
H A Ddcdflib.cpp6019 static double absstp,abstol,big,fbig,fsmall,relstp,reltol,small,step,stpmul,xhi, in E0000() local
6076 step = fifdmax1(absstp,relstp*fabs(*x)); in E0000()
6202 relstp = *zrelst; in E0000()

12