摘要： 1 %接口 2 %a=paraA; 3 m=10; 4 a=zeros(m,3); 5 b=cell(m,3); 6 a(:,1)=rand(m,1).*10; 7 a(:,2)=rand(m,1).*10; 8 b=a; 9 %%通过透镜的屏函数变换10 %%透镜屏函数t(x,y)=A*exp[-ik*(x^2+y^2)/(2*F)];11 k1=1;12 f1=1;13 b(:,3)=-k1*(a(:,1).^2+a(:,2).^2)/(2*f1);14 a(:,3)=b(:,3);15 %%通过棱镜的屏函数变换16 %%棱镜屏函数t(x,y)=exp[-ik*(n-1)(x*α1+y*. 阅读全文