Source position: utypes.pas line 52
procedure DimMatrix(
var A: TMatrix;
Ub1: Integer;
Ub2: Integer
);