diff --git a/code/config/numerics.config b/code/config/numerics.config index ea43cd561..e5a4937da 100644 --- a/code/config/numerics.config +++ b/code/config/numerics.config @@ -69,5 +69,5 @@ update_gamma 0 # Update Gamma-operator with current dPdF divergence_correction 0 # Use dimension-independent divergence criterion myspectralsolver basic # Type of spectral solver (basic: basic, basicPETSc: basic with PETSc, AL: augmented Lagrange) myfilter none # Type of filtering method to mitigate Gibb's phenomenon (none, cosine, ...) -petsc_options -snes_type ngmres -snes_ngmres_anderson -snes_view # PetSc solver options +petsc_options -snes_type ngmres -snes_ngmres_anderson # PetSc solver options regridMode 0 # 0: no regrid; 1: regrid if DAMASK doesn't converge; 2: regrid if DAMASK or BVP Solver doesn't converge diff --git a/code/debug.f90 b/code/debug.f90 index d3653ad7d..cf81df5b8 100644 --- a/code/debug.f90 +++ b/code/debug.f90 @@ -107,7 +107,7 @@ module debug #ifdef PETSc character(len=1024), parameter, public :: & - PETScDebug = ' -snes_view -snes_monitor' + PETScDebug = ' -snes_view -snes_monitor ' #endif public :: debug_init, & debug_reset, & diff --git a/code/numerics.f90 b/code/numerics.f90 index 6a4024fd7..eccc7398c 100644 --- a/code/numerics.f90 +++ b/code/numerics.f90 @@ -96,7 +96,7 @@ character(len=64), protected, public :: & myfilter = 'none' !< spectral filtering method character(len=1024), protected, public :: & petsc_options = '-snes_type ngmres & - -snes_ngmres_anderson ' + &-snes_ngmres_anderson ' integer(pInt), protected, public :: & fftw_planner_flag = 32_pInt, & !< conversion of fftw_plan_mode to integer, basically what is usually done in the include file of fftw itmax = 20_pInt, & !< maximum number of iterations