function Diag(const Mtx: TMtxInt; k: Integer): TVecInt;
Copies the k-th diagonal from the TMtxInt object.
| # | Name | Type | Description |
|---|---|---|---|
| 1 | Mtx | TMtxInt | |
| 2 | k | Integer |
Result: stored in self (calling object), returns self for chaining
Remarks:
Copies the k-th diagonal from the TMtxInt 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.
Examples
var a: TVecInt;
d: TMtxInt;
begin
CreateIt(a);
CreateIt(d);
try
// setup matrix
d.SetIt(2,2,[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;See Also: TMtx.Diag