Lines Matching full:double
21 double *x;
24 double mu=0.0, sigma=0.0, sumsquare=0.0, sum=0.0, top=0.0, rho=0.0;
25 double sigma2=0.0;
29 limit = 2*info.st_size/sizeof(double); /* @@ approximate */
33 x = (double *)malloc(limit*sizeof(double));
43 mu = sum/(double)n;
44 sigma = sqrt((sumsquare - (double)n*mu*mu)/(double)(n-1));
47 top += ((double)x[i]-mu)*((double)x[i-1]-mu);
48 sigma2 += ((double)x[i-1] - mu)*((double)x[i-1] - mu);
56 /*printf("sigma2 = %10.4f\n", sqrt(sigma2/(double)(n-1)));*/
57 /*printf("correlation rho = %10.6f\n", top/((double)(n-1)*sigma*sigma));*/
