You are here: Symbol Reference > MtxVec Namespace > Classes > TVec Class > public > TVec.Diag Method
MtxVec VCL
ContentsIndex
PreviousUpNext
TVec.Diag Method

Copies the k-th diagonal from the TMtx object.

Pascal
function Diag(const Mtx: TMtx; k: integer): TVec;

Copies the k-th diagonal from the TMtx object. If k = 0 then the main diagonal is copied, if k < 0 then the subdiagonal is copied and if k > 0 then the k-th super diagonal is copied to the calling vector.

In the following example we setup a matrix, populate it with values and then extract it's main diagonal to a vector.

var a: TVec; d: TMtx; begin CreateIt(a); CreateIt(d); try // setup matrix d.SetIt(2,2,False,[1,-2, 3, 4]); // get main diagonal from matrix a.Diag(d,0); // a now containes [1,4]; finally FreeIt(a); FreeIt(d); end; end;
Examples on GitHub
Copyright (c) 1999-2024 by Dew Research. All rights reserved.
What do you think about this topic? Send feedback!