Source position: uregtest.pas line 28
procedure WRegTest(
Y: TVector;
Ycalc: TVector;
S: TVector;
LbY: Integer;
UbY: Integer;
V: TMatrix;
LbV: Integer;
UbV: Integer;
var Test: TRegTest
);