diff options
Diffstat (limited to 'src/signalProcessing/fftshift/zrowfftshifta.c')
-rw-r--r-- | src/signalProcessing/fftshift/zrowfftshifta.c | 45 |
1 files changed, 0 insertions, 45 deletions
diff --git a/src/signalProcessing/fftshift/zrowfftshifta.c b/src/signalProcessing/fftshift/zrowfftshifta.c deleted file mode 100644 index b5fbb699..00000000 --- a/src/signalProcessing/fftshift/zrowfftshifta.c +++ /dev/null @@ -1,45 +0,0 @@ -/* - * Scilab ( http://www.scilab.org/ ) - This file is part of Scilab - * Copyright (C) 2008 - INRIA - Arnaud TORSET - * - * This file must be used under the terms of the CeCILL. - * This source file is licensed as described in the file COPYING, which - * you should have received as part of this distribution. The terms - * are also available at - * http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt - * - */ - - -#include "fftshift.h" - -static void Pair(doubleComplex* in,int rows,int columns,doubleComplex* out){ - int i=0,j=0; - - for (i=0;i<rows;i++) - for(j=0;j<columns;j++) - out[i+j*rows]=in[j*rows+((rows/2)+i)%rows]; -} - - -static void Odd(doubleComplex* in,int rows,int columns,doubleComplex* out){ - int i=0,j=0; - - /* - same as Pair with some change in the indice - */ - for (i=0;i<rows;i++) - for(j=0;j<columns;j++) - out[i+j*rows]=in[j*rows+(((rows+1)/2)+i)%rows]; -} - - - -void zrowfftshifta(doubleComplex* in,int rows,int columns,doubleComplex* out){ - switch(rows%2){ - case 0 : Pair(in,rows,columns,out); break; - case 1 : Odd(in,rows,columns,out); break; - default : break; - } -} - |