Last change
on this file since 4067 was 3440, checked in by ansari, 18 years ago |
petit nettoyage du fichier - conformite avec doc piapp.tex , Reza 13/12/2007
|
File size:
368 bytes
|
Line | |
---|
1 | TVector<r_8> in(4048);
|
---|
2 | TVector<r_8> noise(4048);
|
---|
3 | TVector< complex<r_8> > out;
|
---|
4 | in = RegularSequence(0., 0.05);
|
---|
5 | noise = RandomSequence(RandomSequence::Gaussian, 0., 4.);
|
---|
6 | MathArray<r_8> ma;
|
---|
7 | ma.ApplyFunctionInPlace(in, myf);
|
---|
8 | in += noise;
|
---|
9 | FFTPackServer FFTServ;
|
---|
10 | cout << " Calling FFT " << endl;
|
---|
11 | FFTServ.FFTForward(in, out);
|
---|
12 | DisplayObj(in, "");
|
---|
13 | DisplayObj(out, "red");
|
---|
14 |
|
---|
15 |
|
---|
16 |
|
---|
17 |
|
---|
Note:
See
TracBrowser
for help on using the repository browser.