diff --git a/base/serial/impl/psb_c_mat_impl.F90 b/base/serial/impl/psb_c_mat_impl.F90
index b13476c0..350639ed 100644
--- a/base/serial/impl/psb_c_mat_impl.F90
+++ b/base/serial/impl/psb_c_mat_impl.F90
@@ -1112,9 +1112,6 @@ subroutine psb_c_b_csclip(a,b,info,&
 
 end subroutine psb_c_b_csclip
 
-
-
-
 subroutine psb_c_cscnv(a,b,info,type,mold,upd,dupl)
   use psb_error_mod
   use psb_string_mod
@@ -1197,7 +1194,7 @@ subroutine psb_c_cscnv(a,b,info,type,mold,upd,dupl)
 
   call move_alloc(altmp,b%a)
   call b%trim()
-  call b%asb() 
+  call b%set_asb() 
   call psb_erractionrestore(err_act)
   return
 
@@ -1208,8 +1205,6 @@ subroutine psb_c_cscnv(a,b,info,type,mold,upd,dupl)
 
 end subroutine psb_c_cscnv
 
-
-
 subroutine psb_c_cscnv_ip(a,info,type,mold,dupl)
   use psb_error_mod
   use psb_string_mod
@@ -1289,8 +1284,8 @@ subroutine psb_c_cscnv_ip(a,info,type,mold,dupl)
   end if
 
   call move_alloc(altmp,a%a)
-  call a%set_asb() 
   call a%trim()
+  call a%set_asb() 
   call psb_erractionrestore(err_act)
   return
 
diff --git a/base/serial/impl/psb_d_mat_impl.F90 b/base/serial/impl/psb_d_mat_impl.F90
index 313930b8..d63b8f26 100644
--- a/base/serial/impl/psb_d_mat_impl.F90
+++ b/base/serial/impl/psb_d_mat_impl.F90
@@ -1112,9 +1112,6 @@ subroutine psb_d_b_csclip(a,b,info,&
 
 end subroutine psb_d_b_csclip
 
-
-
-
 subroutine psb_d_cscnv(a,b,info,type,mold,upd,dupl)
   use psb_error_mod
   use psb_string_mod
@@ -1197,7 +1194,7 @@ subroutine psb_d_cscnv(a,b,info,type,mold,upd,dupl)
 
   call move_alloc(altmp,b%a)
   call b%trim()
-  call b%asb() 
+  call b%set_asb() 
   call psb_erractionrestore(err_act)
   return
 
@@ -1208,8 +1205,6 @@ subroutine psb_d_cscnv(a,b,info,type,mold,upd,dupl)
 
 end subroutine psb_d_cscnv
 
-
-
 subroutine psb_d_cscnv_ip(a,info,type,mold,dupl)
   use psb_error_mod
   use psb_string_mod
@@ -1289,8 +1284,8 @@ subroutine psb_d_cscnv_ip(a,info,type,mold,dupl)
   end if
 
   call move_alloc(altmp,a%a)
-  call a%set_asb() 
   call a%trim()
+  call a%set_asb() 
   call psb_erractionrestore(err_act)
   return
 
diff --git a/base/serial/impl/psb_s_mat_impl.F90 b/base/serial/impl/psb_s_mat_impl.F90
index aa08d787..a647cfbc 100644
--- a/base/serial/impl/psb_s_mat_impl.F90
+++ b/base/serial/impl/psb_s_mat_impl.F90
@@ -1112,9 +1112,6 @@ subroutine psb_s_b_csclip(a,b,info,&
 
 end subroutine psb_s_b_csclip
 
-
-
-
 subroutine psb_s_cscnv(a,b,info,type,mold,upd,dupl)
   use psb_error_mod
   use psb_string_mod
@@ -1197,7 +1194,7 @@ subroutine psb_s_cscnv(a,b,info,type,mold,upd,dupl)
 
   call move_alloc(altmp,b%a)
   call b%trim()
-  call b%asb() 
+  call b%set_asb() 
   call psb_erractionrestore(err_act)
   return
 
@@ -1208,8 +1205,6 @@ subroutine psb_s_cscnv(a,b,info,type,mold,upd,dupl)
 
 end subroutine psb_s_cscnv
 
-
-
 subroutine psb_s_cscnv_ip(a,info,type,mold,dupl)
   use psb_error_mod
   use psb_string_mod
@@ -1289,8 +1284,8 @@ subroutine psb_s_cscnv_ip(a,info,type,mold,dupl)
   end if
 
   call move_alloc(altmp,a%a)
-  call a%set_asb() 
   call a%trim()
+  call a%set_asb() 
   call psb_erractionrestore(err_act)
   return
 
diff --git a/base/serial/impl/psb_z_mat_impl.F90 b/base/serial/impl/psb_z_mat_impl.F90
index 0e24e924..8329e47c 100644
--- a/base/serial/impl/psb_z_mat_impl.F90
+++ b/base/serial/impl/psb_z_mat_impl.F90
@@ -1112,9 +1112,6 @@ subroutine psb_z_b_csclip(a,b,info,&
 
 end subroutine psb_z_b_csclip
 
-
-
-
 subroutine psb_z_cscnv(a,b,info,type,mold,upd,dupl)
   use psb_error_mod
   use psb_string_mod
@@ -1197,7 +1194,7 @@ subroutine psb_z_cscnv(a,b,info,type,mold,upd,dupl)
 
   call move_alloc(altmp,b%a)
   call b%trim()
-  call b%asb() 
+  call b%set_asb() 
   call psb_erractionrestore(err_act)
   return
 
@@ -1208,8 +1205,6 @@ subroutine psb_z_cscnv(a,b,info,type,mold,upd,dupl)
 
 end subroutine psb_z_cscnv
 
-
-
 subroutine psb_z_cscnv_ip(a,info,type,mold,dupl)
   use psb_error_mod
   use psb_string_mod
@@ -1289,8 +1284,8 @@ subroutine psb_z_cscnv_ip(a,info,type,mold,dupl)
   end if
 
   call move_alloc(altmp,a%a)
-  call a%set_asb() 
   call a%trim()
+  call a%set_asb() 
   call psb_erractionrestore(err_act)
   return