9 double a1, b1, a2, b3, c1, c2, c3, c4, c5, c6, lx;
10 double sum1 = 0.0, sum2 = 0.0, sum4 = 0.0;
12 for (i = 0; i < n; ++i) {
20 for (i = 0; i < n; ++i) {
22 sum4 += (lx - a1) * (lx - a1);
26 b3 = exp(a1 * 2 + a2) * (exp(a2) - 1);
28 c2 = (exp(a2 * 4) + exp(a2 * 3) * 2 - 4) / 4 - a2 + exp(a2) * 0.75;
29 c3 = a2 * (exp(a2) * 2 - 1) * (exp(a2) * 2 - 1);
30 c4 = (exp(a2) - 1) * 2 * (exp(a2) - 1);
35 fprintf(stdout,
" WARNING!!! STATISTICS FOR THE NEXT TEST WILL\n");
36 fprintf(stdout,
" NOT BE CALCULATED DUE TO SMALL LOGVARIANCE\n");
41 c6 = sqrt(c2 - c5) * 2.0 * sqrt((
double)n);
46 fprintf(stdout,
" TEST24 KT(LN) =%10.4f\n", y[0]);
double * Cdhc_kotz_families(double *x, int n)