00001 /* 00002 * THIS FILE IS UNDER RCS - DO NOT MODIFY UNLESS YOU HAVE 00003 * CHECKED IT OUT USING THE COMMAND CHECKOUT. 00004 * 00005 * $Id: fft99_8h-source.html 2161 2006-05-19 16:55:03Z paulf $ 00006 * 00007 * Revision history: 00008 * $Log$ 00008 * Revision 1.1 2006/05/19 16:55:01 paulf 00008 * first inclusion 00008 * 00009 * Revision 1.1 2001/04/12 03:11:07 lombard 00010 * Initial revision 00011 * 00012 * 00013 * 00014 */ 00015 00016 /* Header file for fft99.c, Temperton's FFT99 package */ 00017 00018 #ifndef FFT99_H 00019 #define FFT99_H 00020 00021 #define PI 3.14159265358979323846 00022 /* Number of extra words needed for fft data storage */ 00023 #define FFT_EXTRA 2 00024 00025 /* Function prototypes */ 00026 void cfft99(double *a, double *work, double *trigs, long *ifax, long inc, 00027 long jump, long n, long lot, long isign); 00028 void cftfax(long n, long *ifax, double *trigs); 00029 void fft99(double *a, double *work, double *trigs, long *ifax, long inc, 00030 long jump, long n, long lot, long isign); 00031 void fft991(double *a, double *work, double *trigs, long *ifax, long inc, 00032 long jump, long n, long lot, long isign); 00033 void fftfax(long n, long *ifax, double *trigs); 00034 00035 00036 00037 #endif