/dports/science/qwalk/mainline-1.0.1-300-g1b7e381/src/method/ |
H A D | Force_fitter.cpp | 27 nexp=nexpansion; in setup() 28 coeff.Resize(nexp); in setup() 29 Array2 <doublevar> S(nexp, nexp); in setup() 30 Array1 <doublevar> h(nexp); in setup() 31 for(int i=0; i< nexp; i++) { in setup() 32 for(int j=0; j< nexp; j++) { in setup() 38 Array2 <doublevar> Sinv(nexp, nexp); in setup() 39 InvertMatrix(S, Sinv, nexp); in setup() 42 for(int i=0; i< nexp; i++) in setup() 43 for(int j=0;j< nexp;j++) in setup() [all …]
|
/dports/science/siesta/siesta-4.1.5/Util/sies2arc/ |
H A D | wtof.f | 31 nexp=index(string,'e') 32 if (nexp.eq.0) nexp=index(string,'E') 33 if (nexp.eq.0) nexp=index(string,'d') 34 if (nexp.eq.0) nexp=index(string,'D') 35 if (nexp.gt.0.and.nexp.lt.nlen) then 39 nse=nexp+1 54 nlen=nexp-1
|
/dports/devel/guile-lib/guile-lib-0.2.6.1/src/math/ |
H A D | primes.scm | 107 (letrec ((lp (lambda (comp comps primes nexp) 109 (let ((ncomp (* nexp comp))) 111 (cons nexp primes) 113 ((< (quotient comp nexp) (* nexp nexp)) 114 (set! prime:prime-sqr (* nexp nexp)) 121 (lp nexp (cons comp comps) 122 (cons nexp primes) 123 (next-prime nexp (cons comp comps))))))) 124 (next-prime (lambda (nexp comps) 126 (do ((nexp (+ 2 nexp) (+ 2 nexp))) [all …]
|
/dports/lang/slib/slib-3b6/ |
H A D | factor.scm | 91 (letrec ((lp (lambda (comp comps primes nexp) 93 (let ((ncomp (* nexp comp))) 95 (cons nexp primes) 97 ((< (quotient comp nexp) (* nexp nexp)) 98 (set! prime:prime-sqr (* nexp nexp)) 105 (lp nexp (cons comp comps) 106 (cons nexp primes) 107 (next-prime nexp (cons comp comps))))))) 108 (next-prime (lambda (nexp comps) 110 (do ((nexp (+ 2 nexp) (+ 2 nexp))) [all …]
|
/dports/lang/zig-devel/zig-0.9.0/lib/libc/mingw/misc/ |
H A D | strtold.c | 139 nexp = 0; in __asctoe64() 199 nexp -= 1; in __asctoe64() 283 nexp = expo - nexp; in __asctoe64() 286 while ((nexp > 0) && (yy[2] == 0)) in __asctoe64() 295 nexp -= 1; in __asctoe64() 314 if (nexp == 0) in __asctoe64() 320 if (nexp < 0) in __asctoe64() 322 nexp = -nexp; in __asctoe64() 324 if (nexp > 4096) in __asctoe64() 330 nexp -= 4096; in __asctoe64() [all …]
|
/dports/lang/zig/zig-0.9.0/lib/libc/mingw/misc/ |
H A D | strtold.c | 139 nexp = 0; in __asctoe64() 199 nexp -= 1; in __asctoe64() 283 nexp = expo - nexp; in __asctoe64() 286 while ((nexp > 0) && (yy[2] == 0)) in __asctoe64() 295 nexp -= 1; in __asctoe64() 314 if (nexp == 0) in __asctoe64() 320 if (nexp < 0) in __asctoe64() 322 nexp = -nexp; in __asctoe64() 324 if (nexp > 4096) in __asctoe64() 330 nexp -= 4096; in __asctoe64() [all …]
|
/dports/math/nlopt/nlopt-2.7.1/src/algs/ags/ |
H A D | evolvent.cc | 71 int n1, nexp, l, iq, iu[10], iv[10]; in mapd() local 80 for (nexp = 1, i = 0; i<n; nexp *= 2, i++); /* nexp=2**n */ in mapd() 84 dr = nexp; in mapd() 95 dr = mne / nexp; in mapd() 102 dr = dd + (dd - 1) / (nexp - 1); in mapd() 111 is = nexp - 1; d = 0.0; in mapd() 114 d = d*nexp; in mapd() 119 node(i, n1, nexp, l, iq, iu, iv); in mapd() 142 if (is == (nexp - 1)) i = -1; in mapd() 170 else if (is == (nexp - 1)) { in node() [all …]
|
/dports/science/xtb/xtb-6.4.1/src/ |
H A D | cube.f90 | 78 allocate(array(0:nexp)) 79 do i=0,nexp 294 integer lao,nexp local 295 real*8 a(0:nexp) 301 100 f=fastexp(nexp,a,alpr2) 303 201 f=fastexp(nexp,a,alpr2)*dx 305 202 f=fastexp(nexp,a,alpr2)*dy 307 203 f=fastexp(nexp,a,alpr2)*dz 309 301 f=fastexp(nexp,a,alpr2)*dx2 325 integer nexp local [all …]
|
/dports/databases/pgadmin3/pgadmin3-1.22.2/pgadmin/pgscript/utilities/m_apm/ |
H A D | mapmipwr.cpp | 33 int nexp, ii, signflag, local_precision; in m_apm_integer_pow() local 45 nexp = mexp; in m_apm_integer_pow() 50 nexp = -mexp; in m_apm_integer_pow() 71 ii = nexp & 1; in m_apm_integer_pow() 72 nexp = nexp >> 1; in m_apm_integer_pow() 79 if (nexp == 0) in m_apm_integer_pow()
|
H A D | mapm_rcp.cpp | 34 int sn, nexp, dplaces; in m_apm_divide() local 63 nexp = aa->m_apm_exponent - bb->m_apm_exponent; in m_apm_divide() 65 if (nexp > 0) in m_apm_divide() 66 dplaces = nexp + places; in m_apm_divide() 84 int ii, bflag, dplaces, nexp, tolerance; in m_apm_reciprocal() local 108 nexp = aa->m_apm_exponent; in m_apm_reciprocal() 109 tmpN->m_apm_exponent -= nexp; in m_apm_reciprocal() 164 rr->m_apm_exponent -= nexp; in m_apm_reciprocal()
|
H A D | mapmpwr2.cpp | 37 int nexp, ii; in m_apm_integer_pow_nr() local 68 nexp = mexp; in m_apm_integer_pow_nr() 85 ii = nexp & 1; in m_apm_integer_pow_nr() 86 nexp = nexp >> 1; in m_apm_integer_pow_nr() 92 if (nexp == 0) in m_apm_integer_pow_nr()
|
/dports/textproc/zorba/zorba-2.7.0/src/zorbatypes/mapm/ |
H A D | mapmipwr.c | 52 int nexp, ii, signflag, local_precision; in m_apm_integer_pow() local 64 nexp = mexp; in m_apm_integer_pow() 69 nexp = -mexp; in m_apm_integer_pow() 90 ii = nexp & 1; in m_apm_integer_pow() 91 nexp = nexp >> 1; in m_apm_integer_pow() 98 if (nexp == 0) in m_apm_integer_pow()
|
H A D | mapm_rcp.c | 55 int sn, nexp, dplaces; in m_apm_divide() local 84 nexp = aa->m_apm_exponent - bb->m_apm_exponent; in m_apm_divide() 86 if (nexp > 0) in m_apm_divide() 87 dplaces = nexp + places; in m_apm_divide() 105 int ii, bflag, dplaces, nexp, tolerance; in m_apm_reciprocal() local 129 nexp = aa->m_apm_exponent; in m_apm_reciprocal() 130 tmpN->m_apm_exponent -= nexp; in m_apm_reciprocal() 185 rr->m_apm_exponent -= nexp; in m_apm_reciprocal()
|
H A D | mapmpwr2.c | 50 int nexp, ii; in m_apm_integer_pow_nr() local 81 nexp = mexp; in m_apm_integer_pow_nr() 98 ii = nexp & 1; in m_apm_integer_pow_nr() 99 nexp = nexp >> 1; in m_apm_integer_pow_nr() 105 if (nexp == 0) in m_apm_integer_pow_nr()
|
/dports/audio/praat/praat-6.2.03/external/gsl/ |
H A D | gsl_specfunc__debye.c | 221 double xk = nexp * x; in gsl_sf_debye_1_e() 222 double rk = nexp; in gsl_sf_debye_1_e() 273 double xk = nexp * x; in gsl_sf_debye_2_e() 274 double rk = nexp; in gsl_sf_debye_2_e() 329 double xk = nexp * x; in gsl_sf_debye_3_e() 330 double rk = nexp; in gsl_sf_debye_3_e() 386 double xk = nexp * x; in gsl_sf_debye_4_e() 387 double rk = nexp; in gsl_sf_debye_4_e() 443 double xk = nexp * x; in gsl_sf_debye_5_e() 444 double rk = nexp; in gsl_sf_debye_5_e() [all …]
|
/dports/math/gsl/gsl-2.7/specfunc/ |
H A D | debye.c | 221 double xk = nexp * x; in gsl_sf_debye_1_e() 222 double rk = nexp; in gsl_sf_debye_1_e() 273 double xk = nexp * x; in gsl_sf_debye_2_e() 274 double rk = nexp; in gsl_sf_debye_2_e() 329 double xk = nexp * x; in gsl_sf_debye_3_e() 330 double rk = nexp; in gsl_sf_debye_3_e() 386 double xk = nexp * x; in gsl_sf_debye_4_e() 387 double rk = nexp; in gsl_sf_debye_4_e() 443 double xk = nexp * x; in gsl_sf_debye_5_e() 444 double rk = nexp; in gsl_sf_debye_5_e() [all …]
|
/dports/net-mgmt/p5-NetAddr-IP/NetAddr-IP-4.079/Lite/t/ |
H A D | bin_ips.t | 21 print "got: $got\nexp: $exp\nnot " 27 print "got: $got\nexp: $exp\nnot " 33 print "got: $got\nexp: $exp\nnot " 44 print "got: $got\nexp: $exp\nnot " 55 print "got: $got\nexp: $exp\nnot " 65 print "got: $got\nexp: $exp\nnot " 71 print "got: $got\nexp: $exp\nnot " 77 print "got: $got\nexp: $exp\nnot " 88 print "got: $got\nexp: $exp\nnot " 99 print "got: $got\nexp: $exp\nnot "
|
/dports/science/nwchem-data/nwchem-7.0.2-release/src/basis/ |
H A D | bas_blas.F | 145 logical function bas_set_exponent(basisin,icont,expon,nexp) 166 integer nexp !< [Input] The number of exponents for contraction 167 double precision expon(nexp) !< [Input] "new" exponents for the 195 bas_set_exponent = myprim.eq.nexp 200 write(LuOut,*)' input nprim: ',nexp 204 call dcopy(nexp,expon,1,dbl_mb(mb_exndcf(myexptr,basis)),1) 356 logical function ecp_set_rexponent(ecpin,icont,expon,nexp) 378 double precision expon(nexp) !< [Input] The "new" r-exponents 406 ecp_set_rexponent = myprim.eq.nexp 411 write(LuOut,*)' input nprim: ',nexp [all …]
|
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/basis/ |
H A D | bas_blas.F | 145 logical function bas_set_exponent(basisin,icont,expon,nexp) 166 integer nexp !< [Input] The number of exponents for contraction 167 double precision expon(nexp) !< [Input] "new" exponents for the 195 bas_set_exponent = myprim.eq.nexp 200 write(LuOut,*)' input nprim: ',nexp 204 call dcopy(nexp,expon,1,dbl_mb(mb_exndcf(myexptr,basis)),1) 356 logical function ecp_set_rexponent(ecpin,icont,expon,nexp) 378 double precision expon(nexp) !< [Input] The "new" r-exponents 406 ecp_set_rexponent = myprim.eq.nexp 411 write(LuOut,*)' input nprim: ',nexp [all …]
|
/dports/math/libqalculate/libqalculate-3.17.0/libqalculate/ |
H A D | Prefix.cc | 83 Number DecimalPrefix::exponent(const Number &nexp) const { in exponent() 84 return nexp * exp; in exponent() 89 Number DecimalPrefix::value(const Number &nexp) const { in value() 90 Number nr(exponent(nexp)); in value() 116 Number BinaryPrefix::exponent(const Number &nexp) const { in exponent() 117 return nexp * exp; in exponent() 122 Number BinaryPrefix::value(const Number &nexp) const { in value() 123 Number nr(exponent(nexp)); in value() 149 Number NumberPrefix::value(const Number &nexp) const { in value() 151 nr.raise(nexp); in value()
|
/dports/math/lambda/lambda-0.1.4/ |
H A D | lambda.cc | 144 exp_node* nexp; in main() local 147 nexp = rexp->reduce(env,inp,&outp); in main() 148 if( nexp && rexp!=nexp ){ in main() 152 rexp = nexp; in main() 184 exp_node* nexp; in main() local 187 nexp = rexp->reduce(env,inp,&outp); in main() 188 if( nexp && rexp!=nexp ){ in main() 192 rexp = nexp; in main()
|
/dports/math/saga/saga-8.1.3/saga-gis/src/tools/terrain_analysis/ta_hydrology/ |
H A D | Flow_Parallel.cpp | 874 nexp[6]; in Set_BRM() local 1007 if(nexp[i]<0) in BRM_GetOrtho() 1008 nexp[i] = nexp[4]; in BRM_GetOrtho() 1012 nexp[i] += BRM_idreh[Dir]; in BRM_GetOrtho() 1014 if(nexp[i]>360) in BRM_GetOrtho() 1015 nexp[i] -= 360; in BRM_GetOrtho() 1043 if(nexp[i]<0) in BRM_GetDiago() 1044 nexp[i] = nexp[0]; in BRM_GetDiago() 1048 nexp[i] += BRM_idreh[Dir]; in BRM_GetDiago() 1050 if(nexp[i]>360) in BRM_GetDiago() [all …]
|
/dports/science/libecpint/libecpint-1.0.7/share/libecpint/ |
H A D | parseecp.py | 23 def __init__(self, lval = 0, nexp = 0): argument 27 self.nexp = nexp 107 new_shell = Shell(lval=l, nexp=nprims) 144 … schild = etree.SubElement(child, "Shell", lval=str(shell.lval), nexp=str(shell.nexp)) 146 for i in range(shell.nexp): 152 print("Expected no. of powers/exps/coeffs:", shell.nexp)
|
/dports/graphics/leptonica/leptonica-1.76.0/prog/ |
H A D | compfilter_reg.c | 36 static void Count_pieces(L_REGPARAMS *rp, PIX *pix, l_int32 nexp); 298 Count_pieces(L_REGPARAMS *rp, PIX *pix, l_int32 nexp) in Count_pieces() argument 307 regTestCompareValues(rp, nexp, n, 0.0); in Count_pieces() 308 if (n != nexp) in Count_pieces() 315 Count_pieces2(L_REGPARAMS *rp, BOXA *boxa, l_int32 nexp) in Count_pieces2() argument 320 regTestCompareValues(rp, nexp, n, 0.0); in Count_pieces2() 321 if (n != nexp) in Count_pieces2() 327 Count_ones(L_REGPARAMS *rp, NUMA *na, l_int32 nexp, in Count_ones() argument 339 regTestCompareValues(rp, nexp, sum, 0.0); in Count_ones() 340 if (nexp != sum) in Count_ones() [all …]
|
/dports/net/isc-dhcp44-server/dhcp-4.4.2-P1/keama/ |
H A D | parse.c | 2720 nexp = createMap(); in parse_non_binary() 2730 if (!nexp->skip) { in parse_non_binary() 2759 nexp = createMap(); in parse_non_binary() 2761 mapSet(nexp, in parse_non_binary() 2764 mapSet(nexp, in parse_non_binary() 2791 nexp = createMap(); in parse_non_binary() 2846 nexp = createMap(); in parse_non_binary() 2888 if (!nexp->skip) { in parse_non_binary() 2909 if (!nexp->skip) { in parse_non_binary() 3071 mapSet(nexp, in parse_non_binary() [all …]
|