1ca8320023a697bf8861cdd8cf6af4d62ada50e5
[scilab.git] / scilab / modules / ast / tests / nonreg_tests / bug_14303.tst
1 // =============================================================================
2 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3 // Copyright (C) 2016 - Scilab Enterprises - Pierre-Aime AGNEL
4 //
5 //  This file is distributed under the same license as the Scilab package.
6 // =============================================================================
7
8 // <-- CLI SHELL MODE -->
9 //
10 // <-- Non-regression test for bug 14303 -->
11 //
12 // <-- Bugzilla URL -->
13 // http://bugzilla.scilab.org/14303
14 //
15 // <-- Short Description -->
16 // Display of matrices with scientific notation and lots of digits
17 // were wrong
18
19 A = [1,0,0,0,0,0,0,0;
20 0,1,0,0,0,0,0,0;
21 -1,0,2,0,0,0,0,0;
22 0,-3,0,4,0,0,0,0;
23 1,0,-8,0,8,0,0,0;
24 0,5,0,-20,0,16,0,0;
25 -1,0,18,0,-48,0,32,0;
26 0,-7,0,56,0,-112,0,64]
27 //display is ok
28
29 disp(expm(A));
30 // now display is ok
31
32 format(25);
33 disp(expm(A));
34
35 A =  (rand(8,8) - 0.5) .* 10 .^ (100*rand(8,8));
36 disp(A);
37 format(10);
38 disp(A);
39