ComputeNormFact

 Compute factor to normalize transmit power.

 function [ norm_fact ] = ComputeNormFact( Para )

 Input arguments:

   Para: structure containing the modulation parameters.

 Outputs arguments:

   norm_fact: normalization factor

0001 function [ norm_fact ] = ComputeNormFact( Para )
0002 % Compute factor to normalize transmit power.
0003 %
0004 % function [ norm_fact ] = ComputeNormFact( Para )
0005 %
0006 % Input arguments:
0007 %
0008 %   Para: structure containing the modulation parameters.
0009 %
0010 % Outputs arguments:
0011 %
0012 %   norm_fact: normalization factor
0013 
0014 % This file is part of WaveComBox: www.wavecombox.com and is distributed under the terms of the MIT license. See accompanying LICENSE file.
0015 % Original author: François Rottenberg, June 20, 2018.
0016 % Contributors:
0017 % Change log:
0018 
0019 
0020 % power normalization
0021 proto_filt = protofilter_design(Para);%generate prototype filter
0022 modulated_filters = modulate_proto_filt(proto_filt, Para);
0023 NsubCar = Para.SubBandWidth*Para.NbSubBands;
0024 iSubBand=1;
0025 G_i= toeplitz([modulated_filters(iSubBand,:) zeros(1,Para.nSubcarriers-1)],[modulated_filters(iSubBand,1) zeros(1,Para.nSubcarriers-1)]) ;
0026 B=1/sqrt(Para.nSubcarriers).*fft(G_i');
0027 index=(iSubBand-1)*Para.SubBandWidth+(Para.nSubcarriers-NsubCar)/2+1:(iSubBand-1)*Para.SubBandWidth+(Para.nSubcarriers-NsubCar)/2+Para.SubBandWidth;
0028 norm_fact=sum(diag(B(index,:)*B(index,:)'));
0029 
0030 norm_fact=sqrt(Para.SubBandWidth*Para.Es/norm_fact);
0031 
0032 end
0033