summaryrefslogtreecommitdiff
path: root/tests/unit_tests/test024_test_if_pi/scilabcode/mainfunction.sci
blob: 6b1652fdc42723ff3bfdc90ffdb26e35d3f2a4ac (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
//SCI2C: DEFAULT_PRECISION= DOUBLE

function mainfunction()

a=%pi*70;
b=1;
c=0;
M = (1:3)'*(1:5)
if a<=1
   c=b;
   disp(c)
else
   if b==10
      c=5;
      disp(c)
   else
      c=2;
      disp(c)
      S = c.^M;
      disp(S);
      disp(a)
   end
end 
endfunction