/dports/math/xlife++/xlifepp-sources-v2.0.1-2018-05-09/ext/Amos/ |
H A D | zmlri.f | 34 P1R = ZEROR 52 P1R = PTR 68 P1R = ZEROR 85 P1R = PTR 107 P1R = ZEROR 127 P1R = PTR 144 P1R = PTR 163 P1R = PTR 191 CKR = STR*P1R 192 CKI = STI*P1R [all …]
|
H A D | zrati.f | 41 P1R = CONER 47 AP1 = ZABS(P1R,P1I) 58 P1R = P1R*RAP1 68 P2R = P1R - (T1R*PTR-T1I*PTI) 70 P1R = PTR 89 P1R = 1.0D0/AP2 94 PTR = P1R 99 P1R = (PTR*TTR-PTI*TTI) + P2R 105 IF (P1R.NE.CZEROR .OR. P1I.NE.CZEROI) GO TO 40 106 P1R = TOL [all …]
|
H A D | zbknu.f | 260 P1R = CZEROR 267 P1R = PTR 297 P1R = CZEROR 313 P1R = PTR 343 P1R = P1R*PTR 387 P2R = S2R*P1R 388 P2I = S2I*P1R 395 S1R = S1R*P1R 396 S1I = S1I*P1R 432 P2R = S2R*P1R [all …]
|
/dports/science/py-scipy/scipy-1.7.1/scipy/special/amos/ |
H A D | zmlri.f | 33 P1R = ZEROR 51 P1R = PTR 67 P1R = ZEROR 84 P1R = PTR 106 P1R = ZEROR 126 P1R = PTR 143 P1R = PTR 162 P1R = PTR 190 CKR = STR*P1R 191 CKI = STI*P1R [all …]
|
H A D | zrati.f | 40 P1R = CONER 46 AP1 = AZABS(P1R,P1I) 57 P1R = P1R*RAP1 67 P2R = P1R - (T1R*PTR-T1I*PTI) 69 P1R = PTR 88 P1R = 1.0D0/AP2 93 PTR = P1R 98 P1R = (PTR*TTR-PTI*TTI) + P2R 104 IF (P1R.NE.CZEROR .OR. P1I.NE.CZEROI) GO TO 40 105 P1R = TOL [all …]
|
H A D | zbknu.f | 259 P1R = CZEROR 266 P1R = PTR 296 P1R = CZEROR 312 P1R = PTR 342 P1R = P1R*PTR 386 P2R = S2R*P1R 387 P2I = S2I*P1R 394 S1R = S1R*P1R 395 S1I = S1I*P1R 431 P2R = S2R*P1R [all …]
|
/dports/www/grafana8/grafana-8.3.6/vendor/gonum.org/v1/gonum/mathext/internal/amos/amoslib/ |
H A D | zmlri.f | 33 P1R = ZEROR 51 P1R = PTR 69 P1R = ZEROR 86 P1R = PTR 108 P1R = ZEROR 128 P1R = PTR 145 P1R = PTR 164 P1R = PTR 192 CKR = STR*P1R 193 CKI = STI*P1R [all …]
|
H A D | zrati.f | 40 P1R = CONER 46 AP1 = ZABS(CMPLX(P1R,P1I,kind=KIND(1.0D0))) 57 P1R = P1R*RAP1 67 P2R = P1R - (T1R*PTR-T1I*PTI) 69 P1R = PTR 88 P1R = 1.0D0/AP2 93 PTR = P1R 98 P1R = (PTR*TTR-PTI*TTI) + P2R 104 IF (P1R.NE.CZEROR .OR. P1I.NE.CZEROI) GO TO 40 105 P1R = TOL [all …]
|
H A D | zbknu.f | 259 P1R = CZEROR 266 P1R = PTR 296 P1R = CZEROR 312 P1R = PTR 342 P1R = P1R*PTR 386 P2R = S2R*P1R 387 P2I = S2I*P1R 394 S1R = S1R*P1R 395 S1I = S1I*P1R 431 P2R = S2R*P1R [all …]
|
/dports/math/maxima/maxima-5.43.2/src/numerical/slatec/fortran/ |
H A D | zmlri.f | 46 P1R = ZEROR 64 P1R = PTR 80 P1R = ZEROR 97 P1R = PTR 119 P1R = ZEROR 139 P1R = PTR 156 P1R = PTR 175 P1R = PTR 203 CKR = STR*P1R 204 CKI = STI*P1R [all …]
|
H A D | zrati.f | 51 P1R = CONER 57 AP1 = ZABS(P1R,P1I) 68 P1R = P1R*RAP1 78 P2R = P1R - (T1R*PTR-T1I*PTI) 80 P1R = PTR 99 P1R = 1.0D0/AP2 104 PTR = P1R 109 P1R = (PTR*TTR-PTI*TTI) + P2R 115 IF (P1R.NE.CZEROR .OR. P1I.NE.CZEROI) GO TO 40 116 P1R = TOL [all …]
|
H A D | zbknu.f | 271 P1R = CZEROR 278 P1R = PTR 308 P1R = CZEROR 324 P1R = PTR 354 P1R = P1R*PTR 398 P2R = S2R*P1R 399 P2I = S2I*P1R 406 S1R = S1R*P1R 407 S1I = S1I*P1R 443 P2R = S2R*P1R [all …]
|
/dports/math/octave/octave-6.4.0/liboctave/external/amos/ |
H A D | zmlri.f | 33 P1R = ZEROR 51 P1R = PTR 67 P1R = ZEROR 84 P1R = PTR 106 P1R = ZEROR 126 P1R = PTR 143 P1R = PTR 162 P1R = PTR 190 CKR = STR*P1R 191 CKI = STI*P1R [all …]
|
H A D | zrati.f | 40 P1R = CONER 46 AP1 = XZABS(P1R,P1I) 57 P1R = P1R*RAP1 67 P2R = P1R - (T1R*PTR-T1I*PTI) 69 P1R = PTR 88 P1R = 1.0D0/AP2 93 PTR = P1R 98 P1R = (PTR*TTR-PTI*TTI) + P2R 104 IF (P1R.NE.CZEROR .OR. P1I.NE.CZEROI) GO TO 40 105 P1R = TOL [all …]
|
H A D | zbknu.f | 259 P1R = CZEROR 266 P1R = PTR 296 P1R = CZEROR 312 P1R = PTR 342 P1R = P1R*PTR 386 P2R = S2R*P1R 387 P2I = S2I*P1R 394 S1R = S1R*P1R 395 S1I = S1I*P1R 431 P2R = S2R*P1R [all …]
|
/dports/math/slatec/src/ |
H A D | zmlri.f | 46 P1R = ZEROR 64 P1R = PTR 80 P1R = ZEROR 97 P1R = PTR 119 P1R = ZEROR 139 P1R = PTR 156 P1R = PTR 175 P1R = PTR 203 CKR = STR*P1R 204 CKI = STI*P1R [all …]
|
H A D | zrati.f | 51 P1R = CONER 57 AP1 = ZABS(P1R,P1I) 68 P1R = P1R*RAP1 78 P2R = P1R - (T1R*PTR-T1I*PTI) 80 P1R = PTR 99 P1R = 1.0D0/AP2 104 PTR = P1R 109 P1R = (PTR*TTR-PTI*TTI) + P2R 115 IF (P1R.NE.CZEROR .OR. P1I.NE.CZEROI) GO TO 40 116 P1R = TOL [all …]
|
H A D | zbknu.f | 271 P1R = CZEROR 278 P1R = PTR 308 P1R = CZEROR 324 P1R = PTR 354 P1R = P1R*PTR 398 P2R = S2R*P1R 399 P2I = S2I*P1R 406 S1R = S1R*P1R 407 S1I = S1I*P1R 443 P2R = S2R*P1R [all …]
|
/dports/math/scilab/scilab-6.1.1/scilab/modules/elementary_functions/src/fortran/slatec/ |
H A D | zmlri.f | 46 P1R = ZEROR 64 P1R = PTR 80 P1R = ZEROR 97 P1R = PTR 119 P1R = ZEROR 139 P1R = PTR 156 P1R = PTR 175 P1R = PTR 203 CKR = STR*P1R 204 CKI = STI*P1R [all …]
|
H A D | zrati.f | 51 P1R = CONER 57 AP1 = ZABS(P1R,P1I) 68 P1R = P1R*RAP1 78 P2R = P1R - (T1R*PTR-T1I*PTI) 80 P1R = PTR 99 P1R = 1.0D0/AP2 104 PTR = P1R 109 P1R = (PTR*TTR-PTI*TTI) + P2R 115 IF (P1R.NE.CZEROR .OR. P1I.NE.CZEROI) GO TO 40 116 P1R = TOL [all …]
|
H A D | zbknu.f | 271 P1R = CZEROR 278 P1R = PTR 308 P1R = CZEROR 324 P1R = PTR 354 P1R = P1R*PTR 398 P2R = S2R*P1R 399 P2I = S2I*P1R 406 S1R = S1R*P1R 407 S1I = S1I*P1R 443 P2R = S2R*P1R [all …]
|
/dports/sysutils/istio/istio-1.6.7/vendor/github.com/openshift/api/vendor/gonum.org/v1/gonum/mathext/internal/amos/amoslib/ |
H A D | zmlri.f | 33 P1R = ZEROR 51 P1R = PTR 69 P1R = ZEROR 86 P1R = PTR 108 P1R = ZEROR 128 P1R = PTR 145 P1R = PTR 164 P1R = PTR 192 CKR = STR*P1R 193 CKI = STI*P1R [all …]
|
H A D | zrati.f | 40 P1R = CONER 46 AP1 = ZABS(CMPLX(P1R,P1I,kind=KIND(1.0D0))) 57 P1R = P1R*RAP1 67 P2R = P1R - (T1R*PTR-T1I*PTI) 69 P1R = PTR 88 P1R = 1.0D0/AP2 93 PTR = P1R 98 P1R = (PTR*TTR-PTI*TTI) + P2R 104 IF (P1R.NE.CZEROR .OR. P1I.NE.CZEROI) GO TO 40 105 P1R = TOL [all …]
|
H A D | zbknu.f | 259 P1R = CZEROR 266 P1R = PTR 296 P1R = CZEROR 312 P1R = PTR 342 P1R = P1R*PTR 386 P2R = S2R*P1R 387 P2I = S2I*P1R 394 S1R = S1R*P1R 395 S1I = S1I*P1R 431 P2R = S2R*P1R [all …]
|
/dports/www/grafana8/grafana-8.3.6/vendor/gonum.org/v1/gonum/mathext/internal/amos/ |
H A D | amos.go | 874 P1R = PTR 918 P1R = PTR 951 P1R = P1R * PTR 1620 P1R = AK 1625 P1R = -P1R 1688 P1R = -P1R 1777 P1R = PTR 1812 P1R = PTR 1854 P1R = PTR 1873 P1R = PTR [all …]
|