intgly.m

来自「微穿孔板是声学领域重要的研究分支。基于此的得到的噪音吸收有重要的应用前景。这是基」· M 代码 · 共 11 行

function y=intgLy(m,n)
Lx=0.1;
Ly=0.2;
Lz=1;
st=0;
if (n*tan(st)/Lz+m/Ly)==0
    y=(-1)^n*(sin(-n*pi/Lz*Ly/2*tan(st)))*Ly;
else
    y=((-1)^(m+n+1)+(-1)^n)*cos(n*pi*Ly/2/Lz*tan(st))/(n*pi*tan(st)/Lz+m*pi/Ly);
end