1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
|
// =============================================================================
// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
// Copyright (C) ????-2008 - INRIA
//
// This file is distributed under the same license as the Scilab package.
// =============================================================================
// <-- Non-regression test for bug 480 -->
//
// <-- Bugzilla URL -->
// http://bugzilla.scilab.org/show_bug.cgi?id=480
//
// <-- Short Description -->
// Bug Report Id: 12070200362710754
// [u]intN() and iconvert() do not handle hypermatrices. It would be nice if they would.
// There is a workaround -
// hypermat(a.dims,int8(a.entries)) - but it is somehow a detour.
//
// On Scilab CVS with " intN(), iconvert() " function
// The Error Messages are:
// -->a=hypermat([3,3,1],1:9);
//
// -->int8(a)
// !--error 53
// invalid input (waiting for real or complex matrix)
//
// Commands:
//
// Enrico Segre on Linux version distribution RH9 with as window manager
// Israel July 27, 2003 at 10:7:54
a=hypermat([3,3,1],1:9);
result = execstr("int8(a)","errcatch","n");
if result <> 0 then bugmes();quit;end
if result == 0 then
toto = (hypermat(a.dims,int8(a.entries)) == int8(a))
toto =
(:,:,1)
T T T
T T T
T T T
if ~(and(toto(:,:,1))) then bugmes();quit;end
end
|
