1 | % nafflib - MATLAB to NAFF library |
---|
2 | % |
---|
3 | % INPUTS |
---|
4 | % 1. Real part |
---|
5 | % 2. Imaginary part |
---|
6 | % 3. Window type |
---|
7 | % 4. Nomber of frequency |
---|
8 | % 5. Dubug 0 or 1 |
---|
9 | % |
---|
10 | % OUPUTS |
---|
11 | % 1. Fundamental frequency vector |
---|
12 | % 2. Amplitude vector |
---|
13 | % 3. Phase vector |
---|
14 | % |
---|
15 | % EXAMPLE |
---|
16 | % [frequency amplitude phase] = nafflib(Y, Yp, WindowType,nfreq,DebugFlag); |
---|
17 | |
---|
18 | |
---|
19 | %% Laurent S. Nadolski, Synchrotron SOLEIL |
---|
20 | |
---|
21 | % Calls modnaff from: |
---|
22 | % /* MODNAFF.C version 0.96 */ |
---|
23 | % /* Astronomie et systemes dynamiques */ |
---|
24 | % /* J. LASKAR Bureau des Longitudes, Paris (version originale fortran) */ |
---|
25 | % /* M. GASTINEAU, portage en C, 03/09/98 */ |
---|
26 | % /* v0.96 M. GASTINEAU 09/09/98 : modification dans la fonction naf_ztder */ |
---|
27 | % /* dans les boucles de I en I-1. */ |
---|
28 | % /* v0.96 M. GASTINEAU 09/11/98 : remplacement des variables PI2 par PICARRE*/ |
---|
29 | % /* car PI2 est un define sous LINUX. */ |
---|
30 | % /* v0.96 M. GASTINEAU 01/12/98 : utilisation des fonctions complexes */ |
---|
31 | % /* inlines. */ |
---|
32 | % /* v0.96 M. GASTINEAU 07/12/98 : modification dans naf_frefin car bug lors*/ |
---|
33 | % /* de l'optimisation sur Mac. */ |
---|
34 | % /* v0.96 M. GASTINEAU 18/12/98 : modification de naf_iniwin */ |
---|
35 | % /* v0.96 M. GASTINEAU 06/01/99 : ajout de la liberation de la liste des */ |
---|
36 | % /* fenetres dans naf_cleannaf et naf_cleannaf_notab*/ |
---|
37 | % /* v0.96 M. GASTINEAU 12/01/99 : correction dans le cas ou ICPLX=0 dans */ |
---|
38 | % /* naf_modfre et naf_gramsc. */ |
---|
39 | % /*v0.96 M. GASTINEAU 14/01/99 : ajout du support des fenetres dans */ |
---|
40 | % /* naf_mfttab et naf_fftmax. */ |
---|
41 | % /*v0.97 M. GASTINEAU 26/05/99 : correction bug (0.97/99/05/26/A) dans */ |
---|
42 | % /* naf_mftnaf */ |
---|
43 | % /* v0.97 M. GASTINEAU 27/05/99 : correction bug (0.97/99/05/27/A) dans le */ |
---|
44 | % /* cas ou ICPLX=0 et FS=0 dans naf_modfre et naf_gramsc. */ |
---|
45 | |
---|
46 | |
---|
47 | |
---|