Source position: types.inc line 243
type TDerivProc = procedure(
X: Float;
Y: Float;
B: TVector;
D: TVector
);