Subversion Repositories slepc-dev

Rev

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

Rev 1422 Rev 1437
Line 54... Line 54...
 
 
  /* reset the convergence flag from the previous solves */
  /* reset the convergence flag from the previous solves */
  eps->reason = EPS_CONVERGED_ITERATING;
  eps->reason = EPS_CONVERGED_ITERATING;
 
 
  if (!eps->setupcalled){ ierr = EPSSetUp(eps);CHKERRQ(ierr); }
  if (!eps->setupcalled){ ierr = EPSSetUp(eps);CHKERRQ(ierr); }
  ierr = STResetOperationCounters(eps->OP);
  ierr = STResetOperationCounters(eps->OP);CHKERRQ(ierr);
 
  ierr = IPResetOperationCounters(eps->ip);CHKERRQ(ierr);
  eps->nv = eps->ncv;
  eps->nv = eps->ncv;
  eps->evecsavailable = PETSC_FALSE;
  eps->evecsavailable = PETSC_FALSE;
  eps->nconv = 0;
  eps->nconv = 0;
  eps->its = 0;
  eps->its = 0;
  for (i=0;i<eps->ncv;i++) eps->eigr[i]=eps->eigi[i]=eps->errest[i]=0.0;
  for (i=0;i<eps->ncv;i++) eps->eigr[i]=eps->eigi[i]=eps->errest[i]=0.0;