diff --git a/cbind/amgprec/amg_dprec_cbind_mod.F90 b/cbind/amgprec/amg_dprec_cbind_mod.F90 index 8b98f7af..5b60f0a8 100644 --- a/cbind/amgprec/amg_dprec_cbind_mod.F90 +++ b/cbind/amgprec/amg_dprec_cbind_mod.F90 @@ -342,7 +342,7 @@ contains else nullify(s2p) end if - + write(0,*) 'krylov: s1 s2 ',associated(s1p),associated(s2p) call stringc2f(methd,fmethd) feps = eps fitmax = itmax