| /dports/astro/pykep/pykep-2.6/src/third_party/cspice/ |
| H A D | zzgflong.c | 91 doublereal cmpval, extval, locref, loctol, prxval, sv, xrfval; in zzgflong_() local
1575 loctol = max(d__1,d__2); in zzgflong_()
1913 zzgfudlt_, (S_fp)zzgfcosg_, "=", &prxval, &loctol, &c_b70, in zzgflong_()
1926 zzgfudlt_, (S_fp)zzgfcocg_, "=", &prxval, &loctol, &c_b70, in zzgflong_()
2019 zzgfudlt_, (S_fp)zzgfcocg_, prxrel, &prxval, &loctol, &c_b70, in zzgflong_()
2055 zzgfudlt_, (S_fp)zzgfcocg_, prxrel, &prxval, &loctol, &c_b70, in zzgflong_()
2121 zzgfudlt_, (S_fp)zzgfcog_, uop, &c_b70, &loctol, &c_b70, & in zzgflong_()
2300 S_fp)zzgfcocg_, ">", &c_b70, &loctol, &c_b70, cnfine, mw, nw, in zzgflong_()
2486 zzgfudlt_, (S_fp)zzgfcocg_, uop, &c_b70, &loctol, &c_b70, in zzgflong_()
2908 zzgfudlt_, (S_fp)zzgfcog_, "<", &prxval, &loctol, &c_b70, in zzgflong_()
[all …]
|
| /dports/astro/py-pykep/pykep-2.6/src/third_party/cspice/ |
| H A D | zzgflong.c | 91 doublereal cmpval, extval, locref, loctol, prxval, sv, xrfval; in zzgflong_() local
1575 loctol = max(d__1,d__2); in zzgflong_()
1913 zzgfudlt_, (S_fp)zzgfcosg_, "=", &prxval, &loctol, &c_b70, in zzgflong_()
1926 zzgfudlt_, (S_fp)zzgfcocg_, "=", &prxval, &loctol, &c_b70, in zzgflong_()
2019 zzgfudlt_, (S_fp)zzgfcocg_, prxrel, &prxval, &loctol, &c_b70, in zzgflong_()
2055 zzgfudlt_, (S_fp)zzgfcocg_, prxrel, &prxval, &loctol, &c_b70, in zzgflong_()
2121 zzgfudlt_, (S_fp)zzgfcog_, uop, &c_b70, &loctol, &c_b70, & in zzgflong_()
2300 S_fp)zzgfcocg_, ">", &c_b70, &loctol, &c_b70, cnfine, mw, nw, in zzgflong_()
2486 zzgfudlt_, (S_fp)zzgfcocg_, uop, &c_b70, &loctol, &c_b70, in zzgflong_()
2908 zzgfudlt_, (S_fp)zzgfcog_, "<", &prxval, &loctol, &c_b70, in zzgflong_()
[all …]
|
| /dports/math/R-cran-SparseM/SparseM/src/ |
| H A D | sparskit.f | 579 double precision loctol
588 loctol = drptol
590 if( a(k) .gt. loctol)then
607 loctol = drptol
609 if( a(k) .ge. loctol)then
626 loctol = drptol
628 if( a(k) .eq. loctol)then
645 loctol = drptol
647 if( a(k) .ne. loctol)then
|
| /dports/science/getdp/getdp-3.4.0-source/contrib/Sparskit/ |
| H A D | unary.f | 171 real*8 norm,loctol
194 400 loctol = drptol * norm
196 if( abs(a(k)) .gt. loctol)then
261 real*8 norm,loctol
282 400 loctol = drop * norm
284 if( abs(a(k)) .gt. loctol)then
|