rfresnel.m

来自「wireless propagation in microcells and p」· M 代码 · 共 13 行

function [rpar,rper]=rfresnel(ang_inc,ep)
% DESCRIPTION
%  This function calculates the reflection coefficients (parallel and perpendicular)
% INPUTS
%  ang_inc: incident angle
%  ep: parameter for the Fresnel function
% OUTPUT
%  rpar: parallel reflection coefficient
%  rper: perpendicular reflection coefficient
 
rper=(cos(ang_inc)-sqrt(ep-(sin(ang_inc))^2))/(cos(ang_inc)+sqrt(ep-(sin(ang_inc))^2));
rpar=((ep*cos(ang_inc)-sqrt(ep-(sin(ang_inc))^2))/(ep*cos(ang_inc)+sqrt(ep-(sin(ang_inc))^2)));