[ast] fix wrong alignment of complex display
[scilab.git] / scilab / modules / ast / tests / nonreg_tests / bug_15781.tst
1 // Copyright (C) 2019 - St├ęphane MOTTELET
2 //
3 //  This file is distributed under the same license as the Scilab package.
4 // =============================================================================
5 //
6 // <-- CLI SHELL MODE -->
7 //
8 // <-- Non-regression test for bug 15781 -->
9 //
10 // <-- Bugzilla URL -->
11 // http://bugzilla.scilab.org/15781
12 //
13 // <-- Short Description -->
14 // display of complex matrix is ugly.
15
16 n=4
17
18 a=testmatrix("magic",4);
19
20 for f = ["v","e"]
21     format(f)
22     x=complex(cos(a),sin(a));
23     x(3,3)=%nan;
24     x(4,4)=%inf;
25     x(2,1:2)=1+%i;
26     x(:,1)=0;
27     disp(x)
28
29     for i=1:n
30         disp(x(i,:))
31         disp(" ")
32     end
33
34     for i=1:n
35         disp(x(:,i))
36         disp(" ")
37     end
38
39     x=x-x;
40
41     disp(x)
42     disp(" ")
43
44     acoth(-2:0.5:2).'
45 end
46
47 format("v")
48
49 a= [0,0,%i*0.6795197,0.7161007+%i*0.3997826,0
50 0,%i*0.977002,0,0,0
51 0,0.2629713,0,0,0.4505416
52 0,%i*0.8173032,0.529842,0,%i*0.8558751
53 0,0,0,0.7481516,%i*0.2598704
54 0,0.3402197+%i*0.3631865,0,0,0
55 0,%i*0.8686947,%i*0.0844358,0.9883794,0
56 0,0,0,0,0
57 0,0.6540791,0.6892145+%i*0.3462334,0,0
58 0,0,0,0,0.7204935]