example_matrix_getset_extras.cpp

 
#include <cmath>
#include <Pds/Ra>
    
int main(void)
{
    Pds::Matrix A("0 3 6\n1 4 7\n2 5 8");
    
    A.Print("\nA=\n");
    
    Pds::Vector  C=A.GetColVector(1);
    C.Print("\nC=A.GetColVector(1)=\n");
 
    
    A.GetRowAsColVector(1).Print("\nA.GetRowAsColVector(1)\n");
    
    C.Fill(-1.0);
    A.SetColVector(2,C);
    A.Print("\nA=\n");
    
    Pds::Vector  D=A.GetDiagonal();
    D.Print("\nD=A.GetDiagonal()=\n");
    
    A.Print("A=\n");
    A.SetDiagonal(-1);
    A.Print("A=\n");
    
    return 0;
}