diff --git a/mlprec/impl/smoother/mld_c_l1_jac_smoother_descr.f90 b/mlprec/impl/smoother/mld_c_l1_jac_smoother_descr.f90 index 1656652b..82fd358a 100644 --- a/mlprec/impl/smoother/mld_c_l1_jac_smoother_descr.f90 +++ b/mlprec/impl/smoother/mld_c_l1_jac_smoother_descr.f90 @@ -78,9 +78,9 @@ subroutine mld_c_l1_jac_smoother_descr(sm,info,iout,coarse) write(iout_,*) ' Local diagonal:' call smv%descr(info,iout_,coarse=coarse) class is (mld_c_bwgs_solver_type) - write(iout_,*) ' Hybrid Backward Gauss-Seidel ' + write(iout_,*) ' L1-Hybrid Backward Gauss-Seidel ' class is (mld_c_gs_solver_type) - write(iout_,*) ' Hybrid Forward Gauss-Seidel ' + write(iout_,*) ' L1-Hybrid Forward Gauss-Seidel ' class default write(iout_,*) ' L1-Block Jacobi ' write(iout_,*) ' Local solver details:' diff --git a/mlprec/impl/smoother/mld_d_l1_jac_smoother_descr.f90 b/mlprec/impl/smoother/mld_d_l1_jac_smoother_descr.f90 index 42b89793..8c6a9479 100644 --- a/mlprec/impl/smoother/mld_d_l1_jac_smoother_descr.f90 +++ b/mlprec/impl/smoother/mld_d_l1_jac_smoother_descr.f90 @@ -78,9 +78,9 @@ subroutine mld_d_l1_jac_smoother_descr(sm,info,iout,coarse) write(iout_,*) ' Local diagonal:' call smv%descr(info,iout_,coarse=coarse) class is (mld_d_bwgs_solver_type) - write(iout_,*) ' Hybrid Backward Gauss-Seidel ' + write(iout_,*) ' L1-Hybrid Backward Gauss-Seidel ' class is (mld_d_gs_solver_type) - write(iout_,*) ' Hybrid Forward Gauss-Seidel ' + write(iout_,*) ' L1-Hybrid Forward Gauss-Seidel ' class default write(iout_,*) ' L1-Block Jacobi ' write(iout_,*) ' Local solver details:' diff --git a/mlprec/impl/smoother/mld_s_l1_jac_smoother_descr.f90 b/mlprec/impl/smoother/mld_s_l1_jac_smoother_descr.f90 index 4b072054..9dc14726 100644 --- a/mlprec/impl/smoother/mld_s_l1_jac_smoother_descr.f90 +++ b/mlprec/impl/smoother/mld_s_l1_jac_smoother_descr.f90 @@ -78,9 +78,9 @@ subroutine mld_s_l1_jac_smoother_descr(sm,info,iout,coarse) write(iout_,*) ' Local diagonal:' call smv%descr(info,iout_,coarse=coarse) class is (mld_s_bwgs_solver_type) - write(iout_,*) ' Hybrid Backward Gauss-Seidel ' + write(iout_,*) ' L1-Hybrid Backward Gauss-Seidel ' class is (mld_s_gs_solver_type) - write(iout_,*) ' Hybrid Forward Gauss-Seidel ' + write(iout_,*) ' L1-Hybrid Forward Gauss-Seidel ' class default write(iout_,*) ' L1-Block Jacobi ' write(iout_,*) ' Local solver details:' diff --git a/mlprec/impl/smoother/mld_z_l1_jac_smoother_descr.f90 b/mlprec/impl/smoother/mld_z_l1_jac_smoother_descr.f90 index 5e4ec17d..b72a1503 100644 --- a/mlprec/impl/smoother/mld_z_l1_jac_smoother_descr.f90 +++ b/mlprec/impl/smoother/mld_z_l1_jac_smoother_descr.f90 @@ -78,9 +78,9 @@ subroutine mld_z_l1_jac_smoother_descr(sm,info,iout,coarse) write(iout_,*) ' Local diagonal:' call smv%descr(info,iout_,coarse=coarse) class is (mld_z_bwgs_solver_type) - write(iout_,*) ' Hybrid Backward Gauss-Seidel ' + write(iout_,*) ' L1-Hybrid Backward Gauss-Seidel ' class is (mld_z_gs_solver_type) - write(iout_,*) ' Hybrid Forward Gauss-Seidel ' + write(iout_,*) ' L1-Hybrid Forward Gauss-Seidel ' class default write(iout_,*) ' L1-Block Jacobi ' write(iout_,*) ' Local solver details:'