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

Diff of /gsl/cdf/test.c

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

revision 1.1.2.14 by bjg, Tue Jun 24 17:29:11 2003 UTC revision 1.1.2.15 by bjg, Tue Jun 24 22:28:43 2003 UTC
# Line 350  main (void) Line 350  main (void)
350    TEST(gsl_cdf_Fdist_P, (1000.0, 1.2, 1.3), 9.92012051694116388e-1, TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (1000.0, 1.2, 1.3), 9.92012051694116388e-1, TEST_TOL6);
351    TEST(gsl_cdf_Fdist_P, (10000.0, 1.2, 1.3), 9.98210862808842585e-1 , TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (10000.0, 1.2, 1.3), 9.98210862808842585e-1 , TEST_TOL6);
352    
353      TEST(gsl_cdf_Fdist_Q, (0.0, 1.2, 1.3), 1.0, TEST_TOL6);
354      TEST(gsl_cdf_Fdist_Q, (1e-100, 1.2, 1.3), 1.0, TEST_TOL6);
355      TEST(gsl_cdf_Fdist_Q, (0.001, 1.2, 1.3), 9.88939151413976144e-1, TEST_TOL6);
356      TEST(gsl_cdf_Fdist_Q, (0.01, 1.2, 1.3), 9.56136324293168615e-1, TEST_TOL6);
357      TEST(gsl_cdf_Fdist_Q, (0.1, 1.2, 1.3), 8.31757607287159265e-1, TEST_TOL6);
358      TEST(gsl_cdf_Fdist_Q, (0.325, 1.2, 1.3), 6.85869954753804551e-1, TEST_TOL6);
359      TEST(gsl_cdf_Fdist_Q, (1.0, 1.2, 1.3), 4.90369220925244747e-1, TEST_TOL6);
360      TEST(gsl_cdf_Fdist_Q, (1.5, 1.2, 1.3), 4.16001359358446148e-1, TEST_TOL6);
361      TEST(gsl_cdf_Fdist_Q, (2.0, 1.2, 1.3), 3.65266418648061213e-1, TEST_TOL6);
362      TEST(gsl_cdf_Fdist_Q, (10.0, 1.2, 1.3), 1.51553762120799025e-1, TEST_TOL6);
363      TEST(gsl_cdf_Fdist_Q, (20.0, 1.2, 1.3), 9.90122736631249612e-2 , TEST_TOL6);
364      TEST(gsl_cdf_Fdist_Q, (100.0, 1.2, 1.3), 3.55108729523115643e-2, TEST_TOL6);
365      TEST(gsl_cdf_Fdist_Q, (1000.0, 1.2, 1.3), 7.98794830588361109e-3, TEST_TOL6);
366      TEST(gsl_cdf_Fdist_Q, (10000.0, 1.2, 1.3), 1.7891371911574145e-3, TEST_TOL6);
367    
368    
369    TEST(gsl_cdf_Fdist_P, (0.0, 500, 1.3), 0.0, TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (0.0, 500, 1.3), 0.0, TEST_TOL6);
370    TEST(gsl_cdf_Fdist_P, (1e-100, 500, 1.3), 0.0, TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (1e-100, 500, 1.3), 0.0, TEST_TOL6);
371    
# Line 366  main (void) Line 382  main (void)
382    TEST(gsl_cdf_Fdist_P, (1000.0, 500, 1.3), 9.90585749380655275e-1, TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (1000.0, 500, 1.3), 9.90585749380655275e-1, TEST_TOL6);
383    TEST(gsl_cdf_Fdist_P, (10000.0, 500, 1.3), 9.97891924831461387e-1, TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (10000.0, 500, 1.3), 9.97891924831461387e-1, TEST_TOL6);
384    
385      TEST(gsl_cdf_Fdist_Q, (0.0, 500, 1.3), 1.0, TEST_TOL6);
386      TEST(gsl_cdf_Fdist_Q, (1e-100, 500, 1.3), 1.0, TEST_TOL6);
387    
388      TEST(gsl_cdf_Fdist_Q, (0.001, 500, 1.3), 1.0, TEST_TOL6);
389      TEST(gsl_cdf_Fdist_Q, (0.01, 500, 1.3), 1.0, TEST_TOL6);
390      TEST(gsl_cdf_Fdist_Q, (0.1, 500, 1.3), 9.99410023490380312e-1, TEST_TOL6);
391      TEST(gsl_cdf_Fdist_Q, (0.325, 500, 1.3), 9.31388951394845747e-1, TEST_TOL6);
392      TEST(gsl_cdf_Fdist_Q, (1.0, 500, 1.3), 6.61524946193595385e-1, TEST_TOL6);
393      TEST(gsl_cdf_Fdist_Q, (1.5, 500, 1.3), 5.47983754752542572e-1, TEST_TOL6);
394      TEST(gsl_cdf_Fdist_Q, (2.0, 500, 1.3), 4.72660931062611202e-1, TEST_TOL6);
395      TEST(gsl_cdf_Fdist_Q, (10.0, 500, 1.3), 1.83160371421586096e-1, TEST_TOL6);
396      TEST(gsl_cdf_Fdist_Q, (20.0, 500, 1.3), 1.18215376943088595e-1, TEST_TOL6);
397      TEST(gsl_cdf_Fdist_Q, (100.0, 500, 1.3), 4.19549427957787016e-2, TEST_TOL6);
398      TEST(gsl_cdf_Fdist_Q, (1000.0, 500, 1.3), 9.41425061934473424e-3, TEST_TOL6);
399      TEST(gsl_cdf_Fdist_Q, (10000.0, 500, 1.3), 2.10807516853862603e-3, TEST_TOL6);
400    
401    TEST(gsl_cdf_Fdist_P, (0.0, 1.2, 500), 0.0, TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (0.0, 1.2, 500), 0.0, TEST_TOL6);
402    TEST(gsl_cdf_Fdist_P, (1e-100, 1.2, 500), 8.23342055585482999e-61, TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (1e-100, 1.2, 500), 8.23342055585482999e-61, TEST_TOL6);
403    TEST(gsl_cdf_Fdist_P, (0.001, 1.2, 500), 1.30461496441289529e-2, TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (0.001, 1.2, 500), 1.30461496441289529e-2, TEST_TOL6);
# Line 381  main (void) Line 413  main (void)
413    TEST(gsl_cdf_Fdist_P, (1000.0, 1.2, 500), 1.0, TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (1000.0, 1.2, 500), 1.0, TEST_TOL6);
414    TEST(gsl_cdf_Fdist_P, (10000.0, 1.2, 500), 1.0, TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (10000.0, 1.2, 500), 1.0, TEST_TOL6);
415    
416      TEST(gsl_cdf_Fdist_Q, (0.0, 1.2, 500), 1.0, TEST_TOL6);
417      TEST(gsl_cdf_Fdist_Q, (1e-100, 1.2, 500), 1.0, TEST_TOL6);
418      TEST(gsl_cdf_Fdist_Q, (0.001, 1.2, 500), 9.86953850355871047e-1, TEST_TOL6);
419      TEST(gsl_cdf_Fdist_Q, (0.01, 1.2, 500), 9.48167577539196671e-1, TEST_TOL6);
420      TEST(gsl_cdf_Fdist_Q, (0.1, 1.2, 500), 7.97764898283923711e-1, TEST_TOL6);
421      TEST(gsl_cdf_Fdist_Q, (0.325, 1.2, 500), 6.09497016780606251e-1, TEST_TOL6);
422      TEST(gsl_cdf_Fdist_Q, (1.0, 1.2, 500), 3.32343808425346381e-1, TEST_TOL6);
423      TEST(gsl_cdf_Fdist_Q, (1.5, 1.2, 500), 2.24460769728532946e-1, TEST_TOL6);
424      TEST(gsl_cdf_Fdist_Q, (2.0, 1.2, 500), 1.54790885095386295e-1, TEST_TOL6);
425      TEST(gsl_cdf_Fdist_Q, (10.0, 1.2, 500), 8.3198234087901168e-4, TEST_TOL6);
426      TEST(gsl_cdf_Fdist_Q, (20.0, 1.2, 500), 1.99426162833131e-6, TEST_TOL6);
427      TEST(gsl_cdf_Fdist_Q, (100.0, 1.2, 500), 6.23302662288217117e-25, TEST_TOL6);
428      TEST(gsl_cdf_Fdist_Q, (1000.0, 1.2, 500), 1.14328577259666930e-134, TEST_TOL6);
429      TEST(gsl_cdf_Fdist_Q, (10000.0, 1.2, 500), 0.0, TEST_TOL6);
430    
431    
432    TEST(gsl_cdf_Fdist_P, (0.0, 200, 500), 0.0, TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (0.0, 200, 500), 0.0, TEST_TOL6);
433    TEST(gsl_cdf_Fdist_P, (1e-100, 200, 500), 0.0, TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (1e-100, 200, 500), 0.0, TEST_TOL6);
434    TEST(gsl_cdf_Fdist_P, (0.001, 200, 500), 4.09325080403669893e-251, TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (0.001, 200, 500), 4.09325080403669893e-251, TEST_TOL6);
# Line 396  main (void) Line 444  main (void)
444    TEST(gsl_cdf_Fdist_P, (1000.0, 200, 500), 1.0, TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (1000.0, 200, 500), 1.0, TEST_TOL6);
445    TEST(gsl_cdf_Fdist_P, (10000.0, 200, 500), 1.0, TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (10000.0, 200, 500), 1.0, TEST_TOL6);
446    
447      TEST(gsl_cdf_Fdist_Q, (0.0, 200, 500), 1.0, TEST_TOL6);
448      TEST(gsl_cdf_Fdist_Q, (1e-100, 200, 500), 1.0, TEST_TOL6);
449      TEST(gsl_cdf_Fdist_Q, (0.001, 200, 500), 1.0, TEST_TOL6);
450      TEST(gsl_cdf_Fdist_Q, (0.01, 200, 500), 1.0, TEST_TOL6);
451      TEST(gsl_cdf_Fdist_Q, (0.1, 200, 500), 1.0, TEST_TOL6);
452      TEST(gsl_cdf_Fdist_Q, (0.325, 200, 500), 9.99999999999999997e-1, TEST_TOL6);
453      TEST(gsl_cdf_Fdist_Q, (1.0, 200, 500), 4.93253673878831734e-1, TEST_TOL6);
454      TEST(gsl_cdf_Fdist_Q, (1.5, 200, 500), 2.05824281287561795e-4, TEST_TOL6);
455      TEST(gsl_cdf_Fdist_Q, (2.0, 200, 500), 4.71763848371410786e-10, TEST_TOL6);
456      TEST(gsl_cdf_Fdist_Q, (10.0, 200, 500), 5.98048337181948436e-96, TEST_TOL6);
457      TEST(gsl_cdf_Fdist_Q, (20.0, 200, 500), 1.0, TEST_TOL6);
458      TEST(gsl_cdf_Fdist_Q, (100.0, 200, 500), 1.0, TEST_TOL6);
459      TEST(gsl_cdf_Fdist_Q, (1000.0, 200, 500), 1.0, TEST_TOL6);
460      TEST(gsl_cdf_Fdist_Q, (10000.0, 200, 500), 1.0, TEST_TOL6);
461    
462    
463    /* Tests for gamma distribution */    /* Tests for gamma distribution */
464    
465    /* p(x, a, b) := gammaP(b, x / a) */    /* p(x, a, b) := gammaP(b, x / a) */

Legend:
Removed from v.1.1.2.14  
changed lines
  Added in v.1.1.2.15

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