— Loadable Function: y = fsumsq (x,dim)

Sum of squares of elements along dimension dim. If dim is omitted, it defaults to 1 (column-wise sum of squares). This function is equivalent to computing

          fsum (x .* fconj (x), dim)

but it uses less memory and avoids calling fconj if x is real.