/dports/mail/dovecot/dovecot-2.3.17/src/lib/ |
H A D | base32.c | 86 base32_encode_with_alphabet(const char *alph, in base32_encode_with_alphabet() argument 99 tmp[0] = alph[src_c[src_pos] >> 3]; in base32_encode_with_alphabet() 100 tmp[1] = alph[((src_c[src_pos] & 0x07) << 2) | in base32_encode_with_alphabet() 102 tmp[2] = alph[((src_c[src_pos+1] >> 1) & 0x1f)]; in base32_encode_with_alphabet() 110 tmp[7] = alph[src_c[src_pos+4] & 0x1f]; in base32_encode_with_alphabet() 116 tmp[0] = alph[src_c[src_pos] >> 3]; in base32_encode_with_alphabet() 119 tmp[1] = alph[((src_c[src_pos] & 0x07) << 2)]; in base32_encode_with_alphabet() 123 tmp[1] = alph[((src_c[src_pos] & 0x07) << 2) | in base32_encode_with_alphabet() 130 tmp[1] = alph[((src_c[src_pos] & 0x07) << 2) | in base32_encode_with_alphabet() 139 tmp[1] = alph[((src_c[src_pos] & 0x07) << 2) | in base32_encode_with_alphabet() [all …]
|
/dports/misc/vxl/vxl-3.3.2/contrib/brl/bseg/boxm2/cpp/algo/tests/ |
H A D | test_merge_function.cxx | 23 float alph = -std::log(1.0f-prob); in test_merge_bit_tree() local 24 float alpha[] = {alph, in test_merge_bit_tree() 25 alph/2.0f, alph/2.0f, alph/2.0f, alph/2.0f, //second gen in test_merge_bit_tree() 26 alph/2.0f, alph/2.0f, alph/2.0f, alph/2.0f }; in test_merge_bit_tree() 52 float alph = -std::log(1.0f-prob); in test_merge_bit_tree() local 55 i = alph/4.0f; in test_merge_bit_tree() 85 float alph = -std::log(1.0f-prob); in test_merge_bit_tree() local 88 alpha[i] = alph/4.0f; in test_merge_bit_tree() 89 if (i==14) alpha[i] = 8.0f*alph; //set one to be too big for .3 in test_merge_bit_tree()
|
/dports/math/R/R-4.1.2/src/nmath/ |
H A D | pgamma.c | 326 term = c / (alph + n); in pgamma_smallx() 336 if (alph > 1) { in pgamma_smallx() 340 f2 = alph * log (x) - lgamma1p (alph); in pgamma_smallx() 342 f2 = pow (x, alph) / exp (lgamma1p (alph)); in pgamma_smallx() 348 double lf2 = alph * log (x) - lgamma1p (alph); in pgamma_smallx() 350 REprintf (" 1:%.14g 2:%.14g\n", alph * log (x), lgamma1p (alph)); in pgamma_smallx() 656 } else if (x <= alph - 1 && x < 0.8 * (alph + 50)) { in pgamma_raw() 670 } else if (alph - 1 < x && alph < 0.8 * (x + 50)) { in pgamma_raw() 677 if (alph < 1) { in pgamma_raw() 681 double f = pd_lower_cf (alph, x - (alph - 1)) * x / alph; in pgamma_raw() [all …]
|
/dports/math/libRmath/R-4.1.1/src/nmath/ |
H A D | pgamma.c | 326 term = c / (alph + n); in pgamma_smallx() 336 if (alph > 1) { in pgamma_smallx() 340 f2 = alph * log (x) - lgamma1p (alph); in pgamma_smallx() 342 f2 = pow (x, alph) / exp (lgamma1p (alph)); in pgamma_smallx() 348 double lf2 = alph * log (x) - lgamma1p (alph); in pgamma_smallx() 350 REprintf (" 1:%.14g 2:%.14g\n", alph * log (x), lgamma1p (alph)); in pgamma_smallx() 656 } else if (x <= alph - 1 && x < 0.8 * (alph + 50)) { in pgamma_raw() 670 } else if (alph - 1 < x && alph < 0.8 * (x + 50)) { in pgamma_raw() 677 if (alph < 1) { in pgamma_raw() 681 double f = pd_lower_cf (alph, x - (alph - 1)) * x / alph; in pgamma_raw() [all …]
|
/dports/math/jags/JAGS-4.3.0/src/jrmath/ |
H A D | pgamma.c | 293 term = c / (alph + n); in pgamma_smallx() 303 if (alph > 1) { in pgamma_smallx() 307 f2 = alph * log (x) - lgamma1p (alph); in pgamma_smallx() 309 f2 = pow (x, alph) / exp (lgamma1p (alph)); in pgamma_smallx() 315 double lf2 = alph * log (x) - lgamma1p (alph); in pgamma_smallx() 317 REprintf (" 1:%.14g 2:%.14g\n", alph * log (x), lgamma1p (alph)); in pgamma_smallx() 623 } else if (x <= alph - 1 && x < 0.8 * (alph + 50)) { in pgamma_raw() 637 } else if (alph - 1 < x && alph < 0.8 * (x + 50)) { in pgamma_raw() 644 if (alph < 1) { in pgamma_raw() 648 double f = pd_lower_cf (alph, x - (alph - 1)) * x / alph; in pgamma_raw() [all …]
|
/dports/biology/vt/vt-0.57721/lib/Rmath/ |
H A D | pgamma.c | 293 term = c / (alph + n); in pgamma_smallx() 303 if (alph > 1) { in pgamma_smallx() 307 f2 = alph * log (x) - lgamma1p (alph); in pgamma_smallx() 309 f2 = pow (x, alph) / exp (lgamma1p (alph)); in pgamma_smallx() 315 double lf2 = alph * log (x) - lgamma1p (alph); in pgamma_smallx() 317 REprintf (" 1:%.14g 2:%.14g\n", alph * log (x), lgamma1p (alph)); in pgamma_smallx() 623 } else if (x <= alph - 1 && x < 0.8 * (alph + 50)) { in pgamma_raw() 637 } else if (alph - 1 < x && alph < 0.8 * (x + 50)) { in pgamma_raw() 644 if (alph < 1) { in pgamma_raw() 648 double f = pd_lower_cf (alph, x - (alph - 1)) * x / alph; in pgamma_raw() [all …]
|
/dports/math/py-rvlib/rvlib-0.0.6/src/ |
H A D | pgamma.c | 328 term = c / (alph + n); in pgamma_smallx() 338 if (alph > 1) { in pgamma_smallx() 342 f2 = alph * log (x) - lgamma1p (alph); in pgamma_smallx() 344 f2 = pow (x, alph) / exp (lgamma1p (alph)); in pgamma_smallx() 350 double lf2 = alph * log (x) - lgamma1p (alph); in pgamma_smallx() 352 REprintf (" 1:%.14g 2:%.14g\n", alph * log (x), lgamma1p (alph)); in pgamma_smallx() 658 } else if (x <= alph - 1 && x < 0.8 * (alph + 50)) { in pgamma_raw() 672 } else if (alph - 1 < x && alph < 0.8 * (x + 50)) { in pgamma_raw() 679 if (alph < 1) { in pgamma_raw() 683 double f = pd_lower_cf (alph, x - (alph - 1)) * x / alph; in pgamma_raw() [all …]
|
/dports/science/dynare/dynare-4.6.4/tests/homotopy/ |
H A D | common.mod | 4 parameters alph gam delt bet aa; 5 alph=0.5; 12 c + k - aa*x*k(-1)^alph - (1-delt)*k(-1); 13 c^(-gam) - (1+bet)^(-1)*(aa*alph*x(+1)*k^(alph-1) + 1 - delt)*c(+1)^(-gam); 18 k = ((delt+bet)/(aa*x*alph))^(1/(alph-1)); 19 c = aa*x*k^alph-delt*k; 29 if abs(oo_.steady_state(1)/(aa*oo_.exo_steady_state(1)*oo_.steady_state(2)^alph-delt*oo_.steady_sta… 33 …tate(2)/((delt+get_param_by_name('bet'))/(aa*oo_.exo_steady_state(1)*alph))^(1/(alph-1)) - 1) > 1e…
|
/dports/science/dynare/dynare-4.6.4/tests/identification/kim/ |
H A D | kim2.mod | 25 alph 36 alph=0.6; 41 s=betae*delta*alph/(1-betae+delta*betae); 45 …alph/(1-betae+delta*betae)))^theta/c^(1+theta)/(1+theta)*(1+theta)*(i/(betae*delta*alph/(1-betae+d… 46 …alph/(1-betae+delta*betae)))^theta*(i/k/delta)^phi=betae*lam(+1)*(alph*(1+theta)*a(+1)^(1+theta)*k… 48 ((1-(betae*delta*alph/(1-betae+delta*betae)))*(c/(1-(betae*delta*alph/(1-betae+delta*betae))))^(1+t… 49 (betae*delta*alph/(1-betae+delta*betae))*(i/(betae*delta*alph/(1-betae+delta*betae)))^(1+theta))^(1… 50 (a*k(-1)^alph); 58 a=as; %as^((1-alph)/(1+theta))*(delta^((phi+theta+1)/(theta+1))/s)^alph; 59 k=(delta/s/a)^(1/(alph-1)); [all …]
|
/dports/science/dynare/dynare-4.6.4/tests/ |
H A D | ramst_static_tag.mod | 4 parameters alph gam delt bet aa; 5 alph=0.5; 13 c + k - aa*x*k(-1)^alph - (1-delt)*k(-1); 14 [dynamic] c^(-gam) - (1+bet)^(-1)*(aa*alph*x(+1)*k^(alph-1) + 1 - delt)*c(+1)^(-gam); 15 [static] k = ((delt+bet)/(x*aa*alph))^(1/(alph-1)); 20 k = ((delt+bet)/(1.0*aa*alph))^(1/(alph-1)); 21 c = aa*k^alph-delt*k;
|
H A D | ramst.mod | 4 parameters alph gam delt bet aa; 5 alph=0.5; 13 c + k - aa*x*k(-1)^alph - (1-delt)*k(-1); 14 c^(-gam) - (1+bet)^(-1)*(aa*alph*x(+1)*k^(alph-1) + 1 - delt)*c(+1)^(-gam); 19 k = ((delt+bet)/(1.0*aa*alph))^(1/(alph-1)); 20 c = aa*k^alph-delt*k;
|
H A D | ramst_a.mod | 5 parameters alph gam delt bet aa; 6 alph=0.5; 14 c + k - aa*x*k(-1)^alph - (1-delt)*k(-1); 15 c^(-gam) - (1+bet)^(-1)*(aa*alph*x(+1)*k^(alph-1) + 1 - delt)*c(+1)^(-gam); 20 k = ((delt+bet)/(1.0*aa*alph))^(1/(alph-1)); 21 c = aa*k^alph-delt*k +1 ;
|
H A D | ramst_vec.mod | 4 parameters alph gam delt bet aa; 5 alph=0.5; 13 c + k - aa*x*k(-1)^alph - (1-delt)*k(-1); 14 c^(-gam) - (1+bet)^(-1)*(aa*alph*x(+1)*k^(alph-1) + 1 - delt)*c(+1)^(-gam); 19 k = ((delt+bet)/(1.0*aa*alph))^(1/(alph-1)); 20 c = aa*k^alph-delt*k;
|
H A D | predetermined_variables.mod | 4 parameters alph gam delt bet aa; 5 alph=0.5; 14 c + i = aa*x*k^alph; 15 c^(-gam) - (1+bet)^(-1)*(aa*alph*x(+1)*k(+1)^(alph-1) + 1 - delt)*c(+1)^(-gam); 21 k = ((delt+bet)/(1.0*aa*alph))^(1/(alph-1)); 22 c = aa*k^alph-delt*k;
|
H A D | histval_det.mod | 7 parameters alph gam delt bet aa; 8 alph=0.5; 16 c + k - aa*x*k(-1)^alph - (1-delt)*k(-1); 18 c^(-gam) - (1+bet)^(-1)*(aa*alph*x(-1)*k^(alph-1) + 1 - delt)*c(+1)^(-gam); 23 k = ((delt+bet)/(1.0*aa*alph))^(1/(alph-1)); 24 c = aa*k^alph-delt*k;
|
/dports/math/gap/gap-4.11.0/pkg/SgpViz-0.999.4/src/ |
H A D | xautomaton.tcl | 193 set alph [.up.alph.down.entry get] 201 if {$alph == ""} { 212 if {[string is integer $alph]} { 213 set nalph $alph 216 set len [string length $alph] 218 if {!([string index $alph 0] == {"}) || !([string index $alph $len] == {"})} { 635 set alph 0 656 set alph [lindex $argv 3] 673 if {[string is integer $alph]} { 674 set nalph $alph [all …]
|
/dports/science/dynare/dynare-4.6.4/dynare++/tests/ |
H A D | dm7.mod | 4 parameters alph bet delt thet tau_m rho; 5 alph = 0.3; 14 I = K(-1)^alph*N^(1-alph)-C; 17 r = (1-tau)*alph*(K(-1)/N)^(alph-1); 18 w = (1-tau)*(1-alph)*(K(-1)/N)^alph;
|
/dports/math/gap/gap-4.11.0/pkg/kan-1.29/tst/ |
H A D | example3.tst | 58 gap> alph := AlphabetOfRatExpAsList( langT );; 59 gap> a1 := RatExpOnnLetters( alph, [ ], [1] );; ## d 60 gap> a2 := RatExpOnnLetters( alph, [ ], [2] );; ## D 61 gap> a3 := RatExpOnnLetters( alph, [ ], [3] );; ## c 62 gap> a4 := RatExpOnnLetters( alph, [ ], [4] );; ## C 63 gap> s1 := RatExpOnnLetters( alph, "star", a1 );; ## d* 64 gap> s2 := RatExpOnnLetters( alph, "star", a2 );; ## D* 67 gap> a3a1 := RatExpOnnLetters( alph, "product", [ a3, a1 ] );; ## cd 73 gap> u3 := RatExpOnnLetters( alph, "union", [u2s1,a3s2,s2] );; 74 gap> prod := RatExpOnnLetters( alph, "product", [u1,su2a3,u3] );; [all …]
|
/dports/science/dynare/dynare-4.6.4/tests/initval_file/ |
H A D | ramst_datafile.mod | 7 parameters alph gam delt bet aa; 8 alph=0.5; 16 c + k - aa*x*k(-1)^alph - (1-delt)*k(-1); 17 c^(-gam) - (1+bet)^(-1)*(aa*alph*x(+1)*k^(alph-1) + 1 - delt)*c(+1)^(-gam); 22 k = ((delt+bet)/(1.0*aa*alph))^(1/(alph-1)); 23 c = aa*k^alph-delt*k;
|
H A D | ramst_initval_file.mod | 6 parameters alph gam delt bet aa; 7 alph=0.5; 15 c + k - aa*x*k(-1)^alph - (1-delt)*k(-1); 16 c^(-gam) - (1+bet)^(-1)*(aa*alph*x(+1)*k^(alph-1) + 1 - delt)*c(+1)^(-gam); 21 k = ((delt+bet)/(1.0*aa*alph))^(1/(alph-1)); 22 c = aa*k^alph-delt*k;
|
/dports/science/dynare/dynare-4.6.4/tests/dynare-command-options/ |
H A D | ramst.mod | 6 parameters alph gam delt bet aa; 7 alph=0.5; 15 c + k - aa*x*k(-1)^alph - (1-delt)*k(-1); 16 c^(-gam) - (1+bet)^(-1)*(aa*alph*x(+1)*k^(alph-1) + 1 - delt)*c(+1)^(-gam); 21 k = ((delt+bet)/(1.0*aa*alph))^(1/(alph-1)); 22 c = aa*k^alph-delt*k;
|
/dports/science/dynare/dynare-4.6.4/tests/steady_state_operator/ |
H A D | standard.mod | 6 parameters alph gam delt bet aa; 7 alph=0.5; 14 c + k - aa*x*k(-1)^alph - (1-delt)*k(-1); 15 c^(-gam) - (1+bet)^(-1)*(aa*alph*x(+1)*k^(alph-1) + 1 - delt)*c(+1)^(-gam); 21 k = ((delt+bet)/(1.0*aa*alph))^(1/(alph-1)); 22 c = aa*k^alph-delt*k;
|
H A D | bytecode_test.mod | 6 parameters alph gam delt bet aa; 7 alph=0.5; 14 c + k - aa*x*k(-1)^alph - (1-delt)*k(-1); 15 c^(-gam) - (1+bet)^(-1)*(aa*alph*x(+1)*k^(alph-1) + 1 - delt)*c(+1)^(-gam); 21 k = ((delt+bet)/(1.0*aa*alph))^(1/(alph-1)); 22 c = aa*k^alph-delt*k;
|
H A D | block.mod | 6 parameters alph gam delt bet aa; 7 alph=0.5; 14 c + k - aa*x*k(-1)^alph - (1-delt)*k(-1); 15 c^(-gam) - (1+bet)^(-1)*(aa*alph*x(+1)*k^(alph-1) + 1 - delt)*c(+1)^(-gam); 21 k = ((delt+bet)/(1.0*aa*alph))^(1/(alph-1)); 22 c = aa*k^alph-delt*k;
|
H A D | use_dll.mod | 6 parameters alph gam delt bet aa; 7 alph=0.5; 14 c + k - aa*x*k(-1)^alph - (1-delt)*k(-1); 15 c^(-gam) - (1+bet)^(-1)*(aa*alph*x(+1)*k^(alph-1) + 1 - delt)*c(+1)^(-gam); 21 k = ((delt+bet)/(1.0*aa*alph))^(1/(alph-1)); 22 c = aa*k^alph-delt*k;
|