TMtx.Diag Method

Summary

Sets the matrix diagonal to values from the vector.

Class
TMtx

Declaration

Function Diag(Vec: TVec; k: integer): TMtx;

Description

Sets the k-th diagonal of the calling matrix to values from from the Vec object. If k = 0 then the main diagonal matrix is set, if k < 0 then the k-th subdiagonal matrix is set and if k > 0 the then the k-th super diagonal is set. The matrix must be large enough to hold diagonal or an exception is raised.

See Also
Diag

Example 1

      var A: TMtx;
          D: TVec;
      begin
        CreateIt(A);
        CreateIt(D);
        try
          A.SetIt(2,2,True,[1,1, 2,1,
                           1,2, 2,2]);
          D.SetIt(2,  True,[2,2, 1,1]);
          A.Diag(D,0);
          // A becomes:
          // [2,2, 2,1]
          // [1,2, 1,1]
        finally
          FreeIt(D);
          FreeIt(A);
        end;
      end;