| 
            Last change
 on this file since 3573 was             3000, checked in by ansari, 19 years ago           | 
        
        
          | 
             
Passage a FFTW3 + suppression const des arguments FFTForward/Backward cmv+Reza 03/07/2006 
 
           | 
        
        
          | 
            File size:
            1023 bytes
           | 
        
      
      
| Line |   | 
|---|
| 1 | #include "sopnamsp.h"
 | 
|---|
| 2 | #include "fftwserver.h"
 | 
|---|
| 3 | 
 | 
|---|
| 4 | /*!
 | 
|---|
| 5 |    \defgroup IFFTW IFFTW module
 | 
|---|
| 6 |    Module containing interface classes between Sophya objects
 | 
|---|
| 7 |    and FFTW Fourier transform package (see http://www.fftw.org )
 | 
|---|
| 8 | */
 | 
|---|
| 9 | 
 | 
|---|
| 10 | /*! 
 | 
|---|
| 11 |   \class SOPHYA::FFTWServer
 | 
|---|
| 12 |   \ingroup IFFTW
 | 
|---|
| 13 |   An implementation of FFTServerInterface based on FFTW, double
 | 
|---|
| 14 |   precision arrays, using FFTW package, availabale from http://www.fftw.org.
 | 
|---|
| 15 |   Refer to FFTServerInterface for details about FFTServer operations.
 | 
|---|
| 16 | 
 | 
|---|
| 17 |   \code
 | 
|---|
| 18 |   #include "fftwserver.h"
 | 
|---|
| 19 |   // ...
 | 
|---|
| 20 |   TMatrix<r_8> in(24,32);
 | 
|---|
| 21 |   TMatrix< complex<r_8> > out;
 | 
|---|
| 22 |   in = RandomSequence();
 | 
|---|
| 23 |   FFTWServer ffts;
 | 
|---|
| 24 |   ffts.setNormalize(true);  // To have normalized transforms
 | 
|---|
| 25 |   cout << " FFTServer info string= " << ffts.getInfo() << endl;
 | 
|---|
| 26 |   cout << "in= " << in << endl;
 | 
|---|
| 27 |   cout << " Calling ffts.FFTForward(in, out) : " << endl;
 | 
|---|
| 28 |   ffts.FFTForward(in, out);
 | 
|---|
| 29 |   cout << "out= " << out << endl;
 | 
|---|
| 30 |   \endcode
 | 
|---|
| 31 | 
 | 
|---|
| 32 | */
 | 
|---|
| 33 | 
 | 
|---|
| 34 | #define MAXND_FFTW 5
 | 
|---|
| 35 | 
 | 
|---|
| 36 | #ifdef FFTW_V2_EXTSOP
 | 
|---|
| 37 | #include "fftw2server.cc"
 | 
|---|
| 38 | #else
 | 
|---|
| 39 | #include "fftw3server.cc"
 | 
|---|
| 40 | #endif
 | 
|---|
| 41 | 
 | 
|---|
       
      
  Note:
 See   
TracBrowser
 for help on using the repository browser.