Parent Directory | Revision Log | Patch
revision 1.1.2.4 by jstover, Thu Feb 6 03:33:31 2003 UTC | revision 1.1.2.5 by jstover, Fri Feb 7 02:46:10 2003 UTC | |
---|---|---|
# | Line 255 int gsl_cdf_t_e ( double t, double nu, g | Line 255 int gsl_cdf_t_e ( double t, double nu, g |
255 | y = 1/sqrt(1+t*t/nu); | y = 1/sqrt(1+t*t/nu); |
256 | num = y; | num = y; |
257 | p = 0.0; | p = 0.0; |
258 | diff = 2*GSL_DBL_EPSILON; | |
259 | for ( i = 2; (i < MAXI)&&(diff>GSL_DBL_EPSILON); i+=2) | for ( i = 2; (i < MAXI)&&(diff>GSL_DBL_EPSILON); i+=2) |
260 | { | { |
261 | diff = p; | diff = p; |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |