Last change
on this file since 2714 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 | |
---|
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 | ExecuteCommand("zone 1 2");
|
---|
13 | KeepObj(in);
|
---|
14 | DisplayObj(in, "");
|
---|
15 | // KeepObj(out);
|
---|
16 | DisplayObj(out, "red");
|
---|
17 |
|
---|
18 |
|
---|
19 |
|
---|
20 |
|
---|
Note:
See
TracBrowser
for help on using the repository browser.