/dports/math/maxima/maxima-5.43.2/src/numerical/slatec/fortran/ |
H A D | zuoik.f | 98 CZI = CZI - ZBI 102 CZI = -CZI 135 CZI = CZI + STI 139 CZI = CZI - 0.25D0*STI 142 AY = CZI 144 CZI = AX*SIN(AY) 171 CZI = CZI - ZBI 191 CZI = CZI + STI 195 CZI = CZI - 0.25D0*STI 198 AY = CZI [all …]
|
H A D | zseri.f | 29 * AZ, CKI, CKR, COEFI, COEFR, CONEI, CONER, CRSCR, CZI, CZR, DFNU, local 49 CZI = ZEROI 51 CALL ZMLT(HZR, HZI, HZR, HZI, CZR, CZI) 53 ACZ = ZABS(CZR,CZI) 102 STR = AK1R*CZR - AK1I*CZI 103 STI = AK1R*CZI + AK1I*CZR
|
H A D | zasyi.f | 26 * AZ, BB, BK, CKI, CKR, CONEI, CONER, CS1I, CS1R, CS2I, CS2R, CZI, local 52 CZI = ZI 55 CZI = ZI 62 CALL ZEXP(CZR, CZI, STR, STI) 164 CALL ZEXP(CZR, CZI, CKR, CKI)
|
/dports/math/slatec/src/ |
H A D | zuoik.f | 98 CZI = CZI - ZBI 102 CZI = -CZI 135 CZI = CZI + STI 139 CZI = CZI - 0.25D0*STI 142 AY = CZI 144 CZI = AX*SIN(AY) 171 CZI = CZI - ZBI 191 CZI = CZI + STI 195 CZI = CZI - 0.25D0*STI 198 AY = CZI [all …]
|
H A D | zseri.f | 29 * AZ, CKI, CKR, COEFI, COEFR, CONEI, CONER, CRSCR, CZI, CZR, DFNU, 49 CZI = ZEROI 51 CALL ZMLT(HZR, HZI, HZR, HZI, CZR, CZI) 53 ACZ = ZABS(CZR,CZI) 102 STR = AK1R*CZR - AK1I*CZI 103 STI = AK1R*CZI + AK1I*CZR
|
H A D | zasyi.f | 26 * AZ, BB, BK, CKI, CKR, CONEI, CONER, CS1I, CS1R, CS2I, CS2R, CZI, 52 CZI = ZI 55 CZI = ZI 62 CALL ZEXP(CZR, CZI, STR, STI) 164 CALL ZEXP(CZR, CZI, CKR, CKI)
|
/dports/math/scilab/scilab-6.1.1/scilab/modules/elementary_functions/src/fortran/slatec/ |
H A D | zuoik.f | 98 CZI = CZI - ZBI 102 CZI = -CZI 135 CZI = CZI + STI 139 CZI = CZI - 0.25D0*STI 142 AY = CZI 144 CZI = AX*SIN(AY) 171 CZI = CZI - ZBI 191 CZI = CZI + STI 195 CZI = CZI - 0.25D0*STI 198 AY = CZI [all …]
|
H A D | zseri.f | 29 * AZ, CKI, CKR, COEFI, COEFR, CONEI, CONER, CRSCR, CZI, CZR, DFNU, 49 CZI = ZEROI 51 CALL ZMLT(HZR, HZI, HZR, HZI, CZR, CZI) 53 ACZ = ZABS(CZR,CZI) 102 STR = AK1R*CZR - AK1I*CZI 103 STI = AK1R*CZI + AK1I*CZR
|
H A D | zasyi.f | 26 * AZ, BB, BK, CKI, CKR, CONEI, CONER, CS1I, CS1R, CS2I, CS2R, CZI, local 52 CZI = ZI 55 CZI = ZI 62 CALL ZEXP(CZR, CZI, STR, STI) 164 CALL ZEXP(CZR, CZI, CKR, CKI)
|
/dports/science/py-scipy/scipy-1.7.1/scipy/special/amos/ |
H A D | zuoik.f | 85 CZI = CZI - ZBI 89 CZI = -CZI 122 CZI = CZI + STI 126 CZI = CZI - 0.25D0*STI 129 AY = CZI 131 CZI = AX*DSIN(AY) 158 CZI = CZI - ZBI 178 CZI = CZI + STI 182 CZI = CZI - 0.25D0*STI 185 AY = CZI [all …]
|
H A D | zseri.f | 18 * AZ, CKI, CKR, COEFI, COEFR, CONEI, CONER, CRSCR, CZI, CZR, DFNU, local 37 CZI = ZEROI 39 CALL ZMLT(HZR, HZI, HZR, HZI, CZR, CZI) 41 ACZ = AZABS(CZR,CZI) 90 STR = AK1R*CZR - AK1I*CZI 91 STI = AK1R*CZI + AK1I*CZR
|
H A D | zasyi.f | 15 * AZ, BB, BK, CKI, CKR, CONEI, CONER, CS1I, CS1R, CS2I, CS2R, CZI, local 40 CZI = ZI 43 CZI = ZI 50 CALL AZEXP(CZR, CZI, STR, STI) 152 CALL AZEXP(CZR, CZI, CKR, CKI)
|
/dports/math/octave/octave-6.4.0/liboctave/external/amos/ |
H A D | zuoik.f | 85 CZI = CZI - ZBI 89 CZI = -CZI 122 CZI = CZI + STI 126 CZI = CZI - 0.25D0*STI 129 AY = CZI 131 CZI = AX*DSIN(AY) 158 CZI = CZI - ZBI 178 CZI = CZI + STI 182 CZI = CZI - 0.25D0*STI 185 AY = CZI [all …]
|
H A D | zseri.f | 18 * AZ, CKI, CKR, COEFI, COEFR, CONEI, CONER, CRSCR, CZI, CZR, DFNU, local 37 CZI = ZEROI 39 CALL ZMLT(HZR, HZI, HZR, HZI, CZR, CZI) 41 ACZ = XZABS(CZR,CZI) 90 STR = AK1R*CZR - AK1I*CZI 91 STI = AK1R*CZI + AK1I*CZR
|
H A D | zasyi.f | 15 * AZ, BB, BK, CKI, CKR, CONEI, CONER, CS1I, CS1R, CS2I, CS2R, CZI, local 40 CZI = ZI 43 CZI = ZI 50 CALL XZEXP(CZR, CZI, STR, STI) 152 CALL XZEXP(CZR, CZI, CKR, CKI)
|
/dports/www/grafana8/grafana-8.3.6/vendor/gonum.org/v1/gonum/mathext/internal/amos/amoslib/ |
H A D | zuoik.f | 85 CZI = CZI - ZBI 89 CZI = -CZI 122 CZI = CZI + STI 126 CZI = CZI - 0.25D0*STI 129 AY = CZI 131 CZI = AX*DSIN(AY) 158 CZI = CZI - ZBI 178 CZI = CZI + STI 182 CZI = CZI - 0.25D0*STI 185 AY = CZI [all …]
|
H A D | zseri.f | 18 * AZ, CKI, CKR, COEFI, COEFR, CONEI, CONER, CRSCR, CZI, CZR, DFNU, 40 CZI = ZEROI 42 CALL ZMLT(HZR, HZI, HZR, HZI, CZR, CZI) 44 ACZ = ZABS(CMPLX(CZR,CZI,kind=KIND(1.0D0))) 93 STR = AK1R*CZR - AK1I*CZI 94 STI = AK1R*CZI + AK1I*CZR
|
H A D | zasyi.f | 15 * AZ, BB, BK, CKI, CKR, CONEI, CONER, CS1I, CS1R, CS2I, CS2R, CZI, 40 CZI = ZI 43 CZI = ZI 50 CALL ZEXP(CZR, CZI, STR, STI) 156 CALL ZEXP(CZR, CZI, CKR, CKI)
|
/dports/math/xlife++/xlifepp-sources-v2.0.1-2018-05-09/ext/Amos/ |
H A D | zuoik.f | 86 CZI = CZI - ZBI 90 CZI = -CZI 123 CZI = CZI + STI 127 CZI = CZI - 0.25D0*STI 130 AY = CZI 132 CZI = AX*DSIN(AY) 159 CZI = CZI - ZBI 179 CZI = CZI + STI 183 CZI = CZI - 0.25D0*STI 186 AY = CZI [all …]
|
H A D | zseri.f | 19 * AZ, CKI, CKR, COEFI, COEFR, CONEI, CONER, CRSCR, CZI, CZR, DFNU, 38 CZI = ZEROI 40 CALL ZMLT(HZR, HZI, HZR, HZI, CZR, CZI) 42 ACZ = ZABS(CZR,CZI) 91 STR = AK1R*CZR - AK1I*CZI 92 STI = AK1R*CZI + AK1I*CZR
|
H A D | zasyi.f | 16 * AZ, BB, BK, CKI, CKR, CONEI, CONER, CS1I, CS1R, CS2I, CS2R, CZI, 41 CZI = ZI 44 CZI = ZI 51 CALL ZEXPAMOS(CZR, CZI, STR, STI) 153 CALL ZEXPAMOS(CZR, CZI, CKR, CKI)
|
H A D | zbknu.f | 16 * CZEROI, CZEROR, CZI, CZR, DNU, DNU2, DPI, ELIM, ETEST, FC, FHS, 128 CALL ZMLT(ZR, ZI, ZR, ZI, CZR, CZI) 130 CZI = 0.25D0*CZI 141 STR = CKR*CZR - CKI*CZI 143 CKI = (CKR*CZI+CKI*CZR)*RAK 163 CALL ZMLT(ZR, ZI, ZR, ZI, CZR, CZI) 165 CZI = 0.25D0*CZI 176 STR = CKR*CZR - CKI*CZI 178 CKI = (CKR*CZI+CKI*CZR)*RAK
|
/dports/sysutils/istio/istio-1.6.7/vendor/github.com/openshift/api/vendor/gonum.org/v1/gonum/mathext/internal/amos/amoslib/ |
H A D | zuoik.f | 85 CZI = CZI - ZBI 89 CZI = -CZI 122 CZI = CZI + STI 126 CZI = CZI - 0.25D0*STI 129 AY = CZI 131 CZI = AX*DSIN(AY) 158 CZI = CZI - ZBI 178 CZI = CZI + STI 182 CZI = CZI - 0.25D0*STI 185 AY = CZI [all …]
|
H A D | zseri.f | 18 * AZ, CKI, CKR, COEFI, COEFR, CONEI, CONER, CRSCR, CZI, CZR, DFNU, 40 CZI = ZEROI 42 CALL ZMLT(HZR, HZI, HZR, HZI, CZR, CZI) 44 ACZ = ZABS(CMPLX(CZR,CZI,kind=KIND(1.0D0))) 93 STR = AK1R*CZR - AK1I*CZI 94 STI = AK1R*CZI + AK1I*CZR
|
H A D | zasyi.f | 15 * AZ, BB, BK, CKI, CKR, CONEI, CONER, CS1I, CS1R, CS2I, CS2R, CZI, 40 CZI = ZI 43 CZI = ZI 50 CALL ZEXP(CZR, CZI, STR, STI) 156 CALL ZEXP(CZR, CZI, CKR, CKI)
|