1 // ============================================================================
2 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3 // Copyright (C) 2014 - Scilab Enterprises - Antoine ELIAS
5 // This file is distributed under the same license as the Scilab package.
6 // ============================================================================
7 // <-- JVM NOT MANDATORY -->
11 types = list(int8, uint8, int16, uint16, int32, uint32, int64, uint64, double, bool);
12 ref =[ "int8","uint8","int16","uint16","int32","uint32","int64","uint64","int8","int8"; ...
13 "uint8","uint8","uint16","uint16","uint32","uint32","uint64","uint64","uint8","uint8"; ...
14 "int16","uint16","int16","uint16","int32","uint32","int64","uint64","int16","int16"; ...
15 "uint16","uint16","uint16","uint16","uint32","uint32","uint64","uint64","uint16","uint16"; ...
16 "int32","uint32","int32","uint32","int32","uint32","int64","uint64","int32","int32"; ...
17 "uint32","uint32","uint32","uint32","uint32","uint32","uint64","uint64","uint32","uint32"; ...
18 "int64","uint64","int64","uint64","int64","uint64","int64","uint64","int64","int64"; ...
19 "uint64","uint64","uint64","uint64","uint64","uint64","uint64","uint64","uint64","uint64"; ...
20 "int8","uint8","int16","uint16","int32","uint32","int64","uint64","constant","constant"; ...
21 "int8","uint8","int16","uint16","int32","uint32","int64","uint64","constant","boolean"]
24 !int8 uint8 int16 uint16 int32 uint32 int64 uint64 int8 !
26 !uint8 uint8 uint16 uint16 uint32 uint32 uint64 uint64 uint8 !
28 !int16 uint16 int16 uint16 int32 uint32 int64 uint64 int16 !
30 !uint16 uint16 uint16 uint16 uint32 uint32 uint64 uint64 uint16 !
32 !int32 uint32 int32 uint32 int32 uint32 int64 uint64 int32 !
34 !uint32 uint32 uint32 uint32 uint32 uint32 uint64 uint64 uint32 !
36 !int64 uint64 int64 uint64 int64 uint64 int64 uint64 int64 !
38 !uint64 uint64 uint64 uint64 uint64 uint64 uint64 uint64 uint64 !
40 !int8 uint8 int16 uint16 int32 uint32 int64 uint64 constant !
42 !int8 uint8 int16 uint16 int32 uint32 int64 uint64 constant !
63 typesize = size(types);
67 ScalarScalarComputed(i,j) = typeof(types(i)(1) + types(j)(1));
70 assert_checkequal(ref, ScalarScalarComputed);
74 ScalarMatrixComputed(i,j) = typeof(types(i)(1) + types(j)([1 2]));
77 assert_checkequal(ref, ScalarMatrixComputed);
81 MatrixScalarComputed(i,j) = typeof(types(i)([1 2]) + types(j)(1));
84 assert_checkequal(ref, MatrixScalarComputed);
88 MatrixMatrixComputed(i,j) = typeof(types(i)([1 2]) + types(j)([1 2]));
91 assert_checkequal(ref, MatrixMatrixComputed);