• 大小: 420KB
    文件类型: .tar
    金币: 2
    下载: 1 次
    发布日期: 2021-01-11
  • 语言: 其他
  • 标签: fk滤波  

资源简介

程序是fk滤波,对于初学者有一定的帮助!对于初学者有一定的帮助!对于初学者有一定的帮助!对于初学者有一定的帮助!

资源截图

代码片段和文件信息

/********************************************************************************
 * Complex.c Complex number operations.
 * Revision History:
 *  Lupei Zhu 06/20/94 Initial coding
*********************************************************************************/
#include 
#include “Complex.h“

complex cplus(complex a complex b) {
  a.x += b.x;
  a.y += b.y;
  return(a);
}

complex cmltp(complex a complex b) {
  complex c;
  c.x = a.x*b.x - a.y*b.y;
  c.y = a.x*b.y + a.y*b.x;
  return(c);
}

complex cngtv(complex a) {
  a.x = -a.x;
  a.y = -a.y;
  return(a);
}

complex cinvs(complex a) {
  complex dmltp(float complex);
  complex conjg(complex a);
  return(dmltp(1./(a.x*a.x+a.y*a.y) conjg(a)));
}

complex conjg(complex a) {
  a.y = -a.y;
  return(a);
}

complex dmltp(float a co

评论

共有 条评论