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

传真(Fax)编程

开发平台:

Matlab

  1. function Sr = surf_rough(hrms, freq, psi)
  2. clight = 3e8;
  3. psi = psi .* pi ./ 180; % angle in radians
  4. lambda = clight / freq; % wavelength
  5. g = (2.* pi .* hrms .* sin(psi) ./ lambda).^2;
  6. Sr = exp(-2 .* g);
  7. return