| Last change
 on this file since 1551 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.