subroutine nrmscl - j.f.chandler - 1980 jan
derived from m.e.ash   nov 1969    subroutine nrmsav
scale the coefficient matrix and right side of the normal eqs
option with nsize .ne. nparam used only for call from pprctl

b - normal equation matrix (of size nsize)
scale(i)=1/sqrt(diagonal element i)   (output)
nsize - number of normal equations
side - vector of right hand sides
msize - if 0 then no rhs
print - if true then print scale factors