summaryrefslogtreecommitdiff
path: root/tests/unit_tests/test024_test_if_pi/scilabcode/mainfunction.sci
blob: 25528d161244a32cb5d4e30a1216be1051b6a050 (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