* Bug #6693 fixed - modulo did not accept polynomial inputs. Help page was not updated.
[scilab.git] / scilab / modules / elementary_functions / tests / unit_tests / modulo.dia.ref
1 // =============================================================================
2 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3 // Copyright (C) 2013 - Scilab Enterprises - Bruno JOFRET
4 //
5 //  This file is distributed under the same license as the Scilab package.
6 // =============================================================================
7 // <-- CLI SHELL MODE -->
8 // unit tests for modulo() function
9 // =============================================================================
10 assert_checkerror("modulo()", msprintf(_("%s: Wrong number of input argument(s): %d expected.\n"),"modulo", 2));
11 assert_checkerror("modulo(''a'',1)", msprintf(_("%s: Wrong type for input argument #%d: A real expected.\n"), "modulo", 1));
12 assert_checkerror("modulo(1,''a'')", msprintf(_("%s: Wrong type for input argument #%d: A real expected.\n"), "modulo", 2));
13 assert_checkerror("modulo(%pi+%i,1)", msprintf(_("%s: Wrong type for input argument #%d: A real expected.\n"), "modulo", 1));
14 assert_checkerror("modulo(1,1+%i)", msprintf(_("%s: Wrong type for input argument #%d: A real expected.\n"), "modulo", 2));
15 n=[1,2,10,15];
16 m=[2,2,3,5];
17 r = modulo(n,m);
18 assert_checkequal(r, [1,0,1,0]);
19 n = 100 * rand(1,100);
20 m = 100 * rand(1,100);
21 r = modulo(n,m);
22 computed_r = n - m .* int (n ./ m);
23 assert_checkequal(r, computed_r);
24 assert_checkequal(modulo(%z^2,%z),0);