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