summaryrefslogtreecommitdiff
path: root/2.3-1/tests/unit_tests/test064_OpMinusFloatComplex/scilabcode/mainfunction.sci
blob: a1e0d8c6746e954e244887d3781fe153a6476fc2 (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
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
//SCI2C: DEFAULT_PRECISION= FLOAT

function mainfunction()

s1 = -5.4;
disp('s1');
disp(s1);

s2 = -2.2-4*%i;
disp('s2');
disp(s2);

A = ((1.2:0.99:4.9)')*(-2.3:1.1:3.9)
disp('A = ((1.2:0.99:4.9)'')*(-2.3:1.1:3.9)');
disp(A);

B = -2.11*A-%i*A;
disp('B');

disp('o1 = -s1 - s2;');
o1 = -s1 - s2;
disp(o1);

disp('o1 = -3.4 - 4.5;');
o1 = (-3.4-%i) - (4.5-%i);
disp(o1);

disp('o2 = -3.4 - B - A;');
o2 = -3.4 - B - A;
disp(o2);

disp('o3 = A - (-3.4);');
o3 = A - (-3.4);
disp(o3);

disp('o4 = A - A;');
o4 = A - B;
disp(o4);

disp('o5 = -A;');
o5 = -B;
disp(o5);
endfunction