Parent Directory | Revision Log | Patch
revision 1.1.2.9 by jstover, Sun Mar 9 02:51:01 2003 UTC | revision 1.1.2.10 by bjg, Mon Apr 7 12:14:18 2003 UTC | |
---|---|---|
# | Line 311 static double t_cornish_fisher ( const d | Line 311 static double t_cornish_fisher ( const d |
311 | ||
312 | y = x / sqrt(nu); | y = x / sqrt(nu); |
313 | u = cornish_fisher ( x, nu ); | u = cornish_fisher ( x, nu ); |
314 | q = gsl_cdf_gauss_Q ( u); | q = gsl_cdf_ugaussian_Q ( u); |
315 | /* if ( ((tail == GSL_CDF_UPPER )&&(t>0.0))||((tail==GSL_CDF_LOWER)&&(t<=0.0))) */ | /* if ( ((tail == GSL_CDF_UPPER )&&(t>0.0))||((tail==GSL_CDF_LOWER)&&(t<=0.0))) */ |
316 | /* { */ | /* { */ |
317 | /* result->val = q; */ | /* result->val = q; */ |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |