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