% Function Radix2 
% IFFT Size = 32
% InPut Sequence : Bit Reversed Order
% OutPut Sequence : Normal Order

function StageOut = Radix2IFFT(IFFT_Dat,SubCarrier)
Num = length(IFFT_Dat);
Si = Num/SubCarrier;

for ip=0:Si-1,
   
%Bit Reverse Order
%for k1 = 0 : 31,
%   k=k1;
%   b5=floor(k/16);
%   k=mod(k,16);
%   b4=floor(k/8);
%   k=mod(k,8);
%   b3=floor(k/4);
%   k=mod(k,4);
%   b2=floor(k/2);
%   k=mod(k,2);
%   b1=floor(k/1);
%   inversek=b1*2^4 + b2*2^3 + b3*2^2 + b4*2^1 + b5;
%   StageIn(SubCarrier*ip+k1+1)=IFFT_Dat(SubCarrier*ip+inversek+1);
%end;

%for Stage = 1 : 5,
%   for k = 0 : 31,
%      k1 = mod(k,2^(Stage-1)) + floor(k/2^Stage)*2^Stage + 1;
%      k2 = k1 + 2^(Stage-1);
%      ph = mod(k,(2^Stage))/(2^Stage);
%      StageOut(SubCarrier*ip+k+1) = StageIn(SubCarrier*ip+k1)...
%         + exp(j*2*pi*ph)*StageIn(SubCarrier*ip+k2);
%   end;
%   StageIn = StageOut;
%end;
StageOut(ip*SubCarrier+1:(ip+1)*SubCarrier) = ifft(IFFT_Dat(ip*SubCarrier+1:(ip+1)*SubCarrier));

end;

%StageOut=StageOut/SubCarrier;