get_phai.m

来自「用S-Matrix算法计算光栅衍射问题。」· M 代码 · 共 9 行

function Phai = get_Phai(pp)
include_globals

pp = pp + 1;

temp_mat = {exp(1i*beta_b(pp,:)*thick_e(pp)),exp(-1i*beta_b(pp,:)*thick_e(pp))};
temp_vector = cell2mat(temp_mat);
Phai = diag(temp_vector);
end