lfm_ambg.m
上传用户:szahd2008
上传日期:2020-09-25
资源大小:1275k
文件大小:0k
源码类别:

传真(Fax)编程

开发平台:

Matlab

  1. function x = lfm_ambg(taup, b, up_down)
  2. eps = 0.000001;
  3. i = 0;
  4. mu = up_down * b / taup;
  5. delt = 2.2*taup/250;
  6. delf = 2*b /250;
  7. for tau = -1.1*taup:.035:1.1*taup
  8.    i = i + 1;
  9.    j = 0;
  10.    for fd = -1.5*b:.035:1.5*b
  11.       j = j + 1;
  12.       val1 = 1. - abs(tau) / taup;
  13.       val2 = pi * taup * (1.0 - abs(tau) / taup);
  14.       val3 = (fd + mu * tau);
  15.       val = val2 * val3;
  16.       x(j,i) = abs( val1 * (sin(val+eps)/(val+eps))).^2;
  17.    end
  18. end
  19. return