[1371] | 1 | // FFT (Fast Fourier Transform) Server based on FFTPack
|
---|
| 2 | // R. Ansari 1999-2000
|
---|
| 3 | // DAPNIA/SPP (Saclay) / CEA LAL - IN2P3/CNRS (Orsay)
|
---|
| 4 |
|
---|
[710] | 5 | #ifndef FFTPServer_H_SEEN
|
---|
| 6 | #define FFTPServer_H_SEEN
|
---|
| 7 |
|
---|
| 8 | #include "fftservintf.h"
|
---|
| 9 |
|
---|
| 10 | // implementation de FFTServerInterface en utilisant FFTPack
|
---|
| 11 |
|
---|
| 12 | namespace SOPHYA {
|
---|
| 13 |
|
---|
[896] | 14 | //! An FFT server based on fftpack.
|
---|
[710] | 15 | class FFTPackServer : public FFTServerInterface {
|
---|
| 16 | public:
|
---|
| 17 | FFTPackServer();
|
---|
| 18 | virtual ~FFTPackServer();
|
---|
| 19 |
|
---|
| 20 | // Implementation de l'interface FFTServerInterface
|
---|
| 21 |
|
---|
| 22 | virtual FFTServerInterface * Clone();
|
---|
| 23 |
|
---|
[717] | 24 | // Transforme unidimensionnel sur des double
|
---|
[1390] | 25 | virtual void FFTForward(TArray< complex<r_8> > const & in, TArray< complex<r_8> > & out);
|
---|
| 26 | virtual void FFTBackward(TArray< complex<r_8> > const & in, TArray< complex<r_8> > & out);
|
---|
| 27 | virtual void FFTForward(TArray< r_8 > const & in, TArray< complex<r_8> > & out);
|
---|
[1402] | 28 | virtual void FFTBackward(TArray< complex<r_8> > const & in, TArray< r_8 > & out,
|
---|
| 29 | bool usoutsz=false);
|
---|
[710] | 30 |
|
---|
[717] | 31 | // Transforme unidimensionnel sur des float
|
---|
[1390] | 32 | virtual void FFTForward(TArray< complex<r_4> > const & in, TArray< complex<r_4> > & out);
|
---|
| 33 | virtual void FFTBackward(TArray< complex<r_4> > const & in, TArray< complex<r_4> > & out);
|
---|
| 34 | virtual void FFTForward(TArray< r_4 > const & in, TArray< complex<r_4> > & out);
|
---|
[1402] | 35 | virtual void FFTBackward(TArray< complex<r_4> > const & in, TArray< r_4 > & out,
|
---|
| 36 | bool usoutsz=false);
|
---|
[710] | 37 |
|
---|
[1394] | 38 | // Methodes statiques pour reordonner les donnees
|
---|
| 39 | static void ReShapetoReal(TArray< complex<r_8> > const & in, TArray< r_8 > & out);
|
---|
| 40 | static void ReShapetoCompl(TArray< r_8 > const & in, TArray< complex<r_8> > & out);
|
---|
| 41 | static void ReShapetoReal(TArray< complex<r_4> > const & in, TArray< r_4 > & out);
|
---|
| 42 | static void ReShapetoCompl(TArray< r_4 > const & in, TArray< complex<r_4> > & out);
|
---|
| 43 |
|
---|
[710] | 44 | // Methodes propres a cette classe
|
---|
[791] | 45 | virtual void fftf(int_4 l, float* inout);
|
---|
| 46 | virtual void fftb(int_4 l, float* inout);
|
---|
| 47 | virtual void fftf(int_4 l, double* inout);
|
---|
| 48 | virtual void fftb(int_4 l, double* inout);
|
---|
| 49 | virtual void fftf(int_4 l, complex<float>* inout);
|
---|
| 50 | virtual void fftb(int_4 l, complex<float>* inout);
|
---|
| 51 | virtual void fftf(int_4 l, complex<double>* inout);
|
---|
| 52 | virtual void fftb(int_4 l, complex<double>* inout);
|
---|
[710] | 53 |
|
---|
| 54 | protected:
|
---|
[791] | 55 | virtual void checkint_rfft(int_4 l);
|
---|
| 56 | virtual void checkint_dfft(int_4 l);
|
---|
| 57 | virtual void checkint_cfft(int_4 l);
|
---|
| 58 | virtual void checkint_cdfft(int_4 l);
|
---|
[710] | 59 |
|
---|
| 60 | int sz_rfft;
|
---|
[791] | 61 | r_4* ws_rfft;
|
---|
[710] | 62 |
|
---|
| 63 | int sz_cfft;
|
---|
[791] | 64 | r_4* ws_cfft;
|
---|
[710] | 65 |
|
---|
| 66 | int sz_dfft;
|
---|
[791] | 67 | r_8* ws_dfft;
|
---|
[710] | 68 |
|
---|
| 69 | int sz_cdfft;
|
---|
[791] | 70 | r_8* ws_cdfft;
|
---|
[1390] | 71 |
|
---|
| 72 | FFTArrayChecker<r_4> ckR4;
|
---|
| 73 | FFTArrayChecker<r_8> ckR8;
|
---|
[710] | 74 | };
|
---|
| 75 |
|
---|
| 76 | } // Fin du namespace
|
---|
| 77 |
|
---|
| 78 |
|
---|
| 79 | #endif
|
---|