/[gsl]/gsl/cdf/tdist.c
ViewVC logotype

Diff of /gsl/cdf/tdist.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.1.2.5 by bjg, Sun Jun 29 13:33:36 2003 UTC revision 1.1.2.6 by bjg, Tue Jul 15 15:52:55 2003 UTC
# Line 109  cornish_fisher (double t, double n) Line 109  cornish_fisher (double t, double n)
109    double a = n - 0.5;    double a = n - 0.5;
110    double b = 48.0 * a * a;    double b = 48.0 * a * a;
111    
112    double z2 = a * log (1 + (t * t / n));    double z2 = a * log1p (t * t / n);
113    double z = sqrt (z2);    double z = sqrt (z2);
114    
115    double p5 = z * poly_eval (coeffs6, 9, z2);    double p5 = z * poly_eval (coeffs6, 9, z2);

Legend:
Removed from v.1.1.2.5  
changed lines
  Added in v.1.1.2.6

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26