/dports/science/py-scipy/scipy-1.7.1/scipy/special/amos/ |
H A D | zacon.f | 69 C1I = S1I 77 SC1I = C1I 79 CALL ZMLT(CSPNR, CSPNI, C1R, C1I, STR, STI) 89 C1I = S2I 96 SC2I = C1I 151 C1I = S2I*CSR 153 STI = C1I 163 SC2I = C1I 173 PTR = CSPNR*C1R - CSPNI*C1I 174 PTI = CSPNR*C1I + CSPNI*C1R [all …]
|
H A D | zs1s2.f | 17 DOUBLE PRECISION AA, ALIM, ALN, ASCLE, AS1, AS2, C1I, C1R, S1DI, local 33 CALL AZLOG(S1DR, S1DI, C1R, C1I, IDUM) 35 C1I = C1I - ZRI - ZRI 36 CALL AZEXP(C1R, C1I, S1R, S1I)
|
H A D | zacai.f | 21 * CSPNI, C1R, C1I, C2R, C2I, CYR, CYI, DFNU, ELIM, FMR, FNU, PI, local 83 C1I = CYI(1) 89 CALL ZS1S2(ZNR, ZNI, C1R, C1I, C2R, C2I, NW, ASCLE, ALIM, IUF) 92 YR(1) = CSPNR*C1R - CSPNI*C1I + CSGNR*C2R - CSGNI*C2I 93 YI(1) = CSPNR*C1I + CSPNI*C1R + CSGNR*C2I + CSGNI*C2R
|
/dports/math/octave/octave-6.4.0/liboctave/external/amos/ |
H A D | zacon.f | 69 C1I = S1I 77 SC1I = C1I 79 CALL ZMLT(CSPNR, CSPNI, C1R, C1I, STR, STI) 89 C1I = S2I 96 SC2I = C1I 151 C1I = S2I*CSR 153 STI = C1I 163 SC2I = C1I 173 PTR = CSPNR*C1R - CSPNI*C1I 174 PTI = CSPNR*C1I + CSPNI*C1R [all …]
|
H A D | zs1s2.f | 17 DOUBLE PRECISION AA, ALIM, ALN, ASCLE, AS1, AS2, C1I, C1R, S1DI, local 33 CALL XZLOG(S1DR, S1DI, C1R, C1I, IDUM) 35 C1I = C1I - ZRI - ZRI 36 CALL XZEXP(C1R, C1I, S1R, S1I)
|
H A D | zacai.f | 21 * CSPNI, C1R, C1I, C2R, C2I, CYR, CYI, DFNU, ELIM, FMR, FNU, PI, local 83 C1I = CYI(1) 89 CALL ZS1S2(ZNR, ZNI, C1R, C1I, C2R, C2I, NW, ASCLE, ALIM, IUF) 92 YR(1) = CSPNR*C1R - CSPNI*C1I + CSGNR*C2R - CSGNI*C2I 93 YI(1) = CSPNR*C1I + CSPNI*C1R + CSGNR*C2I + CSGNI*C2R
|
/dports/www/grafana8/grafana-8.3.6/vendor/gonum.org/v1/gonum/mathext/internal/amos/amoslib/ |
H A D | zacon.f | 69 C1I = S1I 77 SC1I = C1I 79 CALL ZMLT(CSPNR, CSPNI, C1R, C1I, STR, STI) 89 C1I = S2I 96 SC2I = C1I 151 C1I = S2I*CSR 153 STI = C1I 163 SC2I = C1I 173 PTR = CSPNR*C1R - CSPNI*C1I 174 PTI = CSPNR*C1I + CSPNI*C1R [all …]
|
H A D | zs1s2.f | 17 DOUBLE PRECISION AA, ALIM, ALN, ASCLE, AS1, AS2, C1I, C1R, S1DI, 33 CALL ZLOG(S1DR, S1DI, C1R, C1I, IDUM) 35 C1I = C1I - ZRI - ZRI 36 CALL ZEXP(C1R, C1I, S1R, S1I)
|
H A D | zacai.f | 21 * CSPNI, C1R, C1I, C2R, C2I, CYR, CYI, DFNU, ELIM, FMR, FNU, PI, 83 C1I = CYI(1) 89 CALL ZS1S2(ZNR, ZNI, C1R, C1I, C2R, C2I, NW, ASCLE, ALIM, IUF) 92 YR(1) = CSPNR*C1R - CSPNI*C1I + CSGNR*C2R - CSGNI*C2I 93 YI(1) = CSPNR*C1I + CSPNI*C1R + CSGNR*C2I + CSGNI*C2R
|
/dports/math/maxima/maxima-5.43.2/src/numerical/slatec/fortran/ |
H A D | zacon.f | 81 C1I = S1I 89 SC1I = C1I 91 CALL ZMLT(CSPNR, CSPNI, C1R, C1I, STR, STI) 101 C1I = S2I 108 SC2I = C1I 163 C1I = S2I*CSR 165 STI = C1I 175 SC2I = C1I 185 PTR = CSPNR*C1R - CSPNI*C1I 186 PTI = CSPNR*C1I + CSPNI*C1R [all …]
|
H A D | zs1s2.f | 28 DOUBLE PRECISION AA, ALIM, ALN, ASCLE, AS1, AS2, C1I, C1R, S1DI, local 46 CALL ZLOG(S1DR, S1DI, C1R, C1I, IDUM) 48 C1I = C1I - ZRI - ZRI 49 CALL ZEXP(C1R, C1I, S1R, S1I)
|
H A D | zacai.f | 31 * CSPNI, C1R, C1I, C2R, C2I, CYR, CYI, DFNU, ELIM, FMR, FNU, PI, local 95 C1I = CYI(1) 101 CALL ZS1S2(ZNR, ZNI, C1R, C1I, C2R, C2I, NW, ASCLE, ALIM, IUF) 104 YR(1) = CSPNR*C1R - CSPNI*C1I + CSGNR*C2R - CSGNI*C2I 105 YI(1) = CSPNR*C1I + CSPNI*C1R + CSGNR*C2I + CSGNI*C2R
|
H A D | zbesy.f | 161 DOUBLE PRECISION CWRKI, CWRKR, CYI, CYR, C1I, C1R, C2I, C2R, local 205 C1I = EXI*EY 237 STR = STR - (AA*C1R - BB*C1I)*ATOL 238 STI = STI - (AA*C1I + BB*C1R)*ATOL 247 C1I = EXI
|
/dports/math/slatec/src/ |
H A D | zacon.f | 81 C1I = S1I 89 SC1I = C1I 91 CALL ZMLT(CSPNR, CSPNI, C1R, C1I, STR, STI) 101 C1I = S2I 108 SC2I = C1I 163 C1I = S2I*CSR 165 STI = C1I 175 SC2I = C1I 185 PTR = CSPNR*C1R - CSPNI*C1I 186 PTI = CSPNR*C1I + CSPNI*C1R [all …]
|
H A D | zs1s2.f | 28 DOUBLE PRECISION AA, ALIM, ALN, ASCLE, AS1, AS2, C1I, C1R, S1DI, 46 CALL ZLOG(S1DR, S1DI, C1R, C1I, IDUM) 48 C1I = C1I - ZRI - ZRI 49 CALL ZEXP(C1R, C1I, S1R, S1I)
|
H A D | zacai.f | 31 * CSPNI, C1R, C1I, C2R, C2I, CYR, CYI, DFNU, ELIM, FMR, FNU, PI, 95 C1I = CYI(1) 101 CALL ZS1S2(ZNR, ZNI, C1R, C1I, C2R, C2I, NW, ASCLE, ALIM, IUF) 104 YR(1) = CSPNR*C1R - CSPNI*C1I + CSGNR*C2R - CSGNI*C2I 105 YI(1) = CSPNR*C1I + CSPNI*C1R + CSGNR*C2I + CSGNI*C2R
|
/dports/math/scilab/scilab-6.1.1/scilab/modules/elementary_functions/src/fortran/slatec/ |
H A D | zacon.f | 81 C1I = S1I 89 SC1I = C1I 91 CALL ZMLT(CSPNR, CSPNI, C1R, C1I, STR, STI) 101 C1I = S2I 108 SC2I = C1I 163 C1I = S2I*CSR 165 STI = C1I 175 SC2I = C1I 185 PTR = CSPNR*C1R - CSPNI*C1I 186 PTI = CSPNR*C1I + CSPNI*C1R [all …]
|
H A D | zs1s2.f | 28 DOUBLE PRECISION AA, ALIM, ALN, ASCLE, AS1, AS2, C1I, C1R, S1DI, 46 CALL ZLOG(S1DR, S1DI, C1R, C1I, IDUM) 48 C1I = C1I - ZRI - ZRI 49 CALL ZEXP(C1R, C1I, S1R, S1I)
|
H A D | zacai.f | 31 * CSPNI, C1R, C1I, C2R, C2I, CYR, CYI, DFNU, ELIM, FMR, FNU, PI, 95 C1I = CYI(1) 101 CALL ZS1S2(ZNR, ZNI, C1R, C1I, C2R, C2I, NW, ASCLE, ALIM, IUF) 104 YR(1) = CSPNR*C1R - CSPNI*C1I + CSGNR*C2R - CSGNI*C2I 105 YI(1) = CSPNR*C1I + CSPNI*C1R + CSGNR*C2I + CSGNI*C2R
|
/dports/math/xlife++/xlifepp-sources-v2.0.1-2018-05-09/ext/Amos/ |
H A D | zacon.f | 70 C1I = S1I 78 SC1I = C1I 80 CALL ZMLT(CSPNR, CSPNI, C1R, C1I, STR, STI) 90 C1I = S2I 97 SC2I = C1I 152 C1I = S2I*CSR 154 STI = C1I 164 SC2I = C1I 174 PTR = CSPNR*C1R - CSPNI*C1I 175 PTI = CSPNR*C1I + CSPNI*C1R [all …]
|
H A D | zs1s2.f | 18 DOUBLE PRECISION AA, ALIM, ALN, ASCLE, AS1, AS2, C1I, C1R, S1DI, 34 CALL ZLOG(S1DR, S1DI, C1R, C1I, IDUM) 36 C1I = C1I - ZRI - ZRI 37 CALL ZEXPAMOS(C1R, C1I, S1R, S1I)
|
H A D | zacai.f | 22 * CSPNI, C1R, C1I, C2R, C2I, CYR, CYI, DFNU, ELIM, FMR, FNU, PI, 84 C1I = CYI(1) 90 CALL ZS1S2(ZNR, ZNI, C1R, C1I, C2R, C2I, NW, ASCLE, ALIM, IUF) 93 YR(1) = CSPNR*C1R - CSPNI*C1I + CSGNR*C2R - CSGNI*C2I 94 YI(1) = CSPNR*C1I + CSPNI*C1R + CSGNR*C2I + CSGNI*C2R
|
/dports/sysutils/istio/istio-1.6.7/vendor/github.com/openshift/api/vendor/gonum.org/v1/gonum/mathext/internal/amos/amoslib/ |
H A D | zacon.f | 69 C1I = S1I 77 SC1I = C1I 79 CALL ZMLT(CSPNR, CSPNI, C1R, C1I, STR, STI) 89 C1I = S2I 96 SC2I = C1I 151 C1I = S2I*CSR 153 STI = C1I 163 SC2I = C1I 173 PTR = CSPNR*C1R - CSPNI*C1I 174 PTI = CSPNR*C1I + CSPNI*C1R [all …]
|
H A D | zs1s2.f | 17 DOUBLE PRECISION AA, ALIM, ALN, ASCLE, AS1, AS2, C1I, C1R, S1DI, 33 CALL ZLOG(S1DR, S1DI, C1R, C1I, IDUM) 35 C1I = C1I - ZRI - ZRI 36 CALL ZEXP(C1R, C1I, S1R, S1I)
|
H A D | zacai.f | 21 * CSPNI, C1R, C1I, C2R, C2I, CYR, CYI, DFNU, ELIM, FMR, FNU, PI, 83 C1I = CYI(1) 89 CALL ZS1S2(ZNR, ZNI, C1R, C1I, C2R, C2I, NW, ASCLE, ALIM, IUF) 92 YR(1) = CSPNR*C1R - CSPNI*C1I + CSGNR*C2R - CSGNI*C2I 93 YI(1) = CSPNR*C1I + CSPNI*C1R + CSGNR*C2I + CSGNI*C2R
|