/[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.9 by bjg, Fri Jun 20 14:19:56 2003 UTC revision 1.1.2.10 by bjg, Sun Jun 22 21:20:36 2003 UTC
# Line 156  main (void) Line 156  main (void)
156    /* Tests for student's T distribution */    /* Tests for student's T distribution */
157    
158    TEST(gsl_cdf_t_P, (0.0, 1), 0.5, TEST_TOL6);    TEST(gsl_cdf_t_P, (0.0, 1), 0.5, TEST_TOL6);
159      TEST(gsl_cdf_t_P, (1e-100, 1), 0.5, TEST_TOL6);
160    TEST(gsl_cdf_t_P, (0.001, 1), 5.00318309780080559e-1, TEST_TOL6);    TEST(gsl_cdf_t_P, (0.001, 1), 5.00318309780080559e-1, TEST_TOL6);
161    TEST(gsl_cdf_t_P, (0.01, 1), 5.03182992764908255e-1, TEST_TOL6);    TEST(gsl_cdf_t_P, (0.01, 1), 5.03182992764908255e-1, TEST_TOL6);
162    TEST(gsl_cdf_t_P, (0.1, 1), 5.31725517430553569e-1, TEST_TOL6);    TEST(gsl_cdf_t_P, (0.1, 1), 5.31725517430553569e-1, TEST_TOL6);
# Line 169  main (void) Line 170  main (void)
170    TEST(gsl_cdf_t_P, (1000.0, 1), 9.99681690219919441e-1, TEST_TOL6);    TEST(gsl_cdf_t_P, (1000.0, 1), 9.99681690219919441e-1, TEST_TOL6);
171    TEST(gsl_cdf_t_P, (10000.0, 1), 9.99968169011487724e-1, TEST_TOL6);    TEST(gsl_cdf_t_P, (10000.0, 1), 9.99968169011487724e-1, TEST_TOL6);
172    
173      TEST(gsl_cdf_t_P, (-1e-100, 1), 0.5, TEST_TOL6);
174    TEST(gsl_cdf_t_P, (-0.001, 1), 4.99681690219919441e-1, TEST_TOL6);    TEST(gsl_cdf_t_P, (-0.001, 1), 4.99681690219919441e-1, TEST_TOL6);
175    TEST(gsl_cdf_t_P, (-0.01, 1), 4.96817007235091744e-1, TEST_TOL6);    TEST(gsl_cdf_t_P, (-0.01, 1), 4.96817007235091744e-1, TEST_TOL6);
176    TEST(gsl_cdf_t_P, (-0.1, 1), 4.68274482569446430e-1, TEST_TOL6);    TEST(gsl_cdf_t_P, (-0.1, 1), 4.68274482569446430e-1, TEST_TOL6);
# Line 183  main (void) Line 185  main (void)
185    TEST(gsl_cdf_t_P, (-10000.0, 1), 3.18309885122757724e-5, TEST_TOL6);    TEST(gsl_cdf_t_P, (-10000.0, 1), 3.18309885122757724e-5, TEST_TOL6);
186    
187    TEST(gsl_cdf_t_P, (0.0, 2), 5.00000000000000000e-01, TEST_TOL6);    TEST(gsl_cdf_t_P, (0.0, 2), 5.00000000000000000e-01, TEST_TOL6);
188      TEST(gsl_cdf_t_P, (1e-100, 2), 5.00000000000000000e-01, TEST_TOL6);
189    TEST(gsl_cdf_t_P, (0.001, 2), 5.00353553302204959e-01, TEST_TOL6);    TEST(gsl_cdf_t_P, (0.001, 2), 5.00353553302204959e-01, TEST_TOL6);
190    TEST(gsl_cdf_t_P, (0.01, 2), 5.03535445520899514e-01, TEST_TOL6);    TEST(gsl_cdf_t_P, (0.01, 2), 5.03535445520899514e-01, TEST_TOL6);
191    TEST(gsl_cdf_t_P, (0.1, 2), 5.35267280792929913e-01, TEST_TOL6);    TEST(gsl_cdf_t_P, (0.1, 2), 5.35267280792929913e-01, TEST_TOL6);
# Line 196  main (void) Line 199  main (void)
199    TEST(gsl_cdf_t_P, (1000.0, 2), 9.99999500000749945e-01, TEST_TOL6);    TEST(gsl_cdf_t_P, (1000.0, 2), 9.99999500000749945e-01, TEST_TOL6);
200    TEST(gsl_cdf_t_P, (10000.0, 2), 9.999999950000000739e-01, TEST_TOL6);    TEST(gsl_cdf_t_P, (10000.0, 2), 9.999999950000000739e-01, TEST_TOL6);
201    
202      TEST(gsl_cdf_t_P, (-1e-100, 2), 5.00000000000000000e-01, TEST_TOL6);
203    TEST(gsl_cdf_t_P, (-0.001, 2), 4.99646446697795041e-01, TEST_TOL6);    TEST(gsl_cdf_t_P, (-0.001, 2), 4.99646446697795041e-01, TEST_TOL6);
204    TEST(gsl_cdf_t_P, (-0.01, 2), 4.96464554479100486e-01, TEST_TOL6);    TEST(gsl_cdf_t_P, (-0.01, 2), 4.96464554479100486e-01, TEST_TOL6);
205    TEST(gsl_cdf_t_P, (-0.1, 2), 4.64732719207070087e-01, TEST_TOL6);    TEST(gsl_cdf_t_P, (-0.1, 2), 4.64732719207070087e-01, TEST_TOL6);
# Line 210  main (void) Line 214  main (void)
214    TEST(gsl_cdf_t_P, (-10000.0, 2), 4.99999992500000125e-09, TEST_TOL6);    TEST(gsl_cdf_t_P, (-10000.0, 2), 4.99999992500000125e-09, TEST_TOL6);
215    
216    TEST(gsl_cdf_t_P, (0.0, 300), 5.00000000000000000e-01, TEST_TOL6);    TEST(gsl_cdf_t_P, (0.0, 300), 5.00000000000000000e-01, TEST_TOL6);
217      TEST(gsl_cdf_t_P, (1e-100, 300), 5.00000000000000000e-01, TEST_TOL6);
218    TEST(gsl_cdf_t_P, (0.001, 300), 5.00398609900942949e-01, TEST_TOL6);    TEST(gsl_cdf_t_P, (0.001, 300), 5.00398609900942949e-01, TEST_TOL6);
219    TEST(gsl_cdf_t_P, (0.01, 300), 5.03986033020559088e-01, TEST_TOL6);    TEST(gsl_cdf_t_P, (0.01, 300), 5.03986033020559088e-01, TEST_TOL6);
220    TEST(gsl_cdf_t_P, (0.1, 300), 5.39794441177768194e-01, TEST_TOL6);    TEST(gsl_cdf_t_P, (0.1, 300), 5.39794441177768194e-01, TEST_TOL6);
# Line 223  main (void) Line 228  main (void)
228    TEST(gsl_cdf_t_P, (1000.0, 300), 1.00000000000000000e+00, TEST_TOL6);    TEST(gsl_cdf_t_P, (1000.0, 300), 1.00000000000000000e+00, TEST_TOL6);
229    TEST(gsl_cdf_t_P, (10000.0, 300), 1.00000000000000000e+00, TEST_TOL6);    TEST(gsl_cdf_t_P, (10000.0, 300), 1.00000000000000000e+00, TEST_TOL6);
230    
231      TEST(gsl_cdf_t_P, (-1e-100, 300), 5.00000000000000000e-01, TEST_TOL6);
232    TEST(gsl_cdf_t_P, (-0.001, 300), 4.99601390099057051e-01, TEST_TOL6);    TEST(gsl_cdf_t_P, (-0.001, 300), 4.99601390099057051e-01, TEST_TOL6);
233    TEST(gsl_cdf_t_P, (-0.01, 300), 4.96013966979440912e-01, TEST_TOL6);    TEST(gsl_cdf_t_P, (-0.01, 300), 4.96013966979440912e-01, TEST_TOL6);
234    TEST(gsl_cdf_t_P, (-0.1, 300), 4.60205558822231806e-01, TEST_TOL6);    TEST(gsl_cdf_t_P, (-0.1, 300), 4.60205558822231806e-01, TEST_TOL6);
# Line 236  main (void) Line 242  main (void)
242    TEST(gsl_cdf_t_P, (-1000.0, 300), 0.0, TEST_TOL6);    TEST(gsl_cdf_t_P, (-1000.0, 300), 0.0, TEST_TOL6);
243    TEST(gsl_cdf_t_P, (-10000.0, 300), 0.0, TEST_TOL6);    TEST(gsl_cdf_t_P, (-10000.0, 300), 0.0, TEST_TOL6);
244    
245      /* Tests for F distribution */
246    
247      TEST(gsl_cdf_F_ratio_P, (0.0, 1.2, 1.3), 0.0, TEST_TOL6);
248      TEST(gsl_cdf_F_ratio_P, (1e-100, 1.2, 1.3), 6.98194275525039002e-61, TEST_TOL6);
249      TEST(gsl_cdf_F_ratio_P, (0.001, 1.2, 1.3), 1.10608485860238564e-2, TEST_TOL6);
250      TEST(gsl_cdf_F_ratio_P, (0.01, 1.2, 1.3), 4.38636757068313850e-2, TEST_TOL6);
251      TEST(gsl_cdf_F_ratio_P, (0.1, 1.2, 1.3), 1.68242392712840734e-1, TEST_TOL6);
252      TEST(gsl_cdf_F_ratio_P, (0.325, 1.2, 1.3), 3.14130045246195449e-1, TEST_TOL6);
253      TEST(gsl_cdf_F_ratio_P, (1.0, 1.2, 1.3), 5.09630779074755253e-01, TEST_TOL6);
254      TEST(gsl_cdf_F_ratio_P, (1.5, 1.2, 1.3), 5.83998640641553852e-1, TEST_TOL6);
255      TEST(gsl_cdf_F_ratio_P, (2.0, 1.2, 1.3), 6.34733581351938787e-1, TEST_TOL6);
256      TEST(gsl_cdf_F_ratio_P, (10.0, 1.2, 1.3), 8.48446237879200975e-1, TEST_TOL6);
257      TEST(gsl_cdf_F_ratio_P, (20.0, 1.2, 1.3), 9.00987726336875039e-1 , TEST_TOL6);
258      TEST(gsl_cdf_F_ratio_P, (100.0, 1.2, 1.3), 9.64489127047688435e-1, TEST_TOL6);
259      TEST(gsl_cdf_F_ratio_P, (1000.0, 1.2, 1.3), 9.92012051694116388e-1, TEST_TOL6);
260      TEST(gsl_cdf_F_ratio_P, (10000.0, 1.2, 1.3), 9.98210862808842585e-1 , TEST_TOL6);
261    
262    exit (gsl_test_summary());    exit (gsl_test_summary());
263  }  }

Legend:
Removed from v.1.1.2.9  
changed lines
  Added in v.1.1.2.10

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