src/Scilab2C/SCI2CTests/Mes_tests/signalProcessing/mainfunctionFft.sci


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

//SCI2C: DEFAULT_PRECISION= DOUBLE

function mainfunction()


// test fftshift

//1 input argument
disp(fft(4))

disp(fft([3 4 2 1; 1 4 5 2]));

disp(fft(4-%i))


disp(fft([3+%i*2 4 2-%i 1; 1-%i*2 4 5 2]));

//2 input arguments

disp(fft(4,1))

disp(fft([3 4 2 1; 1 4 5 2],1));

disp(fft(4-%i,1))


disp(fft([3+%i*2 4 2-%i 1; 1-%i*2 4 5 2],1));

disp(fft(4,-1))

disp(fft([3 4 2 1; 1 4 5 2],-1));

disp(fft(4-%i,-1))


disp(fft([3+%i*2 4 2-%i 1; 1-%i*2 4 5 2],-1));

endfunction