scilab/modules/ast/tests/unit_tests/transposition.dia.ref

   1 // ============================================================================
   2 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
   3 // Copyright (C) 2014 - Scilab Enterprises - Calixte DENIZET
   4 //
   5 //  This file is distributed under the same license as the Scilab package.
   6 // ============================================================================
   7 // <-- JVM NOT MANDATORY -->
   8 S = 123;
   9 C = [1 2;3 4];
  10 R = [1 2 3;4 5 6];
  11 SC = 1+2*%i
  12 SC  =
  13     1. + 2.i
  14 CC = C + %i * [5 6;7 8];
  15 RC = R + %i * [7 8 9;10 11 12];
  16 SB = %F;
  17 CB = [%T %T;%F %T];
  18 RB = [%T %T %F;%T %F %T];
  19 X = poly(0, "x");
  20 CP = C + C * X + C * X ^ 2;
  21 RP = R + R * X + R * X ^ 2;
  22 CCP = CC + CC * X + CC * X ^ 2;
  23 RCP = RC + RC * X + RC * X ^ 2;
  24 assert_checkequal([], []')
  25  ans  =
  26   T
  27 assert_checkequal([], [].')
  28  ans  =
  29   T
  30 assert_checkequal(eye(), eye()')
  31  ans  =
  32   T
  33 assert_checkequal(eye(), eye().')
  34  ans  =
  35   T
  36 assert_checkequal(S, S')
  37  ans  =
  38   T
  39 assert_checkequal(S, S.')
  40  ans  =
  41   T
  42 assert_checkequal(SB, SB')
  43  ans  =
  44   T
  45 assert_checkequal(SB, SB.')
  46  ans  =
  47   T
  48 assert_checkequal(SC', 1 - 2 * %i)
  49  ans  =
  50   T
  51 assert_checkequal(SC, SC.')
  52  ans  =
  53   T
  54 assert_checkequal(C', [1 3;2 4])
  55  ans  =
  56   T
  57 assert_checkequal(C.', [1 3;2 4])
  58  ans  =
  59   T
  60 assert_checkequal(CC', [1 3;2 4] - %i * [5 7;6 8])
  61  ans  =
  62   T
  63 assert_checkequal(CC.', [1 3;2 4] + %i * [5 7;6 8])
  64  ans  =
  65   T
  66 assert_checkequal(R', [1 4;2 5;3 6])
  67  ans  =
  68   T
  69 assert_checkequal(R.', [1 4;2 5;3 6])
  70  ans  =
  71   T
  72 assert_checkequal(RC', [1 4;2 5;3 6] - %i * [7 10;8 11;9 12])
  73  ans  =
  74   T
  75 assert_checkequal(RC.', [1 4;2 5;3 6] + %i * [7 10;8 11;9 12])
  76  ans  =
  77   T
  78 assert_checkequal(string(C)', string([1 3;2 4]))
  79  ans  =
  80   T
  81 assert_checkequal(string(C).', string([1 3;2 4]))
  82  ans  =
  83   T
  84 assert_checkequal(string(R)', string([1 4;2 5;3 6]))
  85  ans  =
  86   T
  87 assert_checkequal(string(R).', string([1 4;2 5;3 6]))
  88  ans  =
  89   T
  90 assert_checkequal(sparse(C)', sparse([1 3;2 4]))
  91 assert_checkequal : Échec de l'assertion : attendu = [1 ...], cependant calculé = [1 ...]
  92 at line    29 of function assert_generror called by :
  93 assert_generror(errmsg)at line   116 of function assert_checkequal called by :
  94 assert_checkequal((sparse(C))', sparse([1, 3;
  95     2, 4
  96     ]))
  97 at line    63 of exec file called by :