source: Sophya/trunk/SophyaProg/Examples/fft.icc@ 2836

Last change on this file since 2836 was 1337, checked in by ansari, 25 years ago

Creation de module d'exemples (code Sophya + exemple pour (s)piapp)

Reza 20/11/2000

File size: 426 bytes
Line 
1TVector<r_8> in(4048);
2TVector<r_8> noise(4048);
3TVector< complex<r_8> > out;
4in = RegularSequence(0., 0.05);
5noise = RandomSequence(RandomSequence::Gaussian, 0., 4.);
6MathArray<r_8> ma;
7ma.ApplyFunctionInPlace(in, myf);
8in += noise;
9FFTPackServer FFTServ;
10cout << " Calling FFT " << endl;
11FFTServ.FFTForward(in, out);
12ExecuteCommand("zone 1 2");
13KeepObj(in);
14DisplayObj(in, "");
15// KeepObj(out);
16DisplayObj(out, "red");
17
18
19
20
Note: See TracBrowser for help on using the repository browser.