/dports/science/elmerfem/elmerfem-release-9.0/fem/src/ |
H A D | Walls.F90 | 136 1.0D0-DEXP(-YPLUS/11.0D0) & 137 -(YPLUS/11.0D0)*DEXP(-0.33D0*YPLUS) & 181 + 7.8D0*( 1.0D0 - DEXP(-YPLUS/11.0D0) - & 182 (YPLUS/11.0D0)*DEXP(-0.33*YPLUS) ) & 185 DEXP(-YPLUS/11.0D0)-DEXP(-0.33*YPLUS) & 186 +0.33D0*YPLUS*DEXP(-0.33*YPLUS) &
|
/dports/lang/pcc/pcc-1.1.0/cc/cxxcom/ |
H A D | softfloat.c | 52 #define DEXP(w) (((w).fd1 >> 7) & 0377) macro 132 DEXPSET(rv, DEXP(p1) + DEXP(p2) - 128); in soft_mul() 137 DEXPSET(rv, DEXP(rv) - 1); in soft_mul() 172 DEXPSET(rv, DEXP(t) - DEXP(n) + 128 + c); in soft_div() 197 return (DEXP(sf) == 0); in soft_isz() 249 int exp = DEXP(sf) - 128; in soft_val() 351 DEXPSET(fl, DEXP(fl) + negexp*bexp); in floatcon()
|
/dports/lang/pcc/pcc-1.1.0/cc/ccom/ |
H A D | softfloat.c | 52 #define DEXP(w) (((w).fd1 >> 7) & 0377) macro 132 DEXPSET(rv, DEXP(p1) + DEXP(p2) - 128); in soft_mul() 137 DEXPSET(rv, DEXP(rv) - 1); in soft_mul() 172 DEXPSET(rv, DEXP(t) - DEXP(n) + 128 + c); in soft_div() 197 return (DEXP(sf) == 0); in soft_isz() 249 int exp = DEXP(sf) - 128; in soft_val() 351 DEXPSET(fl, DEXP(fl) + negexp*bexp); in floatcon()
|
/dports/science/erd/erd-3.0.6/src/ |
H A D | erd__rys_1_roots_weights.f | 144 W1 = (T + T) * F1 + DEXP (-T) 171 W1 = (T + T) * F1 + DEXP (-T) 198 W1 = (T + T) * F1 + DEXP (-T) 210 1400 E = DEXP (-T) 233 1500 E = DEXP (-T) 253 1600 E = DEXP (-T)
|
H A D | erd__rys_2_roots_weights.f | 162 W1 = (T + T) * F1 + DEXP (-T) 214 W1 = (T + T) * F1 + DEXP (-T) 270 W1 = (T + T) * F1 + DEXP (-T) 310 2400 E = DEXP (-T) 370 2500 E = DEXP (-T) 414 2600 E = DEXP (-T) 453 2700 E = DEXP (-T)
|
H A D | erd__rys_3_roots_weights.f | 164 3100 E = DEXP (-T) 234 3200 E = DEXP (-T) 312 3300 E = DEXP (-T) 390 3400 E = DEXP (-T) 475 3500 E = DEXP (-T) 557 3600 E = DEXP (-T) 623 3700 E = DEXP (-T) 681 3800 E = DEXP (-T)
|
H A D | erd__set_ij_kl_pairs.f | 279 RHO (NIJ) = DEXP (- A*B*RNABSQ / (A+B)) 301 RHO (NIJ) = DEXP (- A*B*RNABSQ / (A+B)) 337 RHO (NIJ+NKL) = DEXP (-C*D*RNCDSQ/(C+D)) 359 RHO (NIJ+NKL) = DEXP (-C*D*RNCDSQ/(C+D)) 413 + * DEXP (-ABMIN * RNABSQ * PINV) * PINV 415 + * DEXP (-CDMIN * RNCDSQ * QINV) * QINV 521 RHOAB = DEXP (- AB * RNABSQ * PINV) 608 RHOAB = DEXP (- AB * RNABSQ * PINV) 756 RHOCD = DEXP (- CD * RNCDSQ * QINV) 843 RHOCD = DEXP (- CD * RNCDSQ * QINV)
|
/dports/math/cmlib/cmlib-3.0_8/src/fnlib/ |
H A D | dgamic.f | 51 DGAMIC = DEXP (DLNGAM(A+1.D0) - DLOG(A)) 79 40 IF (A.LT.X) DGAMIC = DEXP (D9LGIC(A, X, ALX)) 94 IF (T.GT.(-ALNEPS)) H = 1.0D0 - SGNGS*DEXP(T) 103 DGAMIC = SGNG * DEXP(T) 109 DGAMIC = SGNG * DEXP(T)
|
H A D | dgamit.f | 68 DGAMIT = DEXP (T) 82 IF (T.GT.(-ALNEPS)) H = 1.0D0 - SGA * SGNGAM * DEXP(T) 90 DGAMIT = DSIGN (DEXP(T), H) 95 DGAMIT = -SGA * SGNGAM * DEXP(T)
|
H A D | d9gmit.f | 69 IF (ALG2.GT.BOT) D9GMIT = SGNG2 * DEXP(ALG2) 70 IF (ALGS.GT.BOT) D9GMIT = D9GMIT + DEXP(ALGS) 73 60 D9GMIT = DEXP (ALGS)
|
H A D | dpoch.f | 45 20 DPOCH = (-1.0D0)**N * DEXP ((A-0.5D0)*DLNREL(X/(A-1.0D0)) 81 DPOCH = DEXP ((B-0.5D0)*DLNREL(X/B) + X*DLOG(B+X) - X 89 DPOCH = SGNGAX * SGNGA * DEXP(ALNGAX-ALNGA)
|
H A D | dbetai.f | 64 DBETAI = DEXP (XB) 80 TERM = DEXP (XB - DBLE(FLOAT(IB))*ALNSML ) 105 IF (XB.GT.ALNSML .AND. Y.NE.0.0D0) DBETAI = DEXP(XB)
|
H A D | dbesk1.f | 48 XMIN = DEXP (DMAX1(DLOG(D1MACH(1)), -DLOG(D1MACH(2))) + 0.01D0) 70 DBESK1 = DEXP(-X) * DBSK1E(X)
|
/dports/science/quantum-espresso/q-e-qe-6.7.0/GWW/minpack/ |
H A D | test.f90 | 333 TMP2 = DEXP(TMP1) 367 FVEC(I) = DEXP(-TMP1*X(1)) - DEXP(-TMP1*X(2)) & 368 & + (DEXP(-TEMP) - DEXP(-TMP1))*X(3) 377 FVEC(I) = TWO + TWO*TEMP - DEXP(TEMP*X(1)) - DEXP(TEMP*X(2)) 386 TMP1 = X(1) + TEMP*X(2) - DEXP(TEMP) 438 TMP1 = DEXP(-X(4)*TEMP) 439 TMP2 = DEXP(-X(5)*TEMP) 449 TMP1 = DEXP(-X(5)*TEMP) 450 TMP2 = DEXP(-X(6)*(TEMP-X(9))**2) 451 TMP3 = DEXP(-X(7)*(TEMP-X(10))**2) [all …]
|
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/nwpw/paw/paw_special_functions/ |
H A D | paw_gamma_function.F | 57 PAW_GAMMA = DEXP(PAW_LN_GAMMA(XX)) 137 GAMMCF = DEXP((-X) + A*DLOG(X) - GLN)*H 193 GAMSER = SUM*DEXP((-X) + A*DLOG(X) - GLN)
|
/dports/science/nwchem-data/nwchem-7.0.2-release/src/nwpw/paw/paw_special_functions/ |
H A D | paw_gamma_function.F | 57 PAW_GAMMA = DEXP(PAW_LN_GAMMA(XX)) 137 GAMMCF = DEXP((-X) + A*DLOG(X) - GLN)*H 193 GAMSER = SUM*DEXP((-X) + A*DLOG(X) - GLN)
|
/dports/math/jags/JAGS-4.3.0/src/modules/bugs/samplers/ |
H A D | TruncatedGamma.cc | 45 case GAMMA: case NORM: case DEXP: case WEIB: case LNORM: in getParent() 125 case GAMMA: case NORM: case DEXP: case WEIB: case LNORM: in canSample() 164 case EXP: case DEXP: case WEIB: in canSample() 221 case DEXP: in update()
|
/dports/math/xlife++/xlifepp-sources-v2.0.1-2018-05-09/ext/Amos/ |
H A D | zkscl.f | 38 STR = DEXP(CSR)/TOL 64 ELM = DEXP(-ELIM) 92 STR = DEXP(CSR)/TOL
|
/dports/science/py-scipy/scipy-1.7.1/scipy/special/amos/ |
H A D | zkscl.f | 37 STR = DEXP(CSR)/TOL 63 ELM = DEXP(-ELIM) 91 STR = DEXP(CSR)/TOL
|
/dports/www/grafana8/grafana-8.3.6/vendor/gonum.org/v1/gonum/mathext/internal/amos/amoslib/ |
H A D | zkscl.f | 37 STR = DEXP(CSR)/TOL 63 ELM = DEXP(-ELIM) 91 STR = DEXP(CSR)/TOL
|
/dports/math/octave/octave-6.4.0/liboctave/external/amos/ |
H A D | zkscl.f | 37 STR = DEXP(CSR)/TOL 63 ELM = DEXP(-ELIM) 91 STR = DEXP(CSR)/TOL
|
/dports/sysutils/istio/istio-1.6.7/vendor/github.com/openshift/api/vendor/gonum.org/v1/gonum/mathext/internal/amos/amoslib/ |
H A D | zkscl.f | 37 STR = DEXP(CSR)/TOL 63 ELM = DEXP(-ELIM) 91 STR = DEXP(CSR)/TOL
|
/dports/math/cmlib/cmlib-3.0_8/src/amoslib/ |
H A D | dexint.f | 151 IF (KODE.EQ.2) S = S*DEXP(X) 157 IF (KODE.EQ.1) EMX = DEXP(-X) 160 IF (KODE.EQ.1) EMX = DEXP(-X) 183 120 EMX = DEXP(-X)
|
/dports/science/siconos/siconos-4.4.0/externals/hairer/test/ |
H A D | dr2_radau5.f | 145 FAC1=BETA*(DEXP((Y(4)-Y(3))/UF)-1.D0) 146 FAC2=BETA*(DEXP((Y(7)-Y(6))/UF)-1.D0) 178 FAC14=BETA*DEXP((Y(4)-Y(3))/UF)/UF 179 FAC27=BETA*DEXP((Y(7)-Y(6))/UF)/UF
|
/dports/math/cmlib/cmlib-3.0_8/doc/amoslib/ |
H A D | dexint | 25 C E(A,X) = DEXP(-X)*(X**(A-1))*U(A,A,X) 34 C K*E(K+1,X) + X*E(K,X) = DEXP(-X) 59 C =2 returns DEXP(X)*E(N+K,X), K=0,1,...,M-1. 68 C EN(K) = E(N+K-1,X) or DEXP(X)*E(N+K-1,X), K=1,M
|