8dbab2818f34781fec4fb518433f7d3f5db347bb
[scilab.git] / scilab / modules / statistics / tests / unit_tests / InfTests.dia.ref
1 // =============================================================================
2 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3 // Copyright (C) 2013 -  Scilab Enterprises - Paul Bignier
4 //
5 //  This file is distributed under the same license as the Scilab package.
6 // =============================================================================
7 // <-- CLI SHELL MODE -->
8 // <-- ENGLISH IMPOSED -->
9 // Run with test_run('statistics', 'InfTests', ['no_check_error_output'])
10 inf = %inf;
11 tol = 1e-299;
12 // Testing that the requested return is %inf when one input argument is %inf
13 // cdfchi
14 [res, res2] = cdfchi("PQ", inf, 1);
15 assert_checkequal(res, 1);
16 assert_checkequal(res2, 0);
17 [res, res2] = cdfchi("PQ", 1, inf);
18 cdfchi: Warning: using non integer values for argument #3 may lead to incorrect results.
19 assert_checkalmostequal(res, 0, tol);
20 assert_checkalmostequal(res2, 1, tol);
21 // cdfchn
22 [res, res2] = cdfchn("PQ", inf, 1, 1);
23 assert_checkequal(res, 1);
24 assert_checkequal(res2, 0);
25 [res, res2] = cdfchn("PQ", 1, inf, 1e-10);
26 cdfchn: Warning: using non integer values for argument #3 may lead to incorrect results.
27 assert_checkalmostequal(res, 0, tol);
28 assert_checkalmostequal(res2, 1, tol);
29 // cdff
30 [res, res2] = cdff("PQ", inf, 1, 1e-50);
31 cdff: Warning: using non integer values for argument #4 may lead to incorrect results.
32 assert_checkequal(res, 1);
33 assert_checkequal(res2, 0);
34 [res, res2] = cdff("PQ", 1, inf, 1e-50);
35 cdff: Warning: using non integer values for argument #3 may lead to incorrect results.
36 cdff: Warning: using non integer values for argument #4 may lead to incorrect results.
37 assert_checkalmostequal(res, 1, tol);
38 assert_checkalmostequal(res2, 0, tol);
39 // cdffnc
40 [res, res2] = cdffnc("PQ", inf, 1, 10, 0);
41 assert_checkequal(res, 1);
42 assert_checkequal(res2, 0);
43 [res, res2] = cdffnc("PQ", 1e-10, inf, 10, 0);
44 cdffnc: Warning: using non integer values for argument #3 may lead to incorrect results.
45 assert_checkalmostequal(res, 0, tol);
46 assert_checkalmostequal(res2, 1, tol);
47 // cdfgam
48 [res, res2] = cdfgam("PQ", inf, 1, 1);
49 assert_checkequal(res, 1);
50 assert_checkequal(res2, 0);
51 [res, res2] = cdfgam("PQ", 1, inf, 1);
52 assert_checkalmostequal(res, 0, tol);
53 assert_checkalmostequal(res2, 1, tol);
54 [res, res2] = cdfgam("PQ", 1, 1, inf);
55 assert_checkalmostequal(res, 1, tol);
56 assert_checkalmostequal(res2, 0, tol);
57 // cdfnbn
58 [res, res2] = cdfnbn("PQ", inf, 1, 0, 1);
59 assert_checkequal(res, 1);
60 assert_checkequal(res2, 0);
61 [res, res2] = cdfnbn("PQ", 1, inf, 0, 1);
62 assert_checkalmostequal(res, 0, tol);
63 assert_checkalmostequal(res2, 1, tol);
64 // cdfnor
65 [res, res2] = cdfnor("PQ", inf, 1, 1);
66 assert_checkequal(res, 1);
67 assert_checkequal(res2, 0);
68 [res, res2] = cdfnor("PQ", -inf, 1, 1);
69 assert_checkequal(res, 0);
70 assert_checkequal(res2, 1);
71 [res, res2] = cdfnor("PQ", 1, inf, 1);
72 assert_checkequal(res, %nan);
73 assert_checkequal(res2, %nan);
74 [res, res2] = cdfnor("PQ", 1, -inf, 1);
75 assert_checkequal(res, %nan);
76 assert_checkequal(res2, %nan);
77 // cdfpoi
78 [res, res2] = cdfpoi("PQ", inf, 1);
79 assert_checkequal(res, 1);
80 assert_checkequal(res2, 0);
81 [res, res2] = cdfpoi("PQ", 1, inf);
82 assert_checkalmostequal(res, 0, tol);
83 assert_checkalmostequal(res2, 1, tol);
84 // cdft
85 [res, res2] = cdft("PQ", inf, 1);
86 assert_checkequal(res, 1);
87 assert_checkequal(res2, 0);
88 [res, res2] = cdft("PQ", -inf, 1);
89 assert_checkequal(res, 0);
90 assert_checkequal(res2, 1);