function retval = leastsqgrad(x)
% usage:  y = leastsqgrad(x)
% description: returns least squares
% function gradient

% no bulletproofing
retval = leastsqjac(x)'*leastsqvec(x);