diff options
Diffstat (limited to '2.3-1/tests/unit_tests/double/test_FFTShift.sci')
| -rw-r--r-- | 2.3-1/tests/unit_tests/double/test_FFTShift.sci | 37 |
1 files changed, 37 insertions, 0 deletions
diff --git a/2.3-1/tests/unit_tests/double/test_FFTShift.sci b/2.3-1/tests/unit_tests/double/test_FFTShift.sci new file mode 100644 index 00000000..bc325ac6 --- /dev/null +++ b/2.3-1/tests/unit_tests/double/test_FFTShift.sci @@ -0,0 +1,37 @@ +function test_FFTShift() + + disp(fftshift(5.3));// d0*d0 + disp(fftshift(5.3*%i));// z0*z0 + disp(fftshift(5.3 + 5.6*%i ));// z0*z0 + + + a = fft ([10 1 15 3.5 ]); + disp(fftshift(a)); + + b = [ 14 15 2 6 ; 1 2 6 4 ; 48.5 3 9.3 1 ]; + disp(fftshift(b)); + disp(fftshift(b , 1)); + disp(fftshift(b , 2)); + //disp(fftshift(b , "all")); + + + c = [10 1 15 3.5 ]*%i; + disp(fftshift(c)); + + d = [ 14 15 2 6 ; 1 2 6 4 ; 48.5 3 9.3 1 ]*%i; + disp(fftshift(b)); + disp(fftshift(b , 1)); + disp(fftshift(b , 2)); + //disp(fftshift(b , "all")); + + + e = c + [10 1 15 3.5 ]*%i; + disp(fftshift(e)); + + f = [ 18 15 7 6 ; 1 5 6 4 ; 43.5 1 9.3 1 ] + [ 14 15 2 6 ; 1 2 6 4 ; 48.5 3 9.3 1 ]*%i; + disp(fftshift(f)); + disp(fftshift(f , 1)); + disp(fftshift(f , 2)); + //disp(fftshift(f , "all")); + +endfunction |