
unit uVecMat;

{$MODE Delphi}

interface

const maxv=10; // maximum number of variables
      maxn=2000; // maximum number of samples

type real=extended;
     nvector=array[1..maxn] of real;
     distmatrix=array[1..maxn] of nvector;
     vvector=array[1..maxv] of real;
     datamatrix=array[1..maxn] of vvector;

implementation

end.

