rms.m

利用电磁场的源激发方法来计算光子晶体波导例如光子晶体光纤

function out = rms(in)
v = in(:);
ind = find(isfinite(v));
v = v(ind);
[rows,cols] = size(in);
s = rows*cols;
out = sqrt(v'*v/s);