Last change
on this file since 4075 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
|
Rev | Line | |
---|
[1337] | 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.