/*****************************************************************************//*   FIle Name : dft256.c                                                    *//*   Description : WiMax-OFDM DFT  for Decoder                               *//*   author : miffie                                                         *//*   Date   : Nov/02/05                                                      *//*   Copyright (c) 2005 miffie   All rights reserved.                        *//*****************************************************************************/struct complexset dft256 (struct complexset datain ) {int 	nn , kk ;struct 	complexset cset ;struct  complex    *top , *p ;struct  complex    tmp1, tmp2 ;double  p1 ;  //Main     PRINTF("dft256 size=%d\n", datain.size ) ;    if ((top = (struct complex *)malloc(256*sizeof(struct complex)) ) == NULL) {        PRINTF( " malloc failed in mapper.c\n") ;    } //fail    else { //allocated     for(kk=-128;kk<=127;kk++) { //each sample       //pilot       tmp1.realp = 0 ;       tmp1.image = 0 ;       p= datain.data ;       for(nn=0;nn<=255;nn++) { //each subcarrier         p1 = 2*pi*nn*kk/256 ;         tmp2.realp = cos( p1 ) ;         tmp2.image = -sin( p1 ) ;         tmp2 = multiply_complex(*p++ , tmp2) ;         tmp1.realp += tmp2.realp ;         tmp1.image += tmp2.image ;       }//each subcarrier       top[kk+128].realp = tmp1.realp ;       top[kk+128].image = tmp1.image ;     } //each sample     cset.size = 256 ;     cset.data = top ;    }//allocated    //free ( datain.data ) ;    return ( cset ) ;} //dft256