diff options
author | torset | 2009-02-06 15:33:32 +0000 |
---|---|---|
committer | torset | 2009-02-06 15:33:32 +0000 |
commit | a9209daadd31846f6e18b7bcc186998433dd3607 (patch) | |
tree | 13e5a06ebe5077857cebe1249b5c16cdd344f916 /src/signalProcessing/includes/ifft.h | |
parent | 0dd9360f8003b85ccf460822d8bcb250b45ab778 (diff) | |
download | scilab2c-a9209daadd31846f6e18b7bcc186998433dd3607.tar.gz scilab2c-a9209daadd31846f6e18b7bcc186998433dd3607.tar.bz2 scilab2c-a9209daadd31846f6e18b7bcc186998433dd3607.zip |
Modify some headers and interfaces
Diffstat (limited to 'src/signalProcessing/includes/ifft.h')
-rw-r--r-- | src/signalProcessing/includes/ifft.h | 12 |
1 files changed, 10 insertions, 2 deletions
diff --git a/src/signalProcessing/includes/ifft.h b/src/signalProcessing/includes/ifft.h index e599b22a..a0c06ef4 100644 --- a/src/signalProcessing/includes/ifft.h +++ b/src/signalProcessing/includes/ifft.h @@ -21,8 +21,16 @@ #define ciffts(in) in #define ziffts(in) in -#define sifftma(in,rows,columns,out) cifftma(FloatComplexMatrix(in,0),rows,columns,out) -#define difftma(in,rows,columns,out) zifftma(DoubleComplexMatrix(in,0),rows,columns,out) +#define sifftma(in,rows,columns,out) {float* temp;\ + temp=malloc((uint)(rows*columns)*sizeof(float));\ + sfilla(temp,rows,columns,0);\ + cifftma(FloatComplexMatrix(in,temp,rows*columns),rows,columns,out);\ + } +#define difftma(in,rows,columns,out) {double* temp;\ + temp=malloc((uint)(rows*columns)*sizeof(double));\ + dfilla(temp,rows,columns,0);\ + zifftma(DoubleComplexMatrix(in,temp,rows*columns),rows,columns,out);\ + } /* ** compute the inverse fast fourier transform of a vector |