| /dports/math/octave/octave-6.4.0/liboctave/external/amos/ |
| H A D | zuni1.f | 19 DOUBLE PRECISION ALIM, APHI, ASCLE, BRY, CONER, CRSC, local
139 ASCLE = BRY(IFLAG)
159 IF (C2M.LE.ASCLE) GO TO 90
161 ASCLE = BRY(IFLAG)
|
| H A D | zbesh.f | 161 * ZNI, ZNR, ZR, ZTI, D1MACH, XZABS, BB, ASCLE, RTOL, ATOL, STI, local
308 ASCLE = UFL*RTOL
319 IF (DMAX1(DABS(AA),DABS(BB)).GT.ASCLE) GO TO 135
|
| H A D | cbesh.f | 158 * BB, ASCLE, RTOL, ATOL local
299 ASCLE = UFL*RTOL
307 IF (AMAX1(ABS(AA),ABS(BB)).GT.ASCLE) GO TO 125
|
| H A D | zunk2.f | 21 * ARGDR, ARGI, ARGR, ASC, ASCLE, ASUMDI, ASUMDR, ASUMI, ASUMR, local
254 ASCLE = BRY(KFLAG)
272 IF (C2M.LE.ASCLE) GO TO 130
274 ASCLE = BRY(KFLAG)
459 ASCLE = BRY(IFLAG)
488 IF (C2M.LE.ASCLE) GO TO 310
490 ASCLE = BRY(IFLAG)
|
| H A D | zuni2.f | 21 * ARGR, ASCLE, ASUMI, ASUMR, BRY, BSUMI, BSUMR, CIDI, CIPI, CIPR, local
186 ASCLE = BRY(IFLAG)
206 IF (C2M.LE.ASCLE) GO TO 100
208 ASCLE = BRY(IFLAG)
|
| /dports/www/grafana8/grafana-8.3.6/vendor/gonum.org/v1/gonum/mathext/internal/amos/amoslib/ |
| H A D | zuni1.f | 19 DOUBLE PRECISION ALIM, APHI, ASCLE, BRY, CONER, CRSC,
139 ASCLE = BRY(IFLAG)
159 IF (C2M.LE.ASCLE) GO TO 90
161 ASCLE = BRY(IFLAG)
|
| H A D | zbesh.f | 161 * ZNI, ZNR, ZR, ZTI, D1MACH, ZABS, BB, ASCLE, RTOL, ATOL, STI,
307 ASCLE = UFL*RTOL
318 IF (DMAX1(DABS(AA),DABS(BB)).GT.ASCLE) GO TO 135
|
| H A D | zunk2.f | 21 * ARGDR, ARGI, ARGR, ASC, ASCLE, ASUMDI, ASUMDR, ASUMI, ASUMR,
254 ASCLE = BRY(KFLAG)
272 IF (C2M.LE.ASCLE) GO TO 130
274 ASCLE = BRY(KFLAG)
459 ASCLE = BRY(IFLAG)
488 IF (C2M.LE.ASCLE) GO TO 310
490 ASCLE = BRY(IFLAG)
|
| /dports/sysutils/istio/istio-1.6.7/vendor/github.com/openshift/api/vendor/gonum.org/v1/gonum/mathext/internal/amos/amoslib/ |
| H A D | zuni1.f | 19 DOUBLE PRECISION ALIM, APHI, ASCLE, BRY, CONER, CRSC,
139 ASCLE = BRY(IFLAG)
159 IF (C2M.LE.ASCLE) GO TO 90
161 ASCLE = BRY(IFLAG)
|
| H A D | zbesh.f | 161 * ZNI, ZNR, ZR, ZTI, D1MACH, ZABS, BB, ASCLE, RTOL, ATOL, STI,
307 ASCLE = UFL*RTOL
318 IF (DMAX1(DABS(AA),DABS(BB)).GT.ASCLE) GO TO 135
|
| H A D | zunk2.f | 21 * ARGDR, ARGI, ARGR, ASC, ASCLE, ASUMDI, ASUMDR, ASUMI, ASUMR,
254 ASCLE = BRY(KFLAG)
272 IF (C2M.LE.ASCLE) GO TO 130
274 ASCLE = BRY(KFLAG)
459 ASCLE = BRY(IFLAG)
488 IF (C2M.LE.ASCLE) GO TO 310
490 ASCLE = BRY(IFLAG)
|
| /dports/math/xlife++/xlifepp-sources-v2.0.1-2018-05-09/ext/Amos/ |
| H A D | cbesh.f | 158 * BB, ASCLE, RTOL, ATOL
298 ASCLE = UFL*RTOL
306 IF (AMAX1(ABS(AA),ABS(BB)).GT.ASCLE) GO TO 125
|
| H A D | zbesh.f | 162 * ZNI, ZNR, ZR, ZTI, D1MACH, ZABS, BB, ASCLE, RTOL, ATOL, STI,
308 ASCLE = UFL*RTOL
319 IF (DMAX1(DABS(AA),DABS(BB)).GT.ASCLE) GO TO 135
|
| H A D | zunk2.f | 22 * ARGDR, ARGI, ARGR, ASC, ASCLE, ASUMDI, ASUMDR, ASUMI, ASUMR,
255 ASCLE = BRY(KFLAG)
273 IF (C2M.LE.ASCLE) GO TO 130
275 ASCLE = BRY(KFLAG)
460 ASCLE = BRY(IFLAG)
489 IF (C2M.LE.ASCLE) GO TO 310
491 ASCLE = BRY(IFLAG)
|
| /dports/science/py-scipy/scipy-1.7.1/scipy/special/amos/ |
| H A D | zbesh.f | 161 * ZNI, ZNR, ZR, ZTI, D1MACH, AZABS, BB, ASCLE, RTOL, ATOL, STI, local
307 ASCLE = UFL*RTOL
318 IF (DMAX1(DABS(AA),DABS(BB)).GT.ASCLE) GO TO 135
|
| H A D | zunk2.f | 21 * ARGDR, ARGI, ARGR, ASC, ASCLE, ASUMDI, ASUMDR, ASUMI, ASUMR, local
254 ASCLE = BRY(KFLAG)
272 IF (C2M.LE.ASCLE) GO TO 130
274 ASCLE = BRY(KFLAG)
459 ASCLE = BRY(IFLAG)
488 IF (C2M.LE.ASCLE) GO TO 310
490 ASCLE = BRY(IFLAG)
|
| H A D | zuni2.f | 21 * ARGR, ASCLE, ASUMI, ASUMR, BRY, BSUMI, BSUMR, CIDI, CIPI, CIPR, local
186 ASCLE = BRY(IFLAG)
206 IF (C2M.LE.ASCLE) GO TO 100
208 ASCLE = BRY(IFLAG)
|
| /dports/math/maxima/maxima-5.43.2/src/numerical/slatec/fortran/ |
| H A D | zbesh.f | 163 * ZNI, ZNR, ZR, ZTI, D1MACH, ZABS, BB, ASCLE, RTOL, ATOL, STI, local
310 ASCLE = UFL*RTOL
321 IF (MAX(ABS(AA),ABS(BB)).GT.ASCLE) GO TO 135
|
| H A D | zunk2.f | 31 * ARGDR, ARGI, ARGR, ASC, ASCLE, ASUMDI, ASUMDR, ASUMI, ASUMR, local
265 ASCLE = BRY(KFLAG)
283 IF (C2M.LE.ASCLE) GO TO 130
285 ASCLE = BRY(KFLAG)
470 ASCLE = BRY(IFLAG)
499 IF (C2M.LE.ASCLE) GO TO 310
501 ASCLE = BRY(IFLAG)
|
| /dports/math/slatec/src/ |
| H A D | zbesh.f | 163 * ZNI, ZNR, ZR, ZTI, D1MACH, ZABS, BB, ASCLE, RTOL, ATOL, STI,
310 ASCLE = UFL*RTOL
321 IF (MAX(ABS(AA),ABS(BB)).GT.ASCLE) GO TO 135
|
| H A D | cbesh.f | 158 * BB, ASCLE, RTOL, ATOL
298 ASCLE = UFL*RTOL
306 IF (MAX(ABS(AA),ABS(BB)).GT.ASCLE) GO TO 125
|
| H A D | zunk2.f | 31 * ARGDR, ARGI, ARGR, ASC, ASCLE, ASUMDI, ASUMDR, ASUMI, ASUMR,
265 ASCLE = BRY(KFLAG)
283 IF (C2M.LE.ASCLE) GO TO 130
285 ASCLE = BRY(KFLAG)
470 ASCLE = BRY(IFLAG)
499 IF (C2M.LE.ASCLE) GO TO 310
501 ASCLE = BRY(IFLAG)
|
| /dports/math/scilab/scilab-6.1.1/scilab/modules/elementary_functions/src/fortran/slatec/ |
| H A D | zbesh.f | 163 * ZNI, ZNR, ZR, ZTI, D1MACH, ZABS, BB, ASCLE, RTOL, ATOL, STI, local
310 ASCLE = UFL*RTOL
321 IF (MAX(ABS(AA),ABS(BB)).GT.ASCLE) GO TO 135
|
| H A D | zunk2.f | 31 * ARGDR, ARGI, ARGR, ASC, ASCLE, ASUMDI, ASUMDR, ASUMI, ASUMR, local
265 ASCLE = BRY(KFLAG)
283 IF (C2M.LE.ASCLE) GO TO 130
285 ASCLE = BRY(KFLAG)
470 ASCLE = BRY(IFLAG)
499 IF (C2M.LE.ASCLE) GO TO 310
501 ASCLE = BRY(IFLAG)
|
| /dports/sysutils/istio/istio-1.6.7/vendor/github.com/openshift/api/vendor/gonum.org/v1/gonum/mathext/internal/amos/ |
| H A D | amos.go | 1000 ASCLE = BRY[KFLAG]
1018 if P2M <= ASCLE {
1022 ASCLE = BRY[KFLAG]
1058 ASCLE = BRY[KFLAG]
1078 if P2M <= ASCLE {
1082 ASCLE = BRY[KFLAG]
1101 ASCLE = BRY[1]
1131 NW = Zuchk(p, ASCLE, TOL)
1185 ASCLE = BRY[1]
1277 NW = Zuchk(c, ASCLE, TOL)
[all …]
|