Subversion Repositories slepc-dev

Rev

Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 1940 Rev 1942
Line 59... Line 59... 
    { MatGetDiagonal_QEPLINEAR_H1A, MatGetDiagonal_QEPLINEAR_H1B },
 
    { MatGetDiagonal_QEPLINEAR_H1A, MatGetDiagonal_QEPLINEAR_H1B },
 
    { MatGetDiagonal_QEPLINEAR_H2A, MatGetDiagonal_QEPLINEAR_H2B }
 
    { MatGetDiagonal_QEPLINEAR_H2A, MatGetDiagonal_QEPLINEAR_H2B }
 
  };
 
  };
 
 
 
 
 
  PetscFunctionBegin;
 
  PetscFunctionBegin;
 
 
 
  if (!qep->which) qep->which = QEP_LARGEST_MAGNITUDE;
 
  ctx->M = qep->M;
 
  ctx->M = qep->M;
 
  ctx->C = qep->C;
 
  ctx->C = qep->C;
 
  ctx->K = qep->K;
 
  ctx->K = qep->K;
 
  ctx->sfactor = qep->sfactor;
 
  ctx->sfactor = qep->sfactor;