scilab/modules/ast/tests/unit_tests/eq.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
  11 r = 2;
  12 R = [1,2;3,4];
  13 R3(:,:,1) = R;
  14 R3(:,:,2) = R';
  15 c = 1 + 2*%i;
  16 C = [1+2*%i,2+4*%i;3+6*%i,4+8*%i];
  17 C3(:,:,1) = C;
  18 C3(:,:,2) = C';
  19
  20 // double == double
  21 assert_checktrue(r == r);
  22 assert_checktrue(c == c);
  23
  24 // DOUBLE == DOUBLE
  25 assert_checktrue(R == R);
  26 assert_checktrue(C == C);
  27 assert_checktrue(R3 == R3);
  28 assert_checktrue(C3 == C3);