- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
FFT 的 C 语言编程
1.程序:
#include stdio.h
#include math.h
#define re 0 /* re=0 ,用 re 表示实部 */
#define im 1 /* im=1 ,用 im 表示虚部 */
main()
{
float x[128][2],w[2],temp[2];
/*
x[128][2] : 复数变量;
x[i][re] : 第 i 个复数变量的实部;
x[i][im] : 第 i 个复数变量的虚部;
w[2] : 存储旋转因子 WN
P,w[re] 、w[im] 分别代表旋转因子的实部和虚部;
temp[2] : 蝶形计算中的临时变量, temp[re] 、temp[im] 分别代表其实部
和虚部;
*/
float arg,wreal,wimag;
/* arg 存储旋转因子指数 p( 数值上相差 - 2 π/N) 。wreal 存储 cos(arg) ,
wimag 存储
-sin(arg) */
float tem,tr,ti;
int L,M,B,j,i,k, N,N2;
char c=i;
scanf(%d %d,N,M); /* 输入复数信号长度 N,蝶形运算级数 M */
N2=N1;
for(j=0;jN;j++) /* 输入复数信号实部和虚部 */
{
scanf(%f %f,x[j][re],x[j][im]);
}
printf(\n);
/* 输入倒序 */
for(j=0,i=1;iN-1;i++)
{
k=N2;
while(k=j)
{
j=j-k;
k=k1;
}
j=j+k;
if(ij)
{
tr=x[j][re];
ti=x[j][im];
x[j][re]=x[i][re];
x[j][im]=x[i][im];
x[i][re]=tr;
x[i][im]=ti;
}
}
/*FFT 三重循环模块 */
for(L=1; L=M; L++) /* 逐级进行计算共 M 级*/
{
B=1L-1; /* 第 L 级共有 B=2L-1 个不同的旋转因子 */
arg=-acos(-1)/B; /* 旋转因子初始化注释见结尾处 */
w[re]=cos(arg);
w[im]=-sin(arg);
for(j=0; jB; j++) /* j 代表第 L 级不同旋转因子的个数 */
{
/* 旋转因子 */
arg=acos(-1)/B; /* arg= π/ Β */
wreal=cos(arg);
wimag= -sin(arg);
tem=w[re]*wreal-w[im]*wimag;
w[im]=w[re]*wimag+w[im]*wreal;
w[re]=tem;
for(k=j; kN; k+=2*B)
/* 第 L 级具有相同旋转因子蝶形计算,每个蝶形相距 2L=2B 个点 */
{
temp[re]=x[k+B][re]*w[re]-x[k+B][im]*w[im];
temp[im]=x[k+B][im]*w[re]+x[k+B][re]*w[im];
x[k+B][re]=x[k][re]-temp[re];
x[k+B][im]=x[k][im]-temp[im];
x[k][re]=x[k][re]+temp[re];
x[k][im]=x[k][im]+temp[im];
/* 编写蝶形运算程序 */
/* 第 L
您可能关注的文档
最近下载
- 2025年医疗器械经营质量管理制度、工作程序文件目录.pdf VIP
- 浅谈小学数学核心素养之运算能力.pdf VIP
- 2023年我国蚕桑产业发展态势与未来发展建议.docx VIP
- 电力变压器声纹检测技术导则.docx VIP
- 调度员考核管理细则梳理.docx VIP
- 《建设工程施工合同》GF2024—0201.docx VIP
- 会计师事务所的执业质量控制制度.pdf VIP
- 2021《森林消防队伍基础设施、装备及制度建设标准》.pdf VIP
- 《水利水电工程单元工程施工质量验收评定标准-地基处理与基础工程》(SL 633-2012).pdf VIP
- (高清版)-B-T 2423.18-2021 环境试验 第2部分:试验方法 试验Kb:盐雾,交变(氯化钠溶液).pdf VIP
文档评论(0)