/[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.11 by bjg, Mon Jun 23 14:05:03 2003 UTC revision 1.1.2.12 by bjg, Mon Jun 23 18:19:31 2003 UTC
# Line 154  main (void) Line 154  main (void)
154    
155    /* Tests for student's T distribution */    /* Tests for student's T distribution */
156    
157    TEST(gsl_cdf_t_P, (0.0, 1), 0.5, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (0.0, 1), 0.5, TEST_TOL6);
158    TEST(gsl_cdf_t_P, (1e-100, 1), 0.5, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (1e-100, 1), 0.5, TEST_TOL6);
159    TEST(gsl_cdf_t_P, (0.001, 1), 5.00318309780080559e-1, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (0.001, 1), 5.00318309780080559e-1, TEST_TOL6);
160    TEST(gsl_cdf_t_P, (0.01, 1), 5.03182992764908255e-1, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (0.01, 1), 5.03182992764908255e-1, TEST_TOL6);
161    TEST(gsl_cdf_t_P, (0.1, 1), 5.31725517430553569e-1, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (0.1, 1), 5.31725517430553569e-1, TEST_TOL6);
162    TEST(gsl_cdf_t_P, (0.325, 1), 6.00023120032852123e-1, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (0.325, 1), 6.00023120032852123e-1, TEST_TOL6);
163    TEST(gsl_cdf_t_P, (1.0, 1), 0.75000000000000000e0, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (1.0, 1), 0.75000000000000000e0, TEST_TOL6);
164    TEST(gsl_cdf_t_P, (1.5, 1), 8.12832958189001183e-1, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (1.5, 1), 8.12832958189001183e-1, TEST_TOL6);
165    TEST(gsl_cdf_t_P, (2.0, 1), 8.52416382349566726e-1, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (2.0, 1), 8.52416382349566726e-1, TEST_TOL6);
166    TEST(gsl_cdf_t_P, (10.0, 1), 9.68274482569446430e-1, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (10.0, 1), 9.68274482569446430e-1, TEST_TOL6);
167    TEST(gsl_cdf_t_P, (20.0, 1), 9.84097748743823625e-1, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (20.0, 1), 9.84097748743823625e-1, TEST_TOL6);
168    TEST(gsl_cdf_t_P, (100.0, 1), 9.96817007235091745e-1, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (100.0, 1), 9.96817007235091745e-1, TEST_TOL6);
169    TEST(gsl_cdf_t_P, (1000.0, 1), 9.99681690219919441e-1, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (1000.0, 1), 9.99681690219919441e-1, TEST_TOL6);
170    TEST(gsl_cdf_t_P, (10000.0, 1), 9.99968169011487724e-1, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (10000.0, 1), 9.99968169011487724e-1, TEST_TOL6);
171    
172    TEST(gsl_cdf_t_P, (-1e-100, 1), 0.5, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (-1e-100, 1), 0.5, TEST_TOL6);
173    TEST(gsl_cdf_t_P, (-0.001, 1), 4.99681690219919441e-1, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (-0.001, 1), 4.99681690219919441e-1, TEST_TOL6);
174    TEST(gsl_cdf_t_P, (-0.01, 1), 4.96817007235091744e-1, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (-0.01, 1), 4.96817007235091744e-1, TEST_TOL6);
175    TEST(gsl_cdf_t_P, (-0.1, 1), 4.68274482569446430e-1, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (-0.1, 1), 4.68274482569446430e-1, TEST_TOL6);
176    TEST(gsl_cdf_t_P, (-0.325, 1), 3.99976879967147876e-1, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (-0.325, 1), 3.99976879967147876e-1, TEST_TOL6);
177    TEST(gsl_cdf_t_P, (-1.0, 1), 0.25, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (-1.0, 1), 0.25, TEST_TOL6);
178    TEST(gsl_cdf_t_P, (-1.5, 1), 1.87167041810998816e-1, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (-1.5, 1), 1.87167041810998816e-1, TEST_TOL6);
179    TEST(gsl_cdf_t_P, (-2.0, 1), 1.47583617650433274e-1, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (-2.0, 1), 1.47583617650433274e-1, TEST_TOL6);
180    TEST(gsl_cdf_t_P, (-10.0, 1), 3.17255174305535695e-2, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (-10.0, 1), 3.17255174305535695e-2, TEST_TOL6);
181    TEST(gsl_cdf_t_P, (-20.0, 1), 1.59022512561763751e-2, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (-20.0, 1), 1.59022512561763751e-2, TEST_TOL6);
182    TEST(gsl_cdf_t_P, (-100.0, 1), 3.18299276490825514e-3, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (-100.0, 1), 3.18299276490825514e-3, TEST_TOL6);
183    TEST(gsl_cdf_t_P, (-1000.0, 1), 3.18309780080558938e-4, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (-1000.0, 1), 3.18309780080558938e-4, TEST_TOL6);
184    TEST(gsl_cdf_t_P, (-10000.0, 1), 3.18309885122757724e-5, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (-10000.0, 1), 3.18309885122757724e-5, TEST_TOL6);
185    
186    TEST(gsl_cdf_t_P, (0.0, 2), 5.00000000000000000e-01, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (0.0, 2), 5.00000000000000000e-01, TEST_TOL6);
187    TEST(gsl_cdf_t_P, (1e-100, 2), 5.00000000000000000e-01, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (1e-100, 2), 5.00000000000000000e-01, TEST_TOL6);
188    TEST(gsl_cdf_t_P, (0.001, 2), 5.00353553302204959e-01, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (0.001, 2), 5.00353553302204959e-01, TEST_TOL6);
189    TEST(gsl_cdf_t_P, (0.01, 2), 5.03535445520899514e-01, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (0.01, 2), 5.03535445520899514e-01, TEST_TOL6);
190    TEST(gsl_cdf_t_P, (0.1, 2), 5.35267280792929913e-01, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (0.1, 2), 5.35267280792929913e-01, TEST_TOL6);
191    TEST(gsl_cdf_t_P, (0.325, 2), 6.11985772746873767e-01, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (0.325, 2), 6.11985772746873767e-01, TEST_TOL6);
192    TEST(gsl_cdf_t_P, (1.0, 2), 7.88675134594812882e-01, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (1.0, 2), 7.88675134594812882e-01, TEST_TOL6);
193    TEST(gsl_cdf_t_P, (1.5, 2), 8.63803437554499460e-01, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (1.5, 2), 8.63803437554499460e-01, TEST_TOL6);
194    TEST(gsl_cdf_t_P, (2.0, 2), 9.08248290463863016e-01, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (2.0, 2), 9.08248290463863016e-01, TEST_TOL6);
195    TEST(gsl_cdf_t_P, (10.0, 2), 9.95073771488337154e-01, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (10.0, 2), 9.95073771488337154e-01, TEST_TOL6);
196    TEST(gsl_cdf_t_P, (20.0, 2), 9.98754668053816452e-01 , TEST_TOL6);    TEST(gsl_cdf_tdist_P, (20.0, 2), 9.98754668053816452e-01 , TEST_TOL6);
197    TEST(gsl_cdf_t_P, (100.0, 2), 9.99950007498750219e-01, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (100.0, 2), 9.99950007498750219e-01, TEST_TOL6);
198    TEST(gsl_cdf_t_P, (1000.0, 2), 9.99999500000749945e-01, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (1000.0, 2), 9.99999500000749945e-01, TEST_TOL6);
199    TEST(gsl_cdf_t_P, (10000.0, 2), 9.999999950000000739e-01, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (10000.0, 2), 9.999999950000000739e-01, TEST_TOL6);
200    
201    TEST(gsl_cdf_t_P, (-1e-100, 2), 5.00000000000000000e-01, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (-1e-100, 2), 5.00000000000000000e-01, TEST_TOL6);
202    TEST(gsl_cdf_t_P, (-0.001, 2), 4.99646446697795041e-01, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (-0.001, 2), 4.99646446697795041e-01, TEST_TOL6);
203    TEST(gsl_cdf_t_P, (-0.01, 2), 4.96464554479100486e-01, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (-0.01, 2), 4.96464554479100486e-01, TEST_TOL6);
204    TEST(gsl_cdf_t_P, (-0.1, 2), 4.64732719207070087e-01, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (-0.1, 2), 4.64732719207070087e-01, TEST_TOL6);
205    TEST(gsl_cdf_t_P, (-0.325, 2), 3.88014227253126233e-01, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (-0.325, 2), 3.88014227253126233e-01, TEST_TOL6);
206    TEST(gsl_cdf_t_P, (-1.0, 2), 2.11324865405187118e-01, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (-1.0, 2), 2.11324865405187118e-01, TEST_TOL6);
207    TEST(gsl_cdf_t_P, (-1.5, 2), 1.36196562445500540e-01, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (-1.5, 2), 1.36196562445500540e-01, TEST_TOL6);
208    TEST(gsl_cdf_t_P, (-2.0, 2), 9.17517095361369836e-02, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (-2.0, 2), 9.17517095361369836e-02, TEST_TOL6);
209    TEST(gsl_cdf_t_P, (-10.0, 2), 4.92622851166284542e-03, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (-10.0, 2), 4.92622851166284542e-03, TEST_TOL6);
210    TEST(gsl_cdf_t_P, (-20.0, 2), 1.24533194618354849e-03, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (-20.0, 2), 1.24533194618354849e-03, TEST_TOL6);
211    TEST(gsl_cdf_t_P, (-100.0, 2), 4.99925012497812894e-05, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (-100.0, 2), 4.99925012497812894e-05, TEST_TOL6);
212    TEST(gsl_cdf_t_P, (-1000.0, 2), 4.99999250001249998e-07, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (-1000.0, 2), 4.99999250001249998e-07, TEST_TOL6);
213    TEST(gsl_cdf_t_P, (-10000.0, 2), 4.99999992500000125e-09, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (-10000.0, 2), 4.99999992500000125e-09, TEST_TOL6);
214    
215    TEST(gsl_cdf_t_P, (0.0, 300), 5.00000000000000000e-01, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (0.0, 300), 5.00000000000000000e-01, TEST_TOL6);
216    TEST(gsl_cdf_t_P, (1e-100, 300), 5.00000000000000000e-01, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (1e-100, 300), 5.00000000000000000e-01, TEST_TOL6);
217    TEST(gsl_cdf_t_P, (0.001, 300), 5.00398609900942949e-01, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (0.001, 300), 5.00398609900942949e-01, TEST_TOL6);
218    TEST(gsl_cdf_t_P, (0.01, 300), 5.03986033020559088e-01, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (0.01, 300), 5.03986033020559088e-01, TEST_TOL6);
219    TEST(gsl_cdf_t_P, (0.1, 300), 5.39794441177768194e-01, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (0.1, 300), 5.39794441177768194e-01, TEST_TOL6);
220    TEST(gsl_cdf_t_P, (0.325, 300), 6.27296201542523812e-01, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (0.325, 300), 6.27296201542523812e-01, TEST_TOL6);
221    TEST(gsl_cdf_t_P, (1.0, 300), 8.40941797784686861e-01, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (1.0, 300), 8.40941797784686861e-01, TEST_TOL6);
222    TEST(gsl_cdf_t_P, (1.5, 300), 9.32666983425369137e-01, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (1.5, 300), 9.32666983425369137e-01, TEST_TOL6);
223    TEST(gsl_cdf_t_P, (2.0, 300), 9.76799239508425455e-01, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (2.0, 300), 9.76799239508425455e-01, TEST_TOL6);
224    TEST(gsl_cdf_t_P, (10.0, 300), 1.00000000000000000e+00, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (10.0, 300), 1.00000000000000000e+00, TEST_TOL6);
225    TEST(gsl_cdf_t_P, (20.0, 300),  1.00000000000000000e+00, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (20.0, 300),  1.00000000000000000e+00, TEST_TOL6);
226    TEST(gsl_cdf_t_P, (100.0, 300), 1.00000000000000000e+00, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (100.0, 300), 1.00000000000000000e+00, TEST_TOL6);
227    TEST(gsl_cdf_t_P, (1000.0, 300), 1.00000000000000000e+00, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (1000.0, 300), 1.00000000000000000e+00, TEST_TOL6);
228    TEST(gsl_cdf_t_P, (10000.0, 300), 1.00000000000000000e+00, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (10000.0, 300), 1.00000000000000000e+00, TEST_TOL6);
229    
230    TEST(gsl_cdf_t_P, (-1e-100, 300), 5.00000000000000000e-01, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (-1e-100, 300), 5.00000000000000000e-01, TEST_TOL6);
231    TEST(gsl_cdf_t_P, (-0.001, 300), 4.99601390099057051e-01, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (-0.001, 300), 4.99601390099057051e-01, TEST_TOL6);
232    TEST(gsl_cdf_t_P, (-0.01, 300), 4.96013966979440912e-01, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (-0.01, 300), 4.96013966979440912e-01, TEST_TOL6);
233    TEST(gsl_cdf_t_P, (-0.1, 300), 4.60205558822231806e-01, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (-0.1, 300), 4.60205558822231806e-01, TEST_TOL6);
234    TEST(gsl_cdf_t_P, (-0.325, 300), 3.72703798457476188e-01, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (-0.325, 300), 3.72703798457476188e-01, TEST_TOL6);
235    TEST(gsl_cdf_t_P, (-1.0, 300), 1.59058202215313138e-01, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (-1.0, 300), 1.59058202215313138e-01, TEST_TOL6);
236    TEST(gsl_cdf_t_P, (-1.5, 300), 6.73330165746308628e-02, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (-1.5, 300), 6.73330165746308628e-02, TEST_TOL6);
237    TEST(gsl_cdf_t_P, (-2.0, 300), 2.32007604915745452e-02, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (-2.0, 300), 2.32007604915745452e-02, TEST_TOL6);
238    TEST(gsl_cdf_t_P, (-10.0, 300), 8.279313675556272534e-21, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (-10.0, 300), 8.279313675556272534e-21, TEST_TOL6);
239    TEST(gsl_cdf_t_P, (-20.0, 300), 1.93159812815803978e-57, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (-20.0, 300), 1.93159812815803978e-57, TEST_TOL6);
240    TEST(gsl_cdf_t_P, (-100.0, 300), 1.02557519997736154e-232, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (-100.0, 300), 1.02557519997736154e-232, TEST_TOL6);
241    TEST(gsl_cdf_t_P, (-1000.0, 300), 0.0, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (-1000.0, 300), 0.0, TEST_TOL6);
242    TEST(gsl_cdf_t_P, (-10000.0, 300), 0.0, TEST_TOL6);    TEST(gsl_cdf_tdist_P, (-10000.0, 300), 0.0, TEST_TOL6);
243    
244    /* Tests for F distribution */    /* Tests for F distribution */
245    
246    TEST(gsl_cdf_F_ratio_P, (0.0, 1.2, 1.3), 0.0, TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (0.0, 1.2, 1.3), 0.0, TEST_TOL6);
247    TEST(gsl_cdf_F_ratio_P, (1e-100, 1.2, 1.3), 6.98194275525039002e-61, TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (1e-100, 1.2, 1.3), 6.98194275525039002e-61, TEST_TOL6);
248    TEST(gsl_cdf_F_ratio_P, (0.001, 1.2, 1.3), 1.10608485860238564e-2, TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (0.001, 1.2, 1.3), 1.10608485860238564e-2, TEST_TOL6);
249    TEST(gsl_cdf_F_ratio_P, (0.01, 1.2, 1.3), 4.38636757068313850e-2, TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (0.01, 1.2, 1.3), 4.38636757068313850e-2, TEST_TOL6);
250    TEST(gsl_cdf_F_ratio_P, (0.1, 1.2, 1.3), 1.68242392712840734e-1, TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (0.1, 1.2, 1.3), 1.68242392712840734e-1, TEST_TOL6);
251    TEST(gsl_cdf_F_ratio_P, (0.325, 1.2, 1.3), 3.14130045246195449e-1, TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (0.325, 1.2, 1.3), 3.14130045246195449e-1, TEST_TOL6);
252    TEST(gsl_cdf_F_ratio_P, (1.0, 1.2, 1.3), 5.09630779074755253e-01, TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (1.0, 1.2, 1.3), 5.09630779074755253e-01, TEST_TOL6);
253    TEST(gsl_cdf_F_ratio_P, (1.5, 1.2, 1.3), 5.83998640641553852e-1, TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (1.5, 1.2, 1.3), 5.83998640641553852e-1, TEST_TOL6);
254    TEST(gsl_cdf_F_ratio_P, (2.0, 1.2, 1.3), 6.34733581351938787e-1, TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (2.0, 1.2, 1.3), 6.34733581351938787e-1, TEST_TOL6);
255    TEST(gsl_cdf_F_ratio_P, (10.0, 1.2, 1.3), 8.48446237879200975e-1, TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (10.0, 1.2, 1.3), 8.48446237879200975e-1, TEST_TOL6);
256    TEST(gsl_cdf_F_ratio_P, (20.0, 1.2, 1.3), 9.00987726336875039e-1 , TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (20.0, 1.2, 1.3), 9.00987726336875039e-1 , TEST_TOL6);
257    TEST(gsl_cdf_F_ratio_P, (100.0, 1.2, 1.3), 9.64489127047688435e-1, TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (100.0, 1.2, 1.3), 9.64489127047688435e-1, TEST_TOL6);
258    TEST(gsl_cdf_F_ratio_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);
259    TEST(gsl_cdf_F_ratio_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);
260    
261    TEST(gsl_cdf_F_ratio_P, (0.0, 500, 1.3), 0.0, TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (0.0, 500, 1.3), 0.0, TEST_TOL6);
262    TEST(gsl_cdf_F_ratio_P, (1e-100, 500, 1.3), 0.0, TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (1e-100, 500, 1.3), 0.0, TEST_TOL6);
263    
264    TEST(gsl_cdf_F_ratio_P, (0.001, 500, 1.3), 9.83434460393304765e-141, TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (0.001, 500, 1.3), 9.83434460393304765e-141, TEST_TOL6);
265    TEST(gsl_cdf_F_ratio_P, (0.01, 500, 1.3), 1.45915624888550014e-26, TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (0.01, 500, 1.3), 1.45915624888550014e-26, TEST_TOL6);
266    TEST(gsl_cdf_F_ratio_P, (0.1, 500, 1.3), 5.89976509619688165e-4, TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (0.1, 500, 1.3), 5.89976509619688165e-4, TEST_TOL6);
267    TEST(gsl_cdf_F_ratio_P, (0.325, 500, 1.3), 6.86110486051542533e-2, TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (0.325, 500, 1.3), 6.86110486051542533e-2, TEST_TOL6);
268    TEST(gsl_cdf_F_ratio_P, (1.0, 500, 1.3), 3.38475053806404615e-1, TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (1.0, 500, 1.3), 3.38475053806404615e-1, TEST_TOL6);
269    TEST(gsl_cdf_F_ratio_P, (1.5, 500, 1.3), 4.52016245247457422e-1, TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (1.5, 500, 1.3), 4.52016245247457422e-1, TEST_TOL6);
270    TEST(gsl_cdf_F_ratio_P, (2.0, 500, 1.3), 5.27339068937388798e-1, TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (2.0, 500, 1.3), 5.27339068937388798e-1, TEST_TOL6);
271    TEST(gsl_cdf_F_ratio_P, (10.0, 500, 1.3), 8.16839628578413905e-1, TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (10.0, 500, 1.3), 8.16839628578413905e-1, TEST_TOL6);
272    TEST(gsl_cdf_F_ratio_P, (20.0, 500, 1.3), 8.81784623056911406e-1, TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (20.0, 500, 1.3), 8.81784623056911406e-1, TEST_TOL6);
273    TEST(gsl_cdf_F_ratio_P, (100.0, 500, 1.3), 9.58045057204221295e-1, TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (100.0, 500, 1.3), 9.58045057204221295e-1, TEST_TOL6);
274    TEST(gsl_cdf_F_ratio_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);
275    TEST(gsl_cdf_F_ratio_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);
276    
277    TEST(gsl_cdf_F_ratio_P, (0.0, 1.2, 500), 0.0, TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (0.0, 1.2, 500), 0.0, TEST_TOL6);
278    TEST(gsl_cdf_F_ratio_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);
279    TEST(gsl_cdf_F_ratio_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);
280    TEST(gsl_cdf_F_ratio_P, (0.01, 1.2, 500), 5.18324224608033294e-2, TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (0.01, 1.2, 500), 5.18324224608033294e-2, TEST_TOL6);
281    TEST(gsl_cdf_F_ratio_P, (0.1, 1.2, 500), 2.02235101716076289e-1, TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (0.1, 1.2, 500), 2.02235101716076289e-1, TEST_TOL6);
282    TEST(gsl_cdf_F_ratio_P, (0.325, 1.2, 500), 3.90502983219393749e-1, TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (0.325, 1.2, 500), 3.90502983219393749e-1, TEST_TOL6);
283    TEST(gsl_cdf_F_ratio_P, (1.0, 1.2, 500), 6.67656191574653619e-1, TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (1.0, 1.2, 500), 6.67656191574653619e-1, TEST_TOL6);
284    TEST(gsl_cdf_F_ratio_P, (1.5, 1.2, 500), 7.75539230271467054e-1, TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (1.5, 1.2, 500), 7.75539230271467054e-1, TEST_TOL6);
285    TEST(gsl_cdf_F_ratio_P, (2.0, 1.2, 500), 8.45209114904613705e-1, TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (2.0, 1.2, 500), 8.45209114904613705e-1, TEST_TOL6);
286    TEST(gsl_cdf_F_ratio_P, (10.0, 1.2, 500), 9.99168017659120988e-1, TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (10.0, 1.2, 500), 9.99168017659120988e-1, TEST_TOL6);
287    TEST(gsl_cdf_F_ratio_P, (20.0, 1.2, 500), 9.99998005738371669e-1, TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (20.0, 1.2, 500), 9.99998005738371669e-1, TEST_TOL6);
288    TEST(gsl_cdf_F_ratio_P, (100.0, 1.2, 500), 1.0, TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (100.0, 1.2, 500), 1.0, TEST_TOL6);
289    TEST(gsl_cdf_F_ratio_P, (1000.0, 1.2, 500), 1.0, TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (1000.0, 1.2, 500), 1.0, TEST_TOL6);
290    TEST(gsl_cdf_F_ratio_P, (10000.0, 1.2, 500), 1.0, TEST_TOL6);    TEST(gsl_cdf_Fdist_P, (10000.0, 1.2, 500), 1.0, TEST_TOL6);
291    
292    /* [(p(x, nu1, nu2) := betaI(1 / (1 + nu2 / nu1 * x), nu1 / 2, nu2 / 2))] */
293      TEST(gsl_cdf_Fdist_P, (0.0, 200, 500), 0.0, TEST_TOL6);
294      TEST(gsl_cdf_Fdist_P, (1e-100, 200, 500), 0.0, TEST_TOL6);
295      TEST(gsl_cdf_Fdist_P, (0.001, 200, 500), 4.09325080403669893e-251, TEST_TOL6);
296      TEST(gsl_cdf_Fdist_P, (0.01, 200, 500), 1.17894325419628688e-151, TEST_TOL6);
297      TEST(gsl_cdf_Fdist_P, (0.1, 200, 500), 5.92430940796861258e-57, TEST_TOL6);
298      TEST(gsl_cdf_Fdist_P, (0.325, 200, 500), 3.18220452357263554e-18, TEST_TOL6);
299      TEST(gsl_cdf_Fdist_P, (1.0, 200, 500), 5.06746326121168266e-1, TEST_TOL6);
300      TEST(gsl_cdf_Fdist_P, (1.5, 200, 500), 9.99794175718712438e-1, TEST_TOL6);
301      TEST(gsl_cdf_Fdist_P, (2.0, 200, 500), 9.99999999528236152e-1, TEST_TOL6);
302      TEST(gsl_cdf_Fdist_P, (10.0, 200, 500), 1.0, TEST_TOL6);
303      TEST(gsl_cdf_Fdist_P, (20.0, 200, 500), 1.0, TEST_TOL6);
304      TEST(gsl_cdf_Fdist_P, (100.0, 200, 500), 1.0, TEST_TOL6);
305      TEST(gsl_cdf_Fdist_P, (1000.0, 200, 500), 1.0, TEST_TOL6);
306      TEST(gsl_cdf_Fdist_P, (10000.0, 200, 500), 1.0, TEST_TOL6);
307    
308      /* Tests for gamma distribution */
309    
310      TEST(gsl_cdf_gamma_P, (0.0, 1, 1), 0.0, TEST_TOL6);
311      TEST(gsl_cdf_gamma_P, (1e-100, 1, 1), 1e-100, TEST_TOL6);
312      TEST(gsl_cdf_gamma_P, (0.001, 1, 1), 9.99500166625008332e-4 , TEST_TOL6);
313      TEST(gsl_cdf_gamma_P, (0.01, 1, 1), 9.95016625083194643e-3, TEST_TOL6);
314      TEST(gsl_cdf_gamma_P, (0.1, 1, 1), 9.51625819640404268e-2, TEST_TOL6);
315      TEST(gsl_cdf_gamma_P, (0.325, 1, 1), 2.77472646357927811e-1, TEST_TOL6);
316      TEST(gsl_cdf_gamma_P, (1.0, 1, 1), 6.32120558828557678e-1, TEST_TOL6);
317      TEST(gsl_cdf_gamma_P, (1.5, 1, 1), 7.76869839851570171e-1, TEST_TOL6);
318      TEST(gsl_cdf_gamma_P, (2.0, 1, 1), 8.64664716763387308e-1, TEST_TOL6);
319      TEST(gsl_cdf_gamma_P, (10.0, 1, 1), 9.99954600070237515e-1, TEST_TOL6);
320      TEST(gsl_cdf_gamma_P, (20.0, 1, 1), 9.99999997938846378e-1, TEST_TOL6);
321      TEST(gsl_cdf_gamma_P, (100.0, 1, 1), 1e0, TEST_TOL6);
322      TEST(gsl_cdf_gamma_P, (1000.0, 1, 1), 1e0, TEST_TOL6);
323      TEST(gsl_cdf_gamma_P, (10000.0, 1, 1), 1e0, TEST_TOL6);
324    
325    exit (gsl_test_summary());    exit (gsl_test_summary());
326  }  }

Legend:
Removed from v.1.1.2.11  
changed lines
  Added in v.1.1.2.12

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