function [xh] = lin_scale( xh, mNorm )

hNorm = sqrt(sum(xh.^2));

if hNorm,
    s = mNorm*1.2/hNorm;
    xh = xh.*s;
end
thomas-koehler
github-repos/MATLAB/thomas-koehler-SupER/SupER-d8c6f2e4b26db002ff55bc2beba18639f1d0bb49/matlab/algorithms/SRAlgorithms/ScSR/lin_scale.m
SupER
github-repos/MATLAB/thomas-koehler-SupER
d8c6f2e4b26db002ff55bc2beba18639f1d0bb49