OPAL (Object Oriented Parallel Accelerator Library)
2.2.0
OPAL
|
#include <stdio.h>
#include <math.h>
#include <stdlib.h>
#include <string.h>
#include "fftpack.h"
#include "FFT/fftpack_inc.c"
Go to the source code of this file.
Classes | |
struct | cmplx |
Macros | |
#define | RALLOC(type, num) ((type *)util_malloc_((num)*sizeof(type))) |
#define | DEALLOC(ptr) { if ((ptr) != 0) free (ptr); (ptr) = NULL; } |
#define | SWAP(a, b, type) do { type tmp_=(a); (a)=(b); (b)=tmp_; } while(0) |
#define | WA(x, i) wa[(i)+(x)*ido] |
#define | CH(a, b, c) ch[(a)+ido*((b)+l1*(c))] |
#define | CC(a, b, c) cc[(a)+ido*((b)+cdim*(c))] |
#define | PM(a, b, c, d) { a=c+d; b=c-d; } |
#define | PMC(a, b, c, d) { a.r=c.r+d.r; a.i=c.i+d.i; b.r=c.r-d.r; b.i=c.i-d.i; } |
#define | ADDC(a, b, c) { a.r=b.r+c.r; a.i=b.i+c.i; } |
#define | SCALEC(a, b) { a.r*=b; a.i*=b; } |
#define | CONJFLIPC(a) { double tmp_=a.r; a.r=-a.i; a.i=tmp_; } |
#define | MULPM(a, b, c, d, e, f) { a=c*e+d*f; b=c*f-d*e; } |
#define | CONCAT(a, b) a ## b |
#define | X(arg) CONCAT(passb,arg) |
#define | BACKWARD |
#define | X(arg) CONCAT(passf,arg) |
#define | CC(a, b, c) cc[(a)+ido*((b)+l1*(c))] |
#define | CH(a, b, c) ch[(a)+ido*((b)+cdim*(c))] |
#define | CH(a, b, c) ch[(a)+ido*((b)+l1*(c))] |
#define | CC(a, b, c) cc[(a)+ido*((b)+cdim*(c))] |
#define | C1(a, b, c) cc[(a)+ido*((b)+l1*(c))] |
#define | C2(a, b) cc[(a)+idl1*(b)] |
#define | CH2(a, b) ch[(a)+idl1*(b)] |
#define | CH(a, b, c) ch[(a)+ido*((b)+l1*(c))] |
#define | CC(a, b, c) cc[(a)+ido*((b)+cdim*(c))] |
Functions | |
void * | util_malloc_ (size_t sz) |
void | util_free_ (void *ptr) |
void | cfftf (size_t n, double c[], double wsave[]) |
void | cfftb (size_t n, double c[], double wsave[]) |
void | cffti (size_t n, double wsave[]) |
void | rfftf (size_t n, double r[], double wsave[]) |
void | rfftb (size_t n, double r[], double wsave[]) |
void | rffti (size_t n, double wsave[]) |
void | sinti (size_t n, double wsave[]) |
void | sint1 (size_t n, double war[], double was[], double xh[], double x[], double xxifac[]) |
void | sint (size_t n, double x[], double wsave[]) |
Variables | |
const double | pi = 3.14159265358979 |
#define ADDC | ( | a, | |
b, | |||
c | |||
) | { a.r=b.r+c.r; a.i=b.i+c.i; } |
Definition at line 98 of file fftpack.cpp.
#define BACKWARD |
Definition at line 107 of file fftpack.cpp.
#define C1 | ( | a, | |
b, | |||
c | |||
) | cc[(a)+ido*((b)+l1*(c))] |
Definition at line 275 of file fftpack.cpp.
Referenced by RootFinderForCSR::hasPositiveRealRoots().
#define C2 | ( | a, | |
b | |||
) | cc[(a)+idl1*(b)] |
Definition at line 276 of file fftpack.cpp.
Referenced by RootFinderForCSR::hasPositiveRealRoots().
#define CC | ( | a, | |
b, | |||
c | |||
) | cc[(a)+ido*((b)+cdim*(c))] |
Definition at line 389 of file fftpack.cpp.
#define CC | ( | a, | |
b, | |||
c | |||
) | cc[(a)+ido*((b)+l1*(c))] |
Definition at line 389 of file fftpack.cpp.
#define CC | ( | a, | |
b, | |||
c | |||
) | cc[(a)+ido*((b)+cdim*(c))] |
Definition at line 389 of file fftpack.cpp.
#define CC | ( | a, | |
b, | |||
c | |||
) | cc[(a)+ido*((b)+cdim*(c))] |
Definition at line 389 of file fftpack.cpp.
#define CH | ( | a, | |
b, | |||
c | |||
) | ch[(a)+ido*((b)+l1*(c))] |
Definition at line 388 of file fftpack.cpp.
#define CH | ( | a, | |
b, | |||
c | |||
) | ch[(a)+ido*((b)+cdim*(c))] |
Definition at line 388 of file fftpack.cpp.
#define CH | ( | a, | |
b, | |||
c | |||
) | ch[(a)+ido*((b)+l1*(c))] |
Definition at line 388 of file fftpack.cpp.
#define CH | ( | a, | |
b, | |||
c | |||
) | ch[(a)+ido*((b)+l1*(c))] |
Definition at line 388 of file fftpack.cpp.
#define CH2 | ( | a, | |
b | |||
) | ch[(a)+idl1*(b)] |
Definition at line 277 of file fftpack.cpp.
#define CONCAT | ( | a, | |
b | |||
) | a ## b |
Definition at line 104 of file fftpack.cpp.
#define CONJFLIPC | ( | a | ) | { double tmp_=a.r; a.r=-a.i; a.i=tmp_; } |
Definition at line 100 of file fftpack.cpp.
#define DEALLOC | ( | ptr | ) | { if ((ptr) != 0) free (ptr); (ptr) = NULL; } |
Definition at line 74 of file fftpack.cpp.
#define MULPM | ( | a, | |
b, | |||
c, | |||
d, | |||
e, | |||
f | |||
) | { a=c*e+d*f; b=c*f-d*e; } |
Definition at line 102 of file fftpack.cpp.
#define PM | ( | a, | |
b, | |||
c, | |||
d | |||
) | { a=c+d; b=c-d; } |
Definition at line 96 of file fftpack.cpp.
Referenced by Distribution::generateBinomial().
#define PMC | ( | a, | |
b, | |||
c, | |||
d | |||
) | { a.r=c.r+d.r; a.i=c.i+d.i; b.r=c.r-d.r; b.i=c.i-d.i; } |
Definition at line 97 of file fftpack.cpp.
#define RALLOC | ( | type, | |
num | |||
) | ((type *)util_malloc_((num)*sizeof(type))) |
Definition at line 71 of file fftpack.cpp.
#define SCALEC | ( | a, | |
b | |||
) | { a.r*=b; a.i*=b; } |
Definition at line 99 of file fftpack.cpp.
#define SWAP | ( | a, | |
b, | |||
type | |||
) | do { type tmp_=(a); (a)=(b); (b)=tmp_; } while(0) |
Definition at line 83 of file fftpack.cpp.
#define WA | ( | x, | |
i | |||
) | wa[(i)+(x)*ido] |
Definition at line 93 of file fftpack.cpp.
Definition at line 112 of file fftpack.cpp.
Definition at line 112 of file fftpack.cpp.
void cfftb | ( | size_t | N, |
double | complex_data[], | ||
double | wrk[] | ||
) |
backward complex transform
Definition at line 705 of file fftpack.cpp.
Referenced by FFTPACK_wrap< double >::ccfftb().
void cfftf | ( | size_t | N, |
double | complex_data[], | ||
double | wrk[] | ||
) |
forward complex transform
Definition at line 698 of file fftpack.cpp.
Referenced by FFTPACK_wrap< double >::ccfftf().
void cffti | ( | size_t | N, |
double | wrk[] | ||
) |
initializer for complex transforms
Definition at line 776 of file fftpack.cpp.
Referenced by FFTPACK_wrap< double >::ccffti().
void rfftb | ( | size_t | N, |
double | data[], | ||
double | wrk[] | ||
) |
backward real transform
Definition at line 856 of file fftpack.cpp.
Referenced by FFTPACK_wrap< double >::rcfftb().
void rfftf | ( | size_t | N, |
double | data[], | ||
double | wrk[] | ||
) |
forward real transform
Definition at line 853 of file fftpack.cpp.
Referenced by FFTPACK_wrap< double >::rcfftf().
void rffti | ( | size_t | N, |
double | wrk[] | ||
) |
initializer for real transforms
Definition at line 887 of file fftpack.cpp.
Referenced by FFTPACK_wrap< double >::rcffti(), and sinti().
void sint | ( | size_t | n, |
double | x[], | ||
double | wsave[] | ||
) |
Definition at line 960 of file fftpack.cpp.
References sint1().
Referenced by FFTPACK_wrap< double >::rrfft().
void sint1 | ( | size_t | n, |
double | war[], | ||
double | was[], | ||
double | xh[], | ||
double | x[], | ||
double | xxifac[] | ||
) |
void sinti | ( | size_t | n, |
double | wsave[] | ||
) |
Definition at line 895 of file fftpack.cpp.
References rffti(), and sin().
Referenced by FFTPACK_wrap< double >::rrffti().
void util_free_ | ( | void * | ptr | ) |
Definition at line 77 of file fftpack.cpp.
void* util_malloc_ | ( | size_t | sz | ) |
Definition at line 55 of file fftpack.cpp.
const double pi = 3.14159265358979 |
Definition at line 894 of file fftpack.cpp.
Referenced by NormalForm::anharmonicity(), DragtFinnNormalForm< N >::anharmonicity(), FNormalForm< N >::anharmonicity(), Cyclotron::apply(), ParallelCyclotronTracker::bunchDumpPhaseSpaceData(), ParallelCyclotronTracker::bunchDumpStatData(), BeamStripping::checkPressure(), ParallelCyclotronTracker::deleteParticle(), DragtFinnNormalForm< N >::DragtFinnNormalForm(), SampleCmd::execute(), DragtFinnMap< N >::factorBerzForestIrwin(), FNormalForm< N >::FNormalForm(), RFCavity::getAutoPhaseEstimateFallback(), Cyclotron::getdiffs(), RFCavity::getMomentaKick(), ParallelCyclotronTracker::getQuaternionTwoVectors(), ParallelCyclotronTracker::initDistInGlobalFrame(), TravelingWave::initialise(), RFCavity::initialise(), ParallelCyclotronTracker::initializeTracking_m(), ParallelCyclotronTracker::MtsTracker(), NormalForm::NormalForm(), OptimizeCmd::run(), TravelingWave::setPhasem(), TrackRun::setupCyclotronTracker(), TrackRun::setupSliceTracker(), TrackRun::setupThickTracker(), TrackRun::setupTTracker(), and ThinTracker::visitBeamBeam().