matlab模拟干涉衍射

引用请注明出处：http://blog.csdn.net/int64ago/article/details/7076015

%##########################%
%名称：等厚干涉模拟                       %
%作者：程序猿__int64Ago                %
%时间：2011-12-16                        %
%##########################%
clear                                                %清内存
lamda=632.8e-9;                             %设定入射光波长
n=1;                                                %缝隙折射率
R=5;                                                %柱透镜半径
ym=5e-3;                                         %设定屏幕的范围,根据实际情况调整
xs=ym;                                             %x方向无变化，单一值
N=1000;                                          %条纹柔和度
ys=linspace(-ym,ym,N);                      %y轴上坐标离散
for i=1:N                                          %依次求干涉光