function fhat = fft2_arb(x)
% fft_arb -- FFT for arbitrary length sequence
%	fhat = fft_arb(x)
% Input
%	x		array(p,p)
% Output
%	fhat 	FFT of length p* p
%

fhat = zeros(size(x));
p    = size(x,1);
for i=1:p,
	y(i,:) = fft_arb(x(i,:));
end
for j=1:p,
	y(:,j) = fft_arb(x(:,j));
end

% Copyright 2000 David L. Donoho
%% Part of BeamLab Version:200% Built:Friday,23-Aug-2002 00:00:00% This is Copyrighted Material% For Copying permissions see COPYING.m% Comments? e-mail beamlab@stat.stanford.edu%%% Part of BeamLab Version:200% Built:Saturday,14-Sep-2002 00:00:00% This is Copyrighted Material% For Copying permissions see COPYING.m% Comments? e-mail beamlab@stat.stanford.edu%