restore tests from operations module
[scilab.git] / 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 :