summaryrefslogtreecommitdiffstats
path: root/tests/nonRegression/bug1224.sci
blob: 0aa460ba826d3d88f85a8f534416d6037b37d2cc (plain)
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
// <-- Non-regression test for bug 1224 -->
//
// <-- Bugzilla URL -->
// http://www.scilab.org/cgi-bin/bugzilla_bug_II/show_bug.cgi?id=1224
//
// <-- Short Description -->
//    Product of 2x2 matrices produces wrong result.
//    inf=%inf;
//    A=diag([-inf,inf]);
//    A*A  //This is correct
//    A*A*A  //This is wrong

// Pierre MARECHAL - Scilab Project
// Copyright INRIA
// 1er juin 2005

inf=%inf;
A=diag([-inf,inf]);
B = A*A*A;

if isnan(B) then
	affich_result(%T,1224);
else
	affich_result(%F,1224);
end