diff --git a/base/modules/psblas/psb_c_psblas_mod.F90 b/base/modules/psblas/psb_c_psblas_mod.F90
index d660597a..7f7f937c 100644
--- a/base/modules/psblas/psb_c_psblas_mod.F90
+++ b/base/modules/psblas/psb_c_psblas_mod.F90
@@ -143,7 +143,7 @@ module psb_c_psblas_mod
     end subroutine psb_caxpby
   end interface
 
-  interface psb_abgdxyx
+  interface psb_abgdxyz
     subroutine psb_cabgdxyz_vect(alpha, beta, gamma, delta, x, y, z,&
          & desc_a, info)
       import :: psb_desc_type, psb_spk_, psb_ipk_, &
@@ -155,7 +155,7 @@ module psb_c_psblas_mod
       type(psb_desc_type), intent (in)      :: desc_a
       integer(psb_ipk_), intent(out)        :: info
     end subroutine psb_cabgdxyz_vect
-  end interface psb_abgdxyx
+  end interface psb_abgdxyz
   
   interface psb_geamax
     function psb_camax(x, desc_a, info, jx,global)
diff --git a/base/modules/psblas/psb_d_psblas_mod.F90 b/base/modules/psblas/psb_d_psblas_mod.F90
index 734ed633..12090956 100644
--- a/base/modules/psblas/psb_d_psblas_mod.F90
+++ b/base/modules/psblas/psb_d_psblas_mod.F90
@@ -143,7 +143,7 @@ module psb_d_psblas_mod
     end subroutine psb_daxpby
   end interface
 
-  interface psb_abgdxyx
+  interface psb_abgdxyz
     subroutine psb_dabgdxyz_vect(alpha, beta, gamma, delta, x, y, z,&
          & desc_a, info)
       import :: psb_desc_type, psb_dpk_, psb_ipk_, &
@@ -155,7 +155,7 @@ module psb_d_psblas_mod
       type(psb_desc_type), intent (in)      :: desc_a
       integer(psb_ipk_), intent(out)        :: info
     end subroutine psb_dabgdxyz_vect
-  end interface psb_abgdxyx
+  end interface psb_abgdxyz
   
   interface psb_geamax
     function psb_damax(x, desc_a, info, jx,global)
diff --git a/base/modules/psblas/psb_s_psblas_mod.F90 b/base/modules/psblas/psb_s_psblas_mod.F90
index 0f7d29e6..7a7ce783 100644
--- a/base/modules/psblas/psb_s_psblas_mod.F90
+++ b/base/modules/psblas/psb_s_psblas_mod.F90
@@ -143,7 +143,7 @@ module psb_s_psblas_mod
     end subroutine psb_saxpby
   end interface
 
-  interface psb_abgdxyx
+  interface psb_abgdxyz
     subroutine psb_sabgdxyz_vect(alpha, beta, gamma, delta, x, y, z,&
          & desc_a, info)
       import :: psb_desc_type, psb_spk_, psb_ipk_, &
@@ -155,7 +155,7 @@ module psb_s_psblas_mod
       type(psb_desc_type), intent (in)      :: desc_a
       integer(psb_ipk_), intent(out)        :: info
     end subroutine psb_sabgdxyz_vect
-  end interface psb_abgdxyx
+  end interface psb_abgdxyz
   
   interface psb_geamax
     function psb_samax(x, desc_a, info, jx,global)
diff --git a/base/modules/psblas/psb_z_psblas_mod.F90 b/base/modules/psblas/psb_z_psblas_mod.F90
index 17674600..bcfe9caa 100644
--- a/base/modules/psblas/psb_z_psblas_mod.F90
+++ b/base/modules/psblas/psb_z_psblas_mod.F90
@@ -143,7 +143,7 @@ module psb_z_psblas_mod
     end subroutine psb_zaxpby
   end interface
 
-  interface psb_abgdxyx
+  interface psb_abgdxyz
     subroutine psb_zabgdxyz_vect(alpha, beta, gamma, delta, x, y, z,&
          & desc_a, info)
       import :: psb_desc_type, psb_dpk_, psb_ipk_, &
@@ -155,7 +155,7 @@ module psb_z_psblas_mod
       type(psb_desc_type), intent (in)      :: desc_a
       integer(psb_ipk_), intent(out)        :: info
     end subroutine psb_zabgdxyz_vect
-  end interface psb_abgdxyx
+  end interface psb_abgdxyz
   
   interface psb_geamax
     function psb_zamax(x, desc_a, info, jx,global)