diff --git a/mlprec/impl/level/mld_c_base_onelev_descr.f90 b/mlprec/impl/level/mld_c_base_onelev_descr.f90
index 7732ed1c..b72a7626 100644
--- a/mlprec/impl/level/mld_c_base_onelev_descr.f90
+++ b/mlprec/impl/level/mld_c_base_onelev_descr.f90
@@ -83,9 +83,9 @@ subroutine mld_c_base_onelev_descr(lv,il,nl,ilmin,info,iout)
 
     if (nl > 1) then 
       if (allocated(lv%map%naggr)) then
-        write(iout_,*) '  Coarse Matrix: Dimension: ', &
+        write(iout_,*) '  Coarse Matrix: Global size: ', &
              &  sum(lv%map%naggr(:)),' Nonzeros: ',lv%ac_nz_tot
-        write(iout_,*) '  Sizes of aggregates: ', &
+        write(iout_,*) '          Local matrix sizes: ', &
              &  lv%map%naggr(:)
         write(iout_,*) '  Aggregation   ratio: ', &
              &  lv%szratio
diff --git a/mlprec/impl/level/mld_d_base_onelev_descr.f90 b/mlprec/impl/level/mld_d_base_onelev_descr.f90
index 33743c0c..6ee9a47f 100644
--- a/mlprec/impl/level/mld_d_base_onelev_descr.f90
+++ b/mlprec/impl/level/mld_d_base_onelev_descr.f90
@@ -83,9 +83,9 @@ subroutine mld_d_base_onelev_descr(lv,il,nl,ilmin,info,iout)
 
     if (nl > 1) then 
       if (allocated(lv%map%naggr)) then
-        write(iout_,*) '  Coarse Matrix: Dimension: ', &
+        write(iout_,*) '  Coarse Matrix: Global size: ', &
              &  sum(lv%map%naggr(:)),' Nonzeros: ',lv%ac_nz_tot
-        write(iout_,*) '  Sizes of aggregates: ', &
+        write(iout_,*) '          Local matrix sizes: ', &
              &  lv%map%naggr(:)
         write(iout_,*) '  Aggregation   ratio: ', &
              &  lv%szratio
diff --git a/mlprec/impl/level/mld_s_base_onelev_descr.f90 b/mlprec/impl/level/mld_s_base_onelev_descr.f90
index fcb7c4a5..804bc5d5 100644
--- a/mlprec/impl/level/mld_s_base_onelev_descr.f90
+++ b/mlprec/impl/level/mld_s_base_onelev_descr.f90
@@ -83,9 +83,9 @@ subroutine mld_s_base_onelev_descr(lv,il,nl,ilmin,info,iout)
 
     if (nl > 1) then 
       if (allocated(lv%map%naggr)) then
-        write(iout_,*) '  Coarse Matrix: Dimension: ', &
+        write(iout_,*) '  Coarse Matrix: Global size: ', &
              &  sum(lv%map%naggr(:)),' Nonzeros: ',lv%ac_nz_tot
-        write(iout_,*) '  Sizes of aggregates: ', &
+        write(iout_,*) '          Local matrix sizes: ', &
              &  lv%map%naggr(:)
         write(iout_,*) '  Aggregation   ratio: ', &
              &  lv%szratio
diff --git a/mlprec/impl/level/mld_z_base_onelev_descr.f90 b/mlprec/impl/level/mld_z_base_onelev_descr.f90
index 05856176..6aac3afc 100644
--- a/mlprec/impl/level/mld_z_base_onelev_descr.f90
+++ b/mlprec/impl/level/mld_z_base_onelev_descr.f90
@@ -83,9 +83,9 @@ subroutine mld_z_base_onelev_descr(lv,il,nl,ilmin,info,iout)
 
     if (nl > 1) then 
       if (allocated(lv%map%naggr)) then
-        write(iout_,*) '  Coarse Matrix: Dimension: ', &
+        write(iout_,*) '  Coarse Matrix: Global size: ', &
              &  sum(lv%map%naggr(:)),' Nonzeros: ',lv%ac_nz_tot
-        write(iout_,*) '  Sizes of aggregates: ', &
+        write(iout_,*) '          Local matrix sizes: ', &
              &  lv%map%naggr(:)
         write(iout_,*) '  Aggregation   ratio: ', &
              &  lv%szratio
diff --git a/mlprec/mld_base_prec_type.F90 b/mlprec/mld_base_prec_type.F90
index e4b4ed45..1a4b60b7 100644
--- a/mlprec/mld_base_prec_type.F90
+++ b/mlprec/mld_base_prec_type.F90
@@ -545,6 +545,7 @@ contains
     info = psb_success_
     if ((pm%ml_cycle>=mld_no_ml_).and.(pm%ml_cycle<=mld_max_ml_cycle_)) then
 
+      
       write(iout,*) '  Multilevel cycle: ',&
            &   ml_names(pm%ml_cycle)
       select case (pm%ml_cycle)