function [final]=fftenhance(image,f)
% Bc. Michal Kubiš
% Fakulta elektrotechniky a komunikačních technologií na VUT v Brně
% Vedoucí: Ing. Petr Fedra
% 
% 21. 5. 2010
% založeno na wuzhili

I = 255-double(image);
[w,h] = size(I);

w1=floor(w/32)*32;
h1=floor(h/32)*32;

inner = zeros(w1,h1);

for i=1:32:w1
   for j=1:32:h1
      a=i+31;
      b=j+31;
      F=fft2( I(i:a,j:b) );
      factor=abs(F).^f;
      block = abs(ifft2(F.*factor));
      
      larv=max(block(:));
      if larv==0
         larv=1;
      end;
      
      block= block./larv;
      inner(i:a,j:b) = block;
   end;
end;

final=inner*255;


final=histeq(uint8(final));

