Home
last modified time | relevance | path

Searched refs:epsmch (Results 51 – 75 of 185) sorted by relevance

12345678

/dports/math/cminpack/cminpack-1.3.6/
H A Dlmder_.c45 epsmch, prered; in __minpack_func__() local
242 epsmch = __minpack_func__(dpmpar)(&c__1); in __minpack_func__()
583 if (fabs(actred) <= epsmch && prered <= epsmch && p5 * ratio <= 1.) { in __minpack_func__()
586 if (delta <= epsmch * xnorm) { in __minpack_func__()
589 if (gnorm <= epsmch) { in __minpack_func__()
H A Dlmdif_.c46 real pnorm, xnorm = 0, fnorm1, actred, dirder, epsmch, prered; in __minpack_func__() local
246 epsmch = __minpack_func__(dpmpar)(&c__1); in __minpack_func__()
587 if (fabs(actred) <= epsmch && prered <= epsmch && p5 * ratio <= 1.) { in __minpack_func__()
590 if (delta <= epsmch * xnorm) { in __minpack_func__()
593 if (gnorm <= epsmch) { in __minpack_func__()
H A Dfdjac1_.c27 real epsmch; in __minpack_func__() local
127 epsmch = __minpack_func__(dpmpar)(&c__1); in __minpack_func__()
129 eps = sqrt((max(*epsfcn,epsmch))); in __minpack_func__()
/dports/math/cminpack/cminpack-1.3.6/fortran/
H A Dlmstr.f187 double precision actred,delta,dirder,epsmch,fnorm,fnorm1,gnorm,
196 epsmch = dpmpar(1)
442 if (dabs(actred) .le. epsmch .and. prered .le. epsmch
444 if (delta .le. epsmch*xnorm) info = 7
445 if (gnorm .le. epsmch) info = 8
/dports/math/arpack-ng/arpack-ng-3.8.0/SRC/
H A Ddsapps.f170 & a1, a2, a3, a4, big, c, epsmch, f, g, r, s
171 save epsmch, first
206 epsmch = dlamch('Epsilon-Machine')
262 if (h(i+1,1) .le. epsmch*big) then
433 if (h(i+1,1) .le. epsmch*big) then
H A Dssapps.f170 & a1, a2, a3, a4, big, c, epsmch, f, g, r, s
171 save epsmch, first
206 epsmch = slamch('Epsilon-Machine')
262 if (h(i+1,1) .le. epsmch*big) then
433 if (h(i+1,1) .le. epsmch*big) then
/dports/math/arpack-ng/arpack-ng-3.8.0/PARPACK/SRC/BLACS/
H A Dpdsapps.f181 & a1, a2, a3, a4, big, c, epsmch, f, g, r, s
182 save epsmch, first
217 epsmch = pdlamch(comm, 'Epsilon-Machine')
273 if (h(i+1,1) .le. epsmch*big) then
444 if (h(i+1,1) .le. epsmch*big) then
H A Dpssapps.f181 & a1, a2, a3, a4, big, c, epsmch, f, g, r, s
182 save epsmch, first
217 epsmch = pslamch(comm, 'Epsilon-Machine')
273 if (h(i+1,1) .le. epsmch*big) then
444 if (h(i+1,1) .le. epsmch*big) then
/dports/math/arpack-ng/arpack-ng-3.8.0/PARPACK/SRC/MPI/
H A Dpdsapps.f182 & a1, a2, a3, a4, big, c, epsmch, f, g, r, s
183 save epsmch, first
217 epsmch = pdlamch10(comm, 'Epsilon-Machine')
273 if (h(i+1,1) .le. epsmch*big) then
444 if (h(i+1,1) .le. epsmch*big) then
H A Dpssapps.f181 & a1, a2, a3, a4, big, c, epsmch, f, g, r, s
182 save epsmch
216 epsmch = pslamch10(comm, 'Epsilon-Machine')
272 if (h(i+1,1) .le. epsmch*big) then
443 if (h(i+1,1) .le. epsmch*big) then
/dports/science/apbs/apbs-pdb2pqr-apbs-1.5-102-g500c1473/apbs/externals/fetk/punc/src/arpack/src_f77/
H A Ddsapps.f170 & a1, a2, a3, a4, big, c, epsmch, f, g, r, s local
171 save epsmch, first
206 epsmch = dlamch('Epsilon-Machine')
262 if (h(i+1,1) .le. epsmch*big) then
433 if (h(i+1,1) .le. epsmch*big) then
H A Dssapps.f170 & a1, a2, a3, a4, big, c, epsmch, f, g, r, s local
171 save epsmch, first
206 epsmch = slamch('Epsilon-Machine')
262 if (h(i+1,1) .le. epsmch*big) then
433 if (h(i+1,1) .le. epsmch*big) then
/dports/science/py-scipy/scipy-1.7.1/scipy/sparse/linalg/eigen/arpack/ARPACK/SRC/
H A Ddsapps.f170 & a1, a2, a3, a4, big, c, epsmch, f, g, r, s local
171 save epsmch, first
206 epsmch = dlamch('Epsilon-Machine')
262 if (h(i+1,1) .le. epsmch*big) then
433 if (h(i+1,1) .le. epsmch*big) then
H A Dssapps.f170 & a1, a2, a3, a4, big, c, epsmch, f, g, r, s local
171 save epsmch, first
206 epsmch = slamch('Epsilon-Machine')
262 if (h(i+1,1) .le. epsmch*big) then
433 if (h(i+1,1) .le. epsmch*big) then
/dports/math/R-cran-igraph/igraph/src/
H A Ddsapps.f170 & a1, a2, a3, a4, big, c, epsmch, f, g, r, s
171 save epsmch, first
206 epsmch = dlamch('Epsilon-Machine')
262 if (h(i+1,1) .le. epsmch*big) then
433 if (h(i+1,1) .le. epsmch*big) then
/dports/math/algae/algae-4.3.6/arpack/
H A Ddsapps.f170 & a1, a2, a3, a4, big, c, epsmch, f, g, r, s
171 save epsmch, first
206 epsmch = dlamch('Epsilon-Machine')
262 if (h(i+1,1) .le. epsmch*big) then
433 if (h(i+1,1) .le. epsmch*big) then
/dports/science/elmerfem/elmerfem-release-9.0/mathlibs/src/arpack/
H A Ddsapps.f170 & a1, a2, a3, a4, big, c, epsmch, f, g, r, s
171 save epsmch, first
206 epsmch = dlamch('Epsilon-Machine')
262 if (h(i+1,1) .le. epsmch*big) then
433 if (h(i+1,1) .le. epsmch*big) then
H A Dssapps.f170 & a1, a2, a3, a4, big, c, epsmch, f, g, r, s
171 save epsmch, first
206 epsmch = slamch('Epsilon-Machine')
262 if (h(i+1,1) .le. epsmch*big) then
433 if (h(i+1,1) .le. epsmch*big) then
/dports/science/getdp/getdp-3.4.0-source/contrib/Arpack/
H A Ddsapps.f170 & a1, a2, a3, a4, big, c, epsmch, f, g, r, s
171 save epsmch, first
206 epsmch = dlamch('Epsilon-Machine')
262 if (h(i+1,1) .le. epsmch*big) then
433 if (h(i+1,1) .le. epsmch*big) then
H A Dssapps.f170 & a1, a2, a3, a4, big, c, epsmch, f, g, r, s
171 save epsmch, first
206 epsmch = slamch('Epsilon-Machine')
262 if (h(i+1,1) .le. epsmch*big) then
433 if (h(i+1,1) .le. epsmch*big) then
/dports/science/elmerfem/elmerfem-release-9.0/mathlibs/src/parpack/
H A Dpssapps.f181 & a1, a2, a3, a4, big, c, epsmch, f, g, r, s
182 save epsmch, first
217 epsmch = pslamch10(comm, 'Epsilon-Machine')
273 if (h(i+1,1) .le. epsmch*big) then
444 if (h(i+1,1) .le. epsmch*big) then
H A Dpdsapps.f181 & a1, a2, a3, a4, big, c, epsmch, f, g, r, s
182 save epsmch, first
217 epsmch = pdlamch10(comm, 'Epsilon-Machine')
273 if (h(i+1,1) .le. epsmch*big) then
444 if (h(i+1,1) .le. epsmch*big) then
/dports/math/gretl/gretl-2021d/minpack/
H A Dlmder.c204 const double epsmch = DBL_EPSILON; in lmder_() local
459 if (fabs(actred) <= epsmch && prered <= epsmch && p5 * ratio <= 1.0) { in lmder_()
462 if (delta <= epsmch * xnorm) { in lmder_()
465 if (gnorm <= epsmch) { in lmder_()
H A Dlmdif.c207 const double epsmch = DBL_EPSILON; in lmdif_() local
473 if (fabs(actred) <= epsmch && prered <= epsmch && p5 * ratio <= 1.0) { in lmdif_()
476 if (delta <= epsmch * xnorm) { in lmdif_()
479 if (gnorm <= epsmch) { in lmdif_()
/dports/science/quantum-espresso/q-e-qe-6.7.0/Modules/
H A Dlmdif.f90440 DOUBLEPRECISION eps, epsmch, h, temp, zero
446 epsmch = dpmpar (1)
448 eps = dsqrt (dmax1 (epsfcn, epsmch) )
657 DOUBLEPRECISION actred, delta, dirder, epsmch, fnorm, fnorm1, &
666 epsmch = dpmpar (1)
894 IF (dabs (actred) .le.epsmch.and.prered.le.epsmch.and.p5 * &
896 IF (delta.le.epsmch * xnorm) info = 7
897 IF (gnorm.le.epsmch) info = 8
1403 DOUBLEPRECISION ajnorm, epsmch, one, p05, sum, temp, zero
1409 epsmch = dpmpar (1)
[all …]

12345678