Source position: types.inc line 185
type THessGrad = procedure(
X: TVector;
G: TVector;
H: TMatrix
);