function vect = invquantization(levelNumbers, scaling)

%...'levelNumber' contains the the index of the quantized level for each sample
%...'scaling' contains 2 values, the lowest quant. value and delta
%...'vect' is vector containing the reconstructed values

[M,N] = size(levelNumbers);
if (M>1)
     levelNumbers = levelNumbers';
end

base  = scaling(1);
delta = scaling(2);

maxLevel = max(levelNumbers);

%scaledLevels = [base : delta : (base+delta*(maxLevel-1))]'+ delta/2;
scaledLevels = [base : delta : (base+delta*(maxLevel-1))];

if (length(scaledLevels)==0)
   vect = zeros(1,length(levelNumbers));  
else
   vect = scaledLevels(levelNumbers);
end  
   
if any(abs(levelNumbers) > length(scaledLevels))
   levelNumbers;
end