| /dports/math/py-levmar/levmar-0.2.3/levmar/ |
| H A D | __init__.py | 21 mu=1.0e-03, eps1=1.5e-08, eps2=1.5e-08, eps3=1.5e-08, argument
72 mu, eps1, eps2, eps3, maxit, cdiff)
76 mu=1.0e-03, eps1=1.5e-08, eps2=1.5e-08, eps3=1.5e-08, argument
131 mu, eps1, eps2, eps3, maxit, cdiff)
135 mu=1.0e-03, eps1=1.5e-08, eps2=1.5e-08, eps3=1.5e-08, argument
189 mu, eps1, eps2, eps3, maxit, cdiff)
251 mu, eps1, eps2, eps3, maxit, cdiff)
317 mu, eps1, eps2, eps3, maxit, cdiff)
380 mu, eps1, eps2, eps3, maxit, cdiff)
442 mu, eps1, eps2, eps3, maxit, cdiff)
[all …]
|
| /dports/science/jstrack/jstrack/extlib/tcllib1.19/math/ |
| H A D | fuzzy.tcl | 12 variable eps3 2.2e-16
29 variable eps3
32 set eps3 [expr 3.0*$eps]
64 variable eps3
66 return [expr {abs($first-$second) <= $eps3 * $scale}]
70 variable eps3
76 variable eps3
78 return [expr {($first-$second) > $eps3 * $scale}]
108 variable eps3
111 set rmax [expr {$q / (2.0 - $eps3)}]
[all …]
|
| /dports/devel/tcllib/tcllib-1.20/modules/math/ |
| H A D | fuzzy.tcl | 12 variable eps3 2.2e-16
29 variable eps3
32 set eps3 [expr 3.0*$eps]
64 variable eps3
66 return [expr {abs($first-$second) <= $eps3 * $scale}]
70 variable eps3
76 variable eps3
78 return [expr {($first-$second) > $eps3 * $scale}]
108 variable eps3
111 set rmax [expr {$q / (2.0 - $eps3)}]
[all …]
|
| /dports/devel/tcllibc/tcllib-1.20/modules/math/ |
| H A D | fuzzy.tcl | 12 variable eps3 2.2e-16
29 variable eps3
32 set eps3 [expr 3.0*$eps]
64 variable eps3
66 return [expr {abs($first-$second) <= $eps3 * $scale}]
70 variable eps3
76 variable eps3
78 return [expr {($first-$second) > $eps3 * $scale}]
108 variable eps3
111 set rmax [expr {$q / (2.0 - $eps3)}]
[all …]
|
| /dports/math/xtensor-blas/xtensor-blas-0.20.0/include/xflens/cxxlapack/interface/ |
| H A D | laein.tcc | 56 float eps3, in laein() argument
77 &eps3, in laein()
105 double eps3, in laein() argument
126 &eps3, in laein()
151 float eps3, in laein() argument
170 &eps3, in laein()
195 double eps3, in laein() argument
214 &eps3, in laein()
|
| H A D | laein.h | 54 float eps3,
72 double eps3,
88 float eps3,
104 double eps3,
|
| /dports/science/apbs/apbs-pdb2pqr-apbs-1.5-102-g500c1473/apbs/externals/fetk/punc/src/lapack/ |
| H A D | dlaein.c | 193 vr[i__] = *eps3; in dlaein_()
247 b[*n + *n * b_dim1] = *eps3; in dlaein_()
278 b[j + j * b_dim1] = *eps3; in dlaein_()
293 b[b_dim1 + 1] = *eps3; in dlaein_()
323 vr[1] = *eps3; in dlaein_()
354 vr[i__] = *eps3; in dlaein_()
419 absbii = *eps3; in dlaein_()
497 b[j + j * b_dim1] = *eps3; in dlaein_()
499 absbjj = *eps3; in dlaein_()
525 b[b_dim1 + 1] = *eps3; in dlaein_()
[all …]
|
| H A D | slaein.c | 193 vr[i__] = *eps3; in slaein_()
247 b[*n + *n * b_dim1] = *eps3; in slaein_()
278 b[j + j * b_dim1] = *eps3; in slaein_()
293 b[b_dim1 + 1] = *eps3; in slaein_()
323 vr[1] = *eps3; in slaein_()
354 vr[i__] = *eps3; in slaein_()
419 absbii = *eps3; in slaein_()
498 b[j + j * b_dim1] = *eps3; in slaein_()
500 absbjj = *eps3; in slaein_()
526 b[b_dim1 + 1] = *eps3; in slaein_()
[all …]
|
| H A D | chsein.c | 32 static real ulp, eps3, unfl; in chsein_() local
346 eps3 = hnorm * ulp; in chsein_()
348 eps3 = smlnum; in chsein_()
365 r_imag(&q__1), dabs(r__2)) < eps3) { in chsein_()
366 q__1.r = wk.r + eps3, q__1.i = wk.i; in chsein_()
382 rwork[1], &eps3, &smlnum, &iinfo); in chsein_()
402 eps3, &smlnum, &iinfo); in chsein_()
|
| H A D | zhsein.c | 33 static doublereal ulp, eps3, unfl; in zhsein_() local
348 eps3 = hnorm * ulp; in zhsein_()
350 eps3 = smlnum; in zhsein_()
367 d_imag(&z__1), abs(d__2)) < eps3) { in zhsein_()
368 z__1.r = wk.r + eps3, z__1.i = wk.i; in zhsein_()
384 rwork[1], &eps3, &smlnum, &iinfo); in zhsein_()
404 eps3, &smlnum, &iinfo); in zhsein_()
|
| H A D | claein.c | 14 integer *ldb, real *rwork, real *eps3, real *smlnum, integer *info) in claein_() argument
149 r__1 = 1.f, r__2 = *eps3 * rootn; in claein_()
178 v[i__2].r = *eps3, v[i__2].i = 0.f; in claein_()
186 r__1 = *eps3 * rootn / dmax(vnorm,nrmsml); in claein_()
231 b[i__3].r = *eps3, b[i__3].i = 0.f; in claein_()
255 b[i__2].r = *eps3, b[i__2].i = 0.f; in claein_()
300 b[i__2].r = *eps3, b[i__2].i = 0.f; in claein_()
324 b[i__2].r = *eps3, b[i__2].i = 0.f; in claein_()
353 rtemp = *eps3 / (rootn + 1.f); in claein_()
354 v[1].r = *eps3, v[1].i = 0.f; in claein_()
[all …]
|
| H A D | zlaein.c | 14 doublecomplex *b, integer *ldb, doublereal *rwork, doublereal *eps3, in zlaein_() argument
154 d__1 = 1., d__2 = *eps3 * rootn; in zlaein_()
183 v[i__2].r = *eps3, v[i__2].i = 0.; in zlaein_()
191 d__1 = *eps3 * rootn / max(vnorm,nrmsml); in zlaein_()
236 b[i__3].r = *eps3, b[i__3].i = 0.; in zlaein_()
260 b[i__2].r = *eps3, b[i__2].i = 0.; in zlaein_()
305 b[i__2].r = *eps3, b[i__2].i = 0.; in zlaein_()
329 b[i__2].r = *eps3, b[i__2].i = 0.; in zlaein_()
358 rtemp = *eps3 / (rootn + 1.); in zlaein_()
359 v[1].r = *eps3, v[1].i = 0.; in zlaein_()
[all …]
|
| /dports/math/libflame/libflame-5.2.0/src/map/lapack2flamec/f2c/c/ |
| H A D | slaein.c | 238 r__2 = *eps3 * rootn; // , expr subst in slaein_()
269 vr[i__] = *eps3; in slaein_()
383 b[b_dim1 + 1] = *eps3; in slaein_()
405 temp = *eps3 / (rootn + 1.f); in slaein_()
406 vr[1] = *eps3; in slaein_()
436 vr[i__] = *eps3; in slaein_()
503 absbii = *eps3; in slaein_()
585 absbjj = *eps3; in slaein_()
609 b[b_dim1 + 1] = *eps3; in slaein_()
718 y = *eps3 / (rootn + 1.f); in slaein_()
[all …]
|
| H A D | dlaein.c | 234 d__2 = *eps3 * rootn; // , expr subst in dlaein_()
265 vr[i__] = *eps3; in dlaein_()
379 b[b_dim1 + 1] = *eps3; in dlaein_()
401 temp = *eps3 / (rootn + 1.); in dlaein_()
402 vr[1] = *eps3; in dlaein_()
432 vr[i__] = *eps3; in dlaein_()
499 absbii = *eps3; in dlaein_()
581 absbjj = *eps3; in dlaein_()
605 b[b_dim1 + 1] = *eps3; in dlaein_()
714 y = *eps3 / (rootn + 1.); in dlaein_()
[all …]
|
| H A D | dhsein.c | 277 doublereal ulp, wkr, eps3; in dhsein_() local
497 eps3 = hnorm * ulp; in dhsein_()
501 eps3 = smlnum; in dhsein_()
515 …elect[i__] && (d__1 = wr[i__] - wkr, f2c_abs(d__1)) + (d__2 = wi[i__] - wki, f2c_abs(d__2)) < eps3) in dhsein_()
517 wkr += eps3; in dhsein_()
536 …1], &vl[kl + ksi * vl_dim1], &work[1], &ldwork, &work[*n * *n + *n + 1], &eps3, &smlnum, &bignum, … in dhsein_()
578 …1], &vr[ksi * vr_dim1 + 1], & work[1], &ldwork, &work[*n * *n + *n + 1], &eps3, & smlnum, &bignum,… in dhsein_()
|
| H A D | zhsein.c | 259 doublereal ulp, eps3, unfl; in zhsein_() local
458 eps3 = hnorm * ulp; in zhsein_()
462 eps3 = smlnum; in zhsein_()
482 … if (select[i__] && (d__1 = z__1.r, f2c_abs(d__1)) + (d__2 = d_imag(&z__1), f2c_abs(d__2)) < eps3) in zhsein_()
484 z__1.r = wk.r + eps3; in zhsein_()
499 … h_dim1], ldh, &wk, &vl[kl + ks * vl_dim1], &work[1], &ldwork, & rwork[1], &eps3, &smlnum, &iinfo); in zhsein_()
523 …_offset], ldh, &wk, &vr[ ks * vr_dim1 + 1], &work[1], &ldwork, &rwork[1], & eps3, &smlnum, &iinfo); in zhsein_()
|
| H A D | shsein.c | 277 real ulp, wkr, eps3; in shsein_() local
495 eps3 = hnorm * ulp; in shsein_()
499 eps3 = smlnum; in shsein_()
513 …elect[i__] && (r__1 = wr[i__] - wkr, f2c_abs(r__1)) + (r__2 = wi[i__] - wki, f2c_abs(r__2)) < eps3) in shsein_()
515 wkr += eps3; in shsein_()
534 …1], &vl[kl + ksi * vl_dim1], &work[1], &ldwork, &work[*n * *n + *n + 1], &eps3, &smlnum, &bignum, … in shsein_()
576 …1], &vr[ksi * vr_dim1 + 1], & work[1], &ldwork, &work[*n * *n + *n + 1], &eps3, & smlnum, &bignum,… in shsein_()
|
| H A D | chsein.c | 259 real ulp, eps3, unfl; in chsein_() local
459 eps3 = hnorm * ulp; in chsein_()
463 eps3 = smlnum; in chsein_()
483 … if (select[i__] && (r__1 = q__1.r, f2c_abs(r__1)) + (r__2 = r_imag(&q__1), f2c_abs(r__2)) < eps3) in chsein_()
485 q__1.r = wk.r + eps3; in chsein_()
500 … h_dim1], ldh, &wk, &vl[kl + ks * vl_dim1], &work[1], &ldwork, & rwork[1], &eps3, &smlnum, &iinfo); in chsein_()
524 …_offset], ldh, &wk, &vr[ ks * vr_dim1 + 1], &work[1], &ldwork, &rwork[1], & eps3, &smlnum, &iinfo); in chsein_()
|
| H A D | zlaein.c | 143 …omplex *v, doublecomplex *b, integer *ldb, doublereal *rwork, doublereal *eps3, doublereal *smlnum… in zlaein_() argument
212 d__2 = *eps3 * rootn; // , expr subst in zlaein_()
249 v[i__2].r = *eps3; in zlaein_()
258 d__1 = *eps3 * rootn / max(vnorm,nrmsml); in zlaein_()
312 b[i__3].r = *eps3; in zlaein_()
344 b[i__2].r = *eps3; in zlaein_()
399 b[i__2].r = *eps3; in zlaein_()
431 b[i__2].r = *eps3; in zlaein_()
454 rtemp = *eps3 / (rootn + 1.); in zlaein_()
455 v[1].r = *eps3; in zlaein_()
[all …]
|
| /dports/math/eispack/eispack-1.0_14/ |
| H A D | cinvit.f | 7 double precision x,y,eps3,norm,normv,epslon,growto,ilambd,pythag,
108 eps3 = epslon(norm)
120 220 rlambd = rlambd + eps3
124 if (select(i) .and. dabs(wr(i)-rlambd) .lt. eps3 .and.
125 x dabs(wi(i)-ilambd) .lt. eps3) go to 220
143 rv1(i) = eps3
164 x rm1(mp,mp) = eps3
176 x rm1(uk,uk) = eps3
224 y = eps3 / (x + 1.0d0)
225 rv1(1) = eps3
[all …]
|
| H A D | invit.f | 129 eps3 = epslon(norm)
141 220 rlambd = rlambd + eps3
146 x dabs(wi(i)-ilambd) .lt. eps3) go to 220
164 rv1(i) = eps3
184 360 if (rm1(mp,mp) .eq. 0.0d0) rm1(mp,mp) = eps3
193 420 if (rm1(uk,uk) .eq. 0.0d0) rm1(uk,uk) = eps3
260 rm1(mp,mp) = eps3
264 x = eps3 * eps3
354 y = eps3 / (x + 1.0d0)
355 rv1(1) = eps3
[all …]
|
| /dports/science/elmerfem/elmerfem-release-9.0/fem/src/ |
| H A D | Interpolation.F90 | 84 REAL(KIND=dp) :: BBox(6), eps3 local
97 BBox(1:3) = BBox(1:3) - eps3
98 BBox(4:6) = BBox(4:6) + eps3
481 REAL(KIND=dp) :: eps3 local
525 eps3 = 0.0d0
526 eps3 = MAX( eps3, BBox(4) - BBox(1) )
527 eps3 = MAX( eps3, BBox(5) - BBox(2) )
528 eps3 = MAX( eps3, BBox(6) - BBox(3) )
529 eps3 = eps2 * eps3
531 BBox(1:3) = BBox(1:3) - eps3
[all …]
|
| /dports/science/afni/afni-AFNI_21.3.16/src/eispack/ |
| H A D | eis_invit.c | 38 doublereal eps3=0.0; in invit_() local
212 eps3 = epslon_(&norm); in invit_()
228 rlambd += eps3; in invit_()
261 rv1[i__] = eps3; in invit_()
294 rm1[mp + mp * rm1_dim1] = eps3; in invit_()
313 rm1[uk + uk * rm1_dim1] = eps3; in invit_()
424 rm1[mp + mp * rm1_dim1] = eps3; in invit_()
432 x = eps3 * eps3; in invit_()
587 y = eps3 / (x + 1.); in invit_()
588 rv1[1] = eps3; in invit_()
[all …]
|
| H A D | eis_cinvit.c | 38 doublereal eps3=0.0; in cinvit_() local
192 eps3 = epslon_(&norm); in cinvit_()
208 rlambd += eps3; in cinvit_()
214 if (select[i__] && (d__1 = wr[i__] - rlambd, abs(d__1)) < eps3 && in cinvit_()
215 (d__2 = wi[i__] - ilambd, abs(d__2)) < eps3) { in cinvit_()
240 rv1[i__] = eps3; in cinvit_()
272 rm1[mp + mp * rm1_dim1] = eps3; in cinvit_()
295 rm1[uk + uk * rm1_dim1] = eps3; in cinvit_()
370 y = eps3 / (x + 1.); in cinvit_()
371 rv1[1] = eps3; in cinvit_()
[all …]
|
| /dports/math/cppad/CppAD-20210000.8/test_more/general/ |
| H A D | num_limits.cpp | 86 value eps3( Type(3) * CppAD::numeric_limits<Type>::epsilon() ); in check_min() local
93 ok &= abs_geq(tmp.get()/min.get() - one.get(), eps3.get()); in check_min()
97 ok &= ! abs_geq(tmp.get()/min.get() - one.get(), eps3.get()); in check_min()
107 value eps3( Type(3) * CppAD::numeric_limits<Type>::epsilon() ); in check_max() local
120 tmp.get() / max2.get() - one.get(), eps3.get() in check_max()
125 ok &= ! abs_geq(tmp.get() / max2.get() - one.get(), eps3.get() ); in check_max()
|