restore tests from operations module
[scilab.git] / scilab / modules / ast / tests / unit_tests / lt_le_gt_ge.tst
1 // ============================================================================
2 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3 // Copyright (C) 2012 - DIGITEO - Antoine ELIAS
4 //
5 //  This file is distributed under the same license as the Scilab package.
6 // ============================================================================
7
8 // <-- JVM NOT MANDATORY -->
9
10 r = 2;
11 R = [1,2;3,4];
12 R3(:,:,1) = R;
13 R3(:,:,2) = R';
14
15 // double < double
16 assert_checkfalse(r < r);
17 assert_checkfalse(r > r);
18 assert_checktrue(r >= r);
19 assert_checktrue(r <= r);
20
21 // DOUBLE < DOUBLE
22 assert_checkfalse(R < R);
23 assert_checkfalse(R > R);
24 assert_checktrue(R >= R);
25 assert_checktrue(R <= R);
26 assert_checkfalse(R3 < R3);
27 assert_checkfalse(R3 > R3);
28 assert_checktrue(R3 <= R3);
29 assert_checktrue(R3 >= R3);