function retval = conststep(fngrad,fn,x,p)
% usage:  alpha = conststep(fngrad,fn,x,p)
% description: returns constant step length alpha.
% Input parameters:
% fname: function name
% fpname: gradient function name
% x: starting point
% p: search direction

% global variables:
global parms;

retval = parms.const;
