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

有会相位恢复算法的吗？能帮我看看下面的代码错哪儿了吗？不胜感激 g08=D$P  
*j<;;z-  
2d centered Fourier transform，居中的傅里叶变换 5-]%D(y  
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% cs@5K$v  
% Citation for this code and algorithm: 8^< -;  
% Tatiana Latychevskaia and Hans-Werner Fink j&8~X2?*  
% "Practical algorithms for simulation and reconstruction of digital in-line holograms", xYwb
bFGrG  
% Appl. Optics 54, 2424 - 2434 (2015) 2M1yw "  
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
DlIfr6F  
% The code is written by Tatiana Latychevskaia, 2002
CqrmdWN  
% The version of Matlab for this code is R2010b 6[qRb+ds  
dHOz;4_  
function [out] = FT2Dc(u0); |ZRl.C/e  
`L9o!OsQ  
[Nx, Ny] = size(1i,1j); Kh% x  
jv_sRV  
f1 = zeros(Nx,Ny); luC',QJB  
d5zzQ]|L  
for ii = 1:Nx GD< Afni  
    for jj = 1:Ny CT"0"~~  
         f1(ii,jj) = exp(1i*pi*(ii + jj)); f#X`e'1  
    end
QMfYM~o  
end *FG@Dts^&  
F7"Ihb^l  
FT = fft2(f1.*in); }^LcKV  
88G[XkL$2  
out = f1.*FT; UdLC]  
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

求大神指教