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