%******************************************************************
%
% insert Training Sequences
%******************************************************************
function [InsertTS] = Insert_Preamble(PP_A,data,Pilot_Distance,NofOFDMSymbol)


TS2_BeforeIFFT = []; %signal before IFFT
m = 0;
for i=0:NofOFDMSymbol-1;
    %data_temp=[];
    if (mod(i, Pilot_Distance)==0)
        TS2_BeforeIFFT = [TS2_BeforeIFFT; PP_A];
        m=m+1;
    else
        %data_temp(i,:)=data(i,:);
        TS2_BeforeIFFT = [TS2_BeforeIFFT; data(i-m+1,:)];
    end
end
InsertTS = TS2_BeforeIFFT;

clear PP_A TS2_BeforeIFFT;