function [Y_DeOFDM]=OFDM_Demodulator(data,NFFT,Ng,numcarr,Nr)

Y=[];
for RxAnt=1:Nr
    %y_vector=[];
    temp=data(RxAnt,:);
    %remove the guard interval
    x_remove_guard_interval=temp(Ng+1:NFFT+Ng);
    %fft
    x=fft(x_remove_guard_interval);
    %zero removing
    for i=1:numcarr
        y(i)=x(i+NFFT/2-numcarr/2);
    end
    Y=[Y;y];
    clear temp x_remove_guard_interval x y;
end
Y=reshape(Y,Nr*numcarr,1);
Y_DeOFDM=Y;
clear Y;