[求助]相位恢复算法 [复制链接]

有会相位恢复算法的吗？能帮我看看下面的代码错哪儿了吗？不胜感激 RUtS_Z&  
[1MEA;  
2d centered Fourier transform，居中的傅里叶变换 >U/g*[>  
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% E,:pIw  
% Citation for this code and algorithm: L2$L.@  
% Tatiana Latychevskaia and Hans-Werner Fink A:J{  
% "Practical algorithms for simulation and reconstruction of digital in-line holograms", Y--8v#t  
% Appl. Optics 54, 2424 - 2434 (2015)
bD-Em#>  
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% u\?u4  
% The code is written by Tatiana Latychevskaia, 2002 -ix1<e  
% The version of Matlab for this code is R2010b ghj~r  
j'x{j %U  
function [out] = FT2Dc(u0); rB?c
m]G=  
K! j*:{  
[Nx, Ny] = size(1i,1j); K7VG\
Ec  
][1u:V/ U  
f1 = zeros(Nx,Ny); EC&,0i4n:  
=Q/>g6  
for ii = 1:Nx *v3 |  
    for jj = 1:Ny 93DBZqN  
         f1(ii,jj) = exp(1i*pi*(ii + jj)); eF1%5;" W  
    end _q4m7C<  
end $3B?  
4,DsB'  
FT = fft2(f1.*in); ZHasDZ8  
Lc?O K"[m  
out = f1.*FT; ~mU_`o  
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

求大神指教