傅立叶变换的c语言源代码.doc资源-CSDN文库

版权申诉

134 浏览量 2022-07-02 22:21:20 上传评论收藏 26KB DOC 举报

资源推荐

资源详情

资源评论

傅立叶变换的 c 语言源代码

128 点 DIT FFT 函数：

/* 采样来的数据放在 dataR[ ]数组中，运算前 dataI[ ]数组初始化为 0 */

void FFT(oat dataR[],oat dataI[])

{int x0,x1,x2,x3,x4,x5,x6;

int L,j,k,b,p;

oat TR,TI,temp;

/********** following code invert sequence ************/

for(i=0;i<128;i++)

{ x0=x1=x2=x3=x4=x5=x6=0;

x0=i&0x01; x1=(i/2)&0x01; x2=(i/4)&0x01; x3=(i/8)&0x01;x4=(i/16)&0x01;

x5=(i/32)&0x01; x6=(i/64)&0x01;

xx=x0*64+x1*32+x2*16+x3*8+x4*4+x5*2+x6;

dataI[xx]=dataR[i];

}

for(i=0;i<128;i++)

{ dataR[i]=dataI[i]; dataI[i]=0; }

/************** following code FFT *******************/

for(L=1;L<=7;L++) { /* for(1) */

b=1; i=L-1;

while(i>0)

{b=b*2; i--；} /* b= 2^(L-1) */

for(j=0;j<=b-1;j++) /* for (2) */

{ p=1; i=7-L;

while(i>0) /* p=pow(2,7-L)*j; */

{p=p*2; i--；}

p=p*j;

for(k=j;k<128;k=k+2*b) /* for (3) */

{ TR=dataR[k]; TI=dataI[k]; temp=dataR[k+b];

dataR[k]=dataR[k]+dataR[k+b]*cos_tab[p]+dataI[k+b]*sin_tab[p];

dataI[k]=dataI[k]-dataR[k+b]*sin_tab[p]+dataI[k+b]*cos_tab[p];

dataR[k+b]=TR-dataR[k+b]*cos_tab[p]-dataI[k+b]*sin_tab[p];

dataI[k+b]=TI+temp*sin_tab[p]-dataI[k+b]*cos_tab[p];

} /* END for (3) */

} /* END for (2) */

} /* END for (1) */

for(i=0;i<32;i++){ /* 只需要 32 次以下的谐波进行分析 */

w[i]=sqrt(dataR[i]*dataR[i]+dataI[i]*dataI[i]);

w[i]=w[i]/64；}

w[0]=w[0]/2;

} /* END FFT */

本内容试读结束，登录后可阅读更多

下载后可阅读完整内容，剩余0页未读，立即下载

内容反馈

版权申诉

oligaga

粉丝: 52
资源: 2万+

最新资源

资源上传下载、课程学习等过程中有任何疑问或建议，欢迎提出宝贵意见哦~我们会及时处理！点击此处反馈

feedback-tip