diff --git a/src/cmfd_slepc_solver.F90 b/src/cmfd_slepc_solver.F90 index dd913a3d52..d081b70a49 100644 --- a/src/cmfd_slepc_solver.F90 +++ b/src/cmfd_slepc_solver.F90 @@ -116,7 +116,7 @@ call timer_start(time_cmfd) call KSPSetType(ksp,KSPGMRES,ierr) ! set precursor type - call PCSetType(pc,PCBJACOBI,ierr) + call PCSetType(pc,PCHYPRE,ierr) call PCSetFromOptions(pc,ierr) ! get all types and print