Source position: utypes.pas line 58
procedure DimCompMatrix(
var A: TCompMatrix;
Ub1: Integer;
Ub2: Integer
);