var A,B: TMtxInt; begin CreateIt(A,B); try A.SetIt(2,1,[1,2, 2,4]); // 2x2, integer matrix B.LowerTriangle(A,True,True); // B becomes: // [1,0, // [2,4] finally FreeIt(A,B); end; end;