




版權(quán)說明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請進(jìn)行舉報或認(rèn)領(lǐng)
文檔簡介
1、精選優(yōu)質(zhì)文檔-傾情為你奉上FFT的C語言算法實現(xiàn)程序如下: /*FFT*/ #include <stdio.h> #include <math.h> #include <stdlib.h> #define N 1000 typedef struct double real; double img; complex; void fft(); /*快速傅里葉變換*/ void ifft(); /*快速傅里葉逆變換*/ void initW(); void change(); void add(complex ,complex ,complex *); /*復(fù)數(shù)加
2、法*/ void mul(complex ,complex ,complex *); /*復(fù)數(shù)乘法*/ void sub(complex ,complex ,complex *); /*復(fù)數(shù)減法*/ void divi(complex ,complex ,complex *);/*復(fù)數(shù)除法*/ void output(); /*輸出結(jié)果*/ complex xN, *W;/*輸出序列的值*/ int size_x=0;/*輸入序列的長度,只限2的N次方*/ double PI; int main() int i,method; system("cls"); PI=atan(
3、1)*4; printf("Please input the size of x:n"); /*輸入序列的長度*/ scanf("%d",&size_x); printf("Please input the data in xN:(such as:5 6)n"); /*輸入序列對應(yīng)的值*/ for(i=0;i<size_x;i+) scanf("%lf %lf",&xi.real,&xi.img); initW(); /*選擇FFT或逆FFT運算*/ printf("Use
4、FFT(0) or IFFT(1)?n"); scanf("%d",&method); if(method=0) fft(); else ifft(); output(); return 0; /*進(jìn)行基-2 FFT運算*/ void fft() int i=0,j=0,k=0,l=0; complex up,down,product; change(); for(i=0;i< log(size_x)/log(2) ;i+) l=1<<i; for(j=0;j<size_x;j+= 2*l ) for(k=0;k<l;k+)
5、mul(xj+k+l,Wsize_x*k/2/l,&product); add(xj+k,product,&up); sub(xj+k,product,&down); xj+k=up; xj+k+l=down; void ifft() int i=0,j=0,k=0,l=size_x; complex up,down; for(i=0;i< (int)( log(size_x)/log(2) );i+) /*蝶形運算*/ l/=2; for(j=0;j<size_x;j+= 2*l ) for(k=0;k<l;k+) add(xj+k,xj+k+l,&
6、amp;up); up.real/=2;up.img/=2; sub(xj+k,xj+k+l,&down); down.real/=2;down.img/=2; divi(down,Wsize_x*k/2/l,&down); xj+k=up; xj+k+l=down; change(); void initW() int i; W=(complex *)malloc(sizeof(complex) * size_x); for(i=0;i<size_x;i+) Wi.real=cos(2*PI/size_x*i); Wi.img=-1*sin(2*PI/size_x*i)
7、; void change() complex temp; unsigned short i=0,j=0,k=0; double t; for(i=0;i<size_x;i+) k=i;j=0; t=(log(size_x)/log(2); while( (t-)>0 ) j=j<<1; j|=(k & 1); k=k>>1; if(j>i) temp=xi; xi=xj; xj=temp; void output() /*輸出結(jié)果*/ int i; printf("The result are as followsn");
8、 for(i=0;i<size_x;i+) printf("%.4f",xi.real); if(xi.img>=0.0001) printf("+%.4fjn",xi.img); else if(fabs(xi.img)<0.0001) printf("n"); else printf("%.4fjn",xi.img); void add(complex a,complex b,complex *c) c->real=a.real+b.real; c->img=a.img+b.img; void mul(complex a,complex b,complex *c) c->real=a.real*b.real - a.img*b.img; c->img=a.real*b.img + a.img*b.real; void sub(complex a,complex b,complex *c) c->real=a.real-b.real; c->img=a.img-b.img; void divi(complex a,complex b,complex *c) c->r
溫馨提示
- 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請下載最新的WinRAR軟件解壓。
- 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
- 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁內(nèi)容里面會有圖紙預(yù)覽,若沒有圖紙預(yù)覽就沒有圖紙。
- 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
- 5. 人人文庫網(wǎng)僅提供信息存儲空間,僅對用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對任何下載內(nèi)容負(fù)責(zé)。
- 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請與我們聯(lián)系,我們立即糾正。
- 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時也不承擔(dān)用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。
最新文檔
- 照明節(jié)能產(chǎn)品認(rèn)證制度研究考核試卷
- 環(huán)境遙感技術(shù)考核試卷
- 環(huán)保信息公開與透明度提升考核試卷
- 智能物流在制造業(yè)中的應(yīng)用考核試卷
- 公安特勤面試題及答案
- 東師稅法考試題及答案
- 感官評定面試題及答案
- 互聯(lián)網(wǎng)+職業(yè)培訓(xùn)與技能提升考核試卷
- 烹飪課程推廣活動考核試卷
- 檢驗科考試題及答案
- 2025春季學(xué)期國開電大??啤吨屑壺攧?wù)會計(二)》一平臺在線形考(第二次形考任務(wù))試題及答案
- 污水處理工程設(shè)計投標(biāo)文件技術(shù)方案
- 辦公用房簡易裝修合同樣本
- 上海市醫(yī)療機構(gòu)醫(yī)療服務(wù)項目和價格匯編
- 種子輪投資協(xié)議合同協(xié)議
- 車輛油耗管理制度模板
- 護(hù)理反思書寫規(guī)范
- 2025年北京市第一次普通高中學(xué)業(yè)水平合格性考試(學(xué)考)化學(xué)試卷(原卷版+解析版)
- 2025《義務(wù)教育勞動課程標(biāo)準(zhǔn)(2022年版)》測試題庫及答案【共3套】
- 頭端可彎曲負(fù)壓吸引鞘在輸尿管軟鏡碎石術(shù)處理長徑≤2cm上尿路結(jié)石中的應(yīng)用研究
- 某部勞務(wù)派遣服務(wù)方案投標(biāo)文件(技術(shù)方案)
評論
0/150
提交評論