/dports/science/py-scipy/scipy-1.7.1/scipy/special/amos/ |
H A D | zunik.f | 25 DOUBLE PRECISION AC, C, CON, CONEI, CONER, CRFNI, CRFNR, CWRKI, local 31 DATA ZEROR,ZEROI,CONER,CONEI / 0.0D0, 0.0D0, 1.0D0, 0.0D0 / 133 SI = CONEI + (TR*TI+TI*TR) 136 STI = CONEI + SRI 143 CALL ZDIV(CONER, CONEI, SRR, SRI, TR, TI) 150 CALL ZDIV(CONER, CONEI, SR, SI, T2R, T2I) 152 CWRKI(1) = CONEI 154 CRFNI = CONEI
|
H A D | zasyi.f | 15 * AZ, BB, BK, CKI, CKR, CONEI, CONER, CS1I, CS1R, CS2I, CS2R, CZI, local 22 DATA ZEROR,ZEROI,CONER,CONEI / 0.0D0, 0.0D0, 1.0D0, 0.0D0 / 89 CS1I = CONEI 91 CS2I = CONEI 93 CKI = CONEI
|
H A D | zbiry.f | 125 * BK, CC, CK, COEF, CONEI, CONER, CSQI, CSQR, CYI, CYR, C1, C2, local 134 DATA CONER, CONEI /1.0D0,0.0D0/ 149 S1I = CONEI 151 S2I = CONEI 156 TRM1I = CONEI 158 TRM2I = CONEI
|
H A D | zseri.f | 18 * AZ, CKI, CKR, COEFI, COEFR, CONEI, CONER, CRSCR, CZI, CZR, DFNU, local 24 DATA ZEROR,ZEROI,CONER,CONEI / 0.0D0, 0.0D0, 1.0D0, 0.0D0 / 81 S1I = CONEI 84 AK1I = CONEI 175 YI(1) = CONEI
|
/dports/www/grafana8/grafana-8.3.6/vendor/gonum.org/v1/gonum/mathext/internal/amos/amoslib/ |
H A D | zunik.f | 25 DOUBLE PRECISION AC, C, CON, CONEI, CONER, CRFNI, CRFNR, CWRKI, 31 DATA ZEROR,ZEROI,CONER,CONEI / 0.0D0, 0.0D0, 1.0D0, 0.0D0 / 133 SI = CONEI + (TR*TI+TI*TR) 136 STI = CONEI + SRI 143 CALL ZDIV(CONER, CONEI, SRR, SRI, TR, TI) 150 CALL ZDIV(CONER, CONEI, SR, SI, T2R, T2I) 152 CWRKI(1) = CONEI 154 CRFNI = CONEI
|
H A D | zasyi.f | 15 * AZ, BB, BK, CKI, CKR, CONEI, CONER, CS1I, CS1R, CS2I, CS2R, CZI, 22 DATA ZEROR,ZEROI,CONER,CONEI / 0.0D0, 0.0D0, 1.0D0, 0.0D0 / 91 CS1I = CONEI 93 CS2I = CONEI 95 CKI = CONEI
|
H A D | zbiry.f | 125 * BK, CC, CK, COEF, CONEI, CONER, CSQI, CSQR, CYI, CYR, C1, C2, 134 DATA CONER, CONEI /1.0D0,0.0D0/ 149 S1I = CONEI 151 S2I = CONEI 156 TRM1I = CONEI 158 TRM2I = CONEI
|
/dports/math/maxima/maxima-5.43.2/src/numerical/slatec/fortran/ |
H A D | zunik.f | 36 DOUBLE PRECISION AC, C, CON, CONEI, CONER, CRFNI, CRFNR, CWRKI, local 43 DATA ZEROR,ZEROI,CONER,CONEI / 0.0D0, 0.0D0, 1.0D0, 0.0D0 / 145 SI = CONEI + (TR*TI+TI*TR) 148 STI = CONEI + SRI 155 CALL ZDIV(CONER, CONEI, SRR, SRI, TR, TI) 162 CALL ZDIV(CONER, CONEI, SR, SI, T2R, T2I) 164 CWRKI(1) = CONEI 166 CRFNI = CONEI
|
H A D | zasyi.f | 26 * AZ, BB, BK, CKI, CKR, CONEI, CONER, CS1I, CS1R, CS2I, CS2R, CZI, local 34 DATA ZEROR,ZEROI,CONER,CONEI / 0.0D0, 0.0D0, 1.0D0, 0.0D0 / 101 CS1I = CONEI 103 CS2I = CONEI 105 CKI = CONEI
|
H A D | zbiry.f | 137 * BK, CC, CK, COEF, CONEI, CONER, CSQI, CSQR, CYI, CYR, C1, C2, local 147 DATA CONER, CONEI /1.0D0,0.0D0/ 162 S1I = CONEI 164 S2I = CONEI 169 TRM1I = CONEI 171 TRM2I = CONEI
|
/dports/math/octave/octave-6.4.0/liboctave/external/amos/ |
H A D | zunik.f | 25 DOUBLE PRECISION AC, C, CON, CONEI, CONER, CRFNI, CRFNR, CWRKI, local 31 DATA ZEROR,ZEROI,CONER,CONEI / 0.0D0, 0.0D0, 1.0D0, 0.0D0 / 133 SI = CONEI + (TR*TI+TI*TR) 136 STI = CONEI + SRI 143 CALL ZDIV(CONER, CONEI, SRR, SRI, TR, TI) 150 CALL ZDIV(CONER, CONEI, SR, SI, T2R, T2I) 152 CWRKI(1) = CONEI 154 CRFNI = CONEI
|
H A D | zasyi.f | 15 * AZ, BB, BK, CKI, CKR, CONEI, CONER, CS1I, CS1R, CS2I, CS2R, CZI, local 22 DATA ZEROR,ZEROI,CONER,CONEI / 0.0D0, 0.0D0, 1.0D0, 0.0D0 / 89 CS1I = CONEI 91 CS2I = CONEI 93 CKI = CONEI
|
H A D | zbiry.f | 125 * BK, CC, CK, COEF, CONEI, CONER, CSQI, CSQR, CYI, CYR, C1, C2, local 134 DATA CONER, CONEI /1.0D0,0.0D0/ 149 S1I = CONEI 151 S2I = CONEI 156 TRM1I = CONEI 158 TRM2I = CONEI
|
H A D | zseri.f | 18 * AZ, CKI, CKR, COEFI, COEFR, CONEI, CONER, CRSCR, CZI, CZR, DFNU, local 24 DATA ZEROR,ZEROI,CONER,CONEI / 0.0D0, 0.0D0, 1.0D0, 0.0D0 / 81 S1I = CONEI 84 AK1I = CONEI 175 YI(1) = CONEI
|
/dports/math/slatec/src/ |
H A D | zunik.f | 36 DOUBLE PRECISION AC, C, CON, CONEI, CONER, CRFNI, CRFNR, CWRKI, 43 DATA ZEROR,ZEROI,CONER,CONEI / 0.0D0, 0.0D0, 1.0D0, 0.0D0 / 145 SI = CONEI + (TR*TI+TI*TR) 148 STI = CONEI + SRI 155 CALL ZDIV(CONER, CONEI, SRR, SRI, TR, TI) 162 CALL ZDIV(CONER, CONEI, SR, SI, T2R, T2I) 164 CWRKI(1) = CONEI 166 CRFNI = CONEI
|
H A D | zasyi.f | 26 * AZ, BB, BK, CKI, CKR, CONEI, CONER, CS1I, CS1R, CS2I, CS2R, CZI, 34 DATA ZEROR,ZEROI,CONER,CONEI / 0.0D0, 0.0D0, 1.0D0, 0.0D0 / 101 CS1I = CONEI 103 CS2I = CONEI 105 CKI = CONEI
|
H A D | zbiry.f | 137 * BK, CC, CK, COEF, CONEI, CONER, CSQI, CSQR, CYI, CYR, C1, C2, 147 DATA CONER, CONEI /1.0D0,0.0D0/ 162 S1I = CONEI 164 S2I = CONEI 169 TRM1I = CONEI 171 TRM2I = CONEI
|
/dports/math/scilab/scilab-6.1.1/scilab/modules/elementary_functions/src/fortran/slatec/ |
H A D | zunik.f | 36 DOUBLE PRECISION AC, C, CON, CONEI, CONER, CRFNI, CRFNR, CWRKI, local 43 DATA ZEROR,ZEROI,CONER,CONEI / 0.0D0, 0.0D0, 1.0D0, 0.0D0 / 145 SI = CONEI + (TR*TI+TI*TR) 148 STI = CONEI + SRI 155 CALL ZDIV(CONER, CONEI, SRR, SRI, TR, TI) 162 CALL ZDIV(CONER, CONEI, SR, SI, T2R, T2I) 164 CWRKI(1) = CONEI 166 CRFNI = CONEI
|
H A D | zasyi.f | 26 * AZ, BB, BK, CKI, CKR, CONEI, CONER, CS1I, CS1R, CS2I, CS2R, CZI, local 34 DATA ZEROR,ZEROI,CONER,CONEI / 0.0D0, 0.0D0, 1.0D0, 0.0D0 / 101 CS1I = CONEI 103 CS2I = CONEI 105 CKI = CONEI
|
/dports/math/xlife++/xlifepp-sources-v2.0.1-2018-05-09/ext/Amos/ |
H A D | zunik.f | 25 DOUBLE PRECISION AC, C, CON, CONEI, CONER, CRFNI, CRFNR, CWRKI, 31 DATA ZEROR,ZEROI,CONER,CONEI / 0.0D0, 0.0D0, 1.0D0, 0.0D0 / 133 SI = CONEI + (TR*TI+TI*TR) 136 STI = CONEI + SRI 143 CALL ZDIV(CONER, CONEI, SRR, SRI, TR, TI) 150 CALL ZDIV(CONER, CONEI, SR, SI, T2R, T2I) 152 CWRKI(1) = CONEI 154 CRFNI = CONEI
|
H A D | zasyi.f | 16 * AZ, BB, BK, CKI, CKR, CONEI, CONER, CS1I, CS1R, CS2I, CS2R, CZI, 23 DATA ZEROR,ZEROI,CONER,CONEI / 0.0D0, 0.0D0, 1.0D0, 0.0D0 / 90 CS1I = CONEI 92 CS2I = CONEI 94 CKI = CONEI
|
H A D | zbiry.f | 126 * BK, CC, CK, COEF, CONEI, CONER, CSQI, CSQR, CYI, CYR, C1, C2, 135 DATA CONER, CONEI /1.0D0,0.0D0/ 150 S1I = CONEI 152 S2I = CONEI 157 TRM1I = CONEI 159 TRM2I = CONEI
|
/dports/sysutils/istio/istio-1.6.7/vendor/github.com/openshift/api/vendor/gonum.org/v1/gonum/mathext/internal/amos/amoslib/ |
H A D | zunik.f | 25 DOUBLE PRECISION AC, C, CON, CONEI, CONER, CRFNI, CRFNR, CWRKI, 31 DATA ZEROR,ZEROI,CONER,CONEI / 0.0D0, 0.0D0, 1.0D0, 0.0D0 / 133 SI = CONEI + (TR*TI+TI*TR) 136 STI = CONEI + SRI 143 CALL ZDIV(CONER, CONEI, SRR, SRI, TR, TI) 150 CALL ZDIV(CONER, CONEI, SR, SI, T2R, T2I) 152 CWRKI(1) = CONEI 154 CRFNI = CONEI
|
H A D | zasyi.f | 15 * AZ, BB, BK, CKI, CKR, CONEI, CONER, CS1I, CS1R, CS2I, CS2R, CZI, 22 DATA ZEROR,ZEROI,CONER,CONEI / 0.0D0, 0.0D0, 1.0D0, 0.0D0 / 91 CS1I = CONEI 93 CS2I = CONEI 95 CKI = CONEI
|
H A D | zbiry.f | 125 * BK, CC, CK, COEF, CONEI, CONER, CSQI, CSQR, CYI, CYR, C1, C2, 134 DATA CONER, CONEI /1.0D0,0.0D0/ 149 S1I = CONEI 151 S2I = CONEI 156 TRM1I = CONEI 158 TRM2I = CONEI
|