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

传真(Fax)编程

开发平台:

Matlab

  1. function [fd, tdr] = doppler_freq(freq, ang, tv, indicator)
  2. % This function computes Doppler frequency and time dilation factor ratio
  3. % tau_prime / tau
  4. format long
  5. c = 3.0e+8;
  6. ang_rad = ang * pi /180.;
  7. lambda = c / freq;
  8. if (indicator == 1)
  9.    fd = 2.0 * tv * cos(ang_rad) / lambda;
  10.    tdr = (c - tv) / (c + tv);
  11. else
  12.    fd = -2.0 * c * tv * cos(and_rad) / lambda;
  13.    tdr = (c + tv) / (c -tv);
  14. end
  15. return