Up \Signal

{@abstract(Derivatives and average routines)
author: Nikolai Shokhirev )
created: June 6, 2002)
last modified: July 16, 2003)
ŠNikolai V. Shokhirev, 2002-2003 }

unit uAverage;

interface
uses
  uMatTypes, uArrays;

  { two-point derivative: Ain[i+1]-Ain[i])/h }
  procedure deriv2(const Ain, Aout: IVector; h: TFloat = 1.0);
  { tree-point derivative: Ain[i+1]-Ain[i])/h }
  procedure deriv3(const Ain, Aout: IVector; h: TFloat = 1.0);
  { 5-point average. Ain can be equal to Aout }
  procedure Avg5(const Ain, Aout: IVector);
  { 5-point average derivative. Ain can be equal to Aout }
  procedure Avg5d(const Ain, Aout: IVector; h: TFloat = 1.0);
  { 5-point average the second derivative. Ain can be equal to Aout }
  procedure Avg5d2(const Ain, Aout: IVector; h: TFloat = 1.0);

  procedure Sharpen(const Ain, Aout: IVector);

implementation


end.

Up \Signal