push.m

来自「利用电磁场的源激发方法来计算光子晶体波导例如光子晶体光纤」· M 代码 · 共 5 行

function vOut = push(vNew_beta, vLIFO)
vOut = [vNew_beta(end:-1:1) vLIFO];
if length(vOut) > 1000
    vOut = vOut(1:1000);
end