/*FFT8C.C - 8-POINT COMPLEX FFT PROGRAM. CALLS FFT.C       */
#include "complex.h"      /*complex structure definition   */
extern void FFT();        /*FFT function                   */
volatile int *out_addr=(volatile int *)0x809802; /*out addr*/
       
main()
 {
 COMPLEX y[8]={1000,0,1000,0,1000,0,1000,0,
      0.0,0.0,0.0,0.0,0.0,0.0,0.0,0.0}; /*rectangular input*/
 int i, n = 8;       
 FFT(y,n);                     /*calls generic FFT function*/
 for (i = 0; i<n; i++)       
  {
   *out_addr++ = (y[i]).real;  /*real output component     */
   *out_addr++ = (y[i]).imag;  /*imaginary output component*/
  }    
 }