Контрольная работа: Коэффициенты отражения от плоской границы раздела двух диэлектриков с потерями

ylabel('|R_p_a_r|')

subplot(2,2,2)

plot(phi,angle(Rpar)); grid

xlabel('\phi')

ylabel('\psi _p_a_r')

subplot(2,2,3)

plot(phi,abs(Rperp)); grid

xlabel('\phi')

ylabel('|R_p_e_r_p|')

subplot(2,2,4)

plot(phi,angle(Rperp)); grid

xlabel('\phi')

ylabel('\psi _p_e_r_p')

%зависимость угла преломления от угла падения

phi_pr = asin(sin(phir).*sqrt(eps1/eps2))*180/pi;

figure(2);

plot(phi,phi_pr);

xlabel('\phi')

ylabel('\phi _o_t_r')

%угол Брюстера

phi_br = atan(sqrt(epsr))*180/pi;

Падение волны на границу воздух-почва при σ ₂ = 0

Параметры сред (приближенные):

Воздух: ε₁ = 1; σ₁ = 0

Почва: ε₂ = 4; σ₂ = 0

Результаты вызова функции edgereflect (1,4,0,0)

Угол Брюстера: 63.435°

Зависимость коэффициентов отражения от угла падения.

Зависимость угла преломления от угла падения.

2.Падение волны на границу воздух-почва при разных σ ₂ ≠ 0