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

传真(Fax)编程

开发平台:

Matlab

  1. % Use this program to reproduce Fig. 6.2 of text
  2. close all
  3. clear all
  4. eps = 0.000001;
  5. taup = 3.;
  6. taumin = -1.1 * taup;
  7. taumax = -taumin;
  8. x = single_pulse_ambg(taup);
  9. taux = taumin:.05:taumax;
  10. fdy = -5/taup:.05:5/taup;
  11. figure(1)
  12. mesh(taux,fdy,x);
  13. xlabel ('Delay - seconds')
  14. ylabel ('Doppler - Hz')
  15. zlabel ('Uncertainty function')
  16. colormap([.5 .5 .5])
  17. colormap (gray)
  18. figure(2)
  19. contour(taux,fdy,x);
  20. xlabel ('Delay - seconds')
  21. ylabel ('Doppler - Hz')
  22. colormap([.5 .5 .5])
  23. colormap (gray)
  24. grid
  25. y = x.^2;
  26. figure(3)
  27. mesh(taux,fdy,y);
  28. xlabel ('Delay - seconds')
  29. ylabel ('Doppler - Hz')
  30. zlabel ('Ambiguity function')
  31. colormap([.5 .5 .5])
  32. colormap (gray)
  33. figure(4)
  34. contour(taux,fdy,y);
  35. xlabel ('Delay - seconds')
  36. ylabel ('Doppler - Hz')
  37. colormap([.5 .5 .5])
  38. colormap (gray)
  39. grid