计算全息的菲涅尔衍射积分算法MATLAB

计算全息的菲涅尔衍射积分算法MATLAB算法，非常详细，很有用

%菲涅耳积分卷积方法
function [f1dx1dy1x1y1] = fresnel（f0MNdx0dy0zlambda）
k=2*pi/lambda;
du=1./（M*dx0）;
dv=1./（N*dy0）;
u=ones（N1）*[0:M/2-1 -M/2:-1]*du;                      %Note order of points for FFT
v=[0:N/2-1 -N/2:-1]‘*ones（1M）*dv;
H=exp（-i*pi*lambda*z*（u.^2+v.^2））;         %Fourier transform of kernel
f1=ifft2（fft2（f0）.*H）;                                 %Convolution
dx1=dx0;dy1=dy0;
x1=ones（N1）*[-M/2:M/2-1]*dx1;                         %baseline for output
y1=[-N/2:N/2-1]‘*ones（1M）*dy1;

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----
     目录           0  2019-06-28 14:56  fresnel\
     文件        8254  2006-05-29 16:29  fresnel\E256.BMP
     文件        8254  2006-05-28 21:49  fresnel\F256.BMP
     文件         523  2006-05-27 22:55  fresnel\fresnel.m
     文件         518  2006-05-27 21:46  fresnel\fresnelc.m
     文件         435  2006-05-29 21:41  fresnel\fresnelf.m
     文件         606  2006-05-27 23:15  fresnel\fresnell.m
     文件        1727  2006-05-30 09:40  fresnel\Ge__parallel.m
     文件        2138  2006-05-30 15:43  fresnel\Ge__sphere.m