annotate general/numerical/todbs.m @ 4:e44f49929e56

Adding reorganised general toolbox, now in several subdirectories.

function Y=h_todbs(X,dBs)
% todbs - Convert values to decibels 
%
% todbs :: 
%    real ~'dimensionless value', 
%    real ~'dynamic range in dB'
% -> real ~'value in dBs'.

if nargin>1,
	mmax=max(X(:));
	X=max(X,10^(-dBs/10)*mmax);
end
Y=10*log10(X);