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

传真(Fax)编程

开发平台:

Matlab

  1. % Use this program to reproduce Fig. 6.6 of text
  2. close all
  3. clear all
  4. taup = 1;
  5. b =20.;
  6. up_down = 1.;
  7. taux = -1.5*taup:.01:1.5*taup;
  8. fd = 0.;
  9. mu = up_down * b / 2. / taup;
  10. ii = 0.;
  11. for tau = -1.5*taup:.01:1.5*taup
  12.    ii = ii + 1;
  13.    val1 = 1. - abs(tau) / taup;
  14.    val2 = pi * taup * (1.0 - abs(tau) / taup);
  15.    val3 = (fd + mu * tau);
  16.    val = val2 * val3;
  17.    x(ii) = abs( val1 * (sin(val+eps)/(val+eps)));
  18. end
  19. figure(1)
  20. plot(taux,x)
  21. grid
  22. xlabel ('Delay - seconds')
  23. ylabel ('Uncertainty')
  24. figure(2)
  25. plot(taux,x.^2)
  26. grid
  27. xlabel ('Delay - seconds')
  28. ylabel ('Ambiguity')