Entry 3151

PETScSnippet

Submitted by anonymous on Feb. 8, 2010 at 11:26 p.m.
Language: C. Code size: 263 bytes.

if( SolvUsePCGILU == PETSC_TRUE){
  ierr = KSPSetType(ResSimSolver, KSPCG);CHKERRQ(ierr);
  ierr = KSPGetPC(ResSimSolver, &ResSimPrec);CHKERRQ(ierr);
  ierr = PCSetType(ResSimPrec, PCILU);CHKERRQ(ierr);
  ierr = PCFactorSetShiftPd(ResSimPrec,PETSC_TRUE);
}

This snippet took 0.01 seconds to highlight.

Back to the Entry List or Home.

Delete this entry (admin only).