Method Extract

SRC/matrix/Matrix.cpp:1745–1778

int
Matrix::Extract(const Matrix &V, int init_row, int init_col, double fact) 
{
  int pos_Rows, pos_Cols;
  int res = 0;
  
  int VnumRows = V.numRows;
  int VnumCols = V.numCols;
  
  int final_row = init_row + numRows - 1;
  int final_col = init_col + numCols - 1;
  
  if ((init_row >= 0) && (final_row < VnumRows) && (init_col >= 0) && (final_col < VnumCols))
  {
     for (int i=0; i<numCols; i++) 
     {
        pos_Cols = init_col + i;
        for (int j=0; j<numRows; j++) 
        {
           pos_Rows = init_row + j;
      
	   (*this)(j,i) = V(pos_Rows,pos_Cols)*fact;
        }
     }
  }  
  else 
  {
     opserr << "WARNING: Matrix::Extract(const Matrix &V, int init_row, int init_col, double fact): ";
     opserr << "position outside bounds \n";
     res = -1;
  }

  return res;
}


Matrix operator*(double a, const Matrix &V)