Source position: uuqr.pas line 39
procedure QR_Solve(
Q: TMatrix;
R: TMatrix;
B: TVector;
Lb: Integer;
Ub1: Integer;
Ub2: Integer;
X: TVector
);