Change name to psb_simple_triad

base/modules/penv/psi_c_collective_mod.F90

@@ -67,9 +67,9 @@ module psi_c_collective_mod
     module procedure psb_c_simple_a2av
   end interface psb_simple_a2av
 
-  interface psb_triad_a2av
-    module procedure psb_c_e_triad_a2av, psb_c_m_triad_a2av
-  end interface psb_triad_a2av
+  interface psb_simple_triad_a2av
+    module procedure psb_c_e_simple_triad_a2av, psb_c_m_simple_triad_a2av
+  end interface psb_simple_triad_a2av
 
 
 contains 
@@ -901,7 +901,7 @@ contains
 
   end subroutine psb_c_simple_a2av
 
-  subroutine psb_c_m_triad_a2av(valsnd,iasnd,jasnd,sdsz,bsdindx,&
+  subroutine psb_c_m_simple_triad_a2av(valsnd,iasnd,jasnd,sdsz,bsdindx,&
        & valrcv,iarcv,jarcv,rvsz,brvindx,ictxt,info)
 #ifdef MPI_MOD
     use mpi
@@ -982,9 +982,9 @@ contains
       end if
     Enddo
 
-  end subroutine psb_c_m_triad_a2av
+  end subroutine psb_c_m_simple_triad_a2av
 
-  subroutine psb_c_e_triad_a2av(valsnd,iasnd,jasnd,sdsz,bsdindx,&
+  subroutine psb_c_e_simple_triad_a2av(valsnd,iasnd,jasnd,sdsz,bsdindx,&
        & valrcv,iarcv,jarcv,rvsz,brvindx,ictxt,info)
 #ifdef MPI_MOD
     use mpi
@@ -1065,7 +1065,7 @@ contains
       end if
     Enddo
 
-  end subroutine psb_c_e_triad_a2av
+  end subroutine psb_c_e_simple_triad_a2av
 
   
 end module psi_c_collective_mod

base/modules/penv/psi_d_collective_mod.F90

@@ -81,9 +81,9 @@ module psi_d_collective_mod
     module procedure psb_d_simple_a2av
   end interface psb_simple_a2av
 
-  interface psb_triad_a2av
-    module procedure psb_d_e_triad_a2av, psb_d_m_triad_a2av
-  end interface psb_triad_a2av
+  interface psb_simple_triad_a2av
+    module procedure psb_d_e_simple_triad_a2av, psb_d_m_simple_triad_a2av
+  end interface psb_simple_triad_a2av
 
 
 contains 
@@ -1392,7 +1392,7 @@ contains
 
   end subroutine psb_d_simple_a2av
 
-  subroutine psb_d_m_triad_a2av(valsnd,iasnd,jasnd,sdsz,bsdindx,&
+  subroutine psb_d_m_simple_triad_a2av(valsnd,iasnd,jasnd,sdsz,bsdindx,&
        & valrcv,iarcv,jarcv,rvsz,brvindx,ictxt,info)
 #ifdef MPI_MOD
     use mpi
@@ -1473,9 +1473,9 @@ contains
       end if
     Enddo
 
-  end subroutine psb_d_m_triad_a2av
+  end subroutine psb_d_m_simple_triad_a2av
 
-  subroutine psb_d_e_triad_a2av(valsnd,iasnd,jasnd,sdsz,bsdindx,&
+  subroutine psb_d_e_simple_triad_a2av(valsnd,iasnd,jasnd,sdsz,bsdindx,&
        & valrcv,iarcv,jarcv,rvsz,brvindx,ictxt,info)
 #ifdef MPI_MOD
     use mpi
@@ -1556,7 +1556,7 @@ contains
       end if
     Enddo
 
-  end subroutine psb_d_e_triad_a2av
+  end subroutine psb_d_e_simple_triad_a2av
 
   
 end module psi_d_collective_mod

base/modules/penv/psi_e_collective_mod.F90

@@ -77,9 +77,9 @@ module psi_e_collective_mod
     module procedure psb_e_simple_a2av
   end interface psb_simple_a2av
 
-  interface psb_triad_a2av
-    module procedure psb_e_e_triad_a2av, psb_e_m_triad_a2av
-  end interface psb_triad_a2av
+  interface psb_simple_triad_a2av
+    module procedure psb_e_e_simple_triad_a2av, psb_e_m_simple_triad_a2av
+  end interface psb_simple_triad_a2av
 
 
 contains 
@@ -1269,7 +1269,7 @@ contains
 
   end subroutine psb_e_simple_a2av
 
-  subroutine psb_e_m_triad_a2av(valsnd,iasnd,jasnd,sdsz,bsdindx,&
+  subroutine psb_e_m_simple_triad_a2av(valsnd,iasnd,jasnd,sdsz,bsdindx,&
        & valrcv,iarcv,jarcv,rvsz,brvindx,ictxt,info)
 #ifdef MPI_MOD
     use mpi
@@ -1350,9 +1350,9 @@ contains
       end if
     Enddo
 
-  end subroutine psb_e_m_triad_a2av
+  end subroutine psb_e_m_simple_triad_a2av
 
-  subroutine psb_e_e_triad_a2av(valsnd,iasnd,jasnd,sdsz,bsdindx,&
+  subroutine psb_e_e_simple_triad_a2av(valsnd,iasnd,jasnd,sdsz,bsdindx,&
        & valrcv,iarcv,jarcv,rvsz,brvindx,ictxt,info)
 #ifdef MPI_MOD
     use mpi
@@ -1433,7 +1433,7 @@ contains
       end if
     Enddo
 
-  end subroutine psb_e_e_triad_a2av
+  end subroutine psb_e_e_simple_triad_a2av
 
   
 end module psi_e_collective_mod

base/modules/penv/psi_m_collective_mod.F90

@@ -77,9 +77,9 @@ module psi_m_collective_mod
     module procedure psb_m_simple_a2av
   end interface psb_simple_a2av
 
-  interface psb_triad_a2av
-    module procedure psb_m_e_triad_a2av, psb_m_m_triad_a2av
-  end interface psb_triad_a2av
+  interface psb_simple_triad_a2av
+    module procedure psb_m_e_simple_triad_a2av, psb_m_m_simple_triad_a2av
+  end interface psb_simple_triad_a2av
 
 
 contains 
@@ -1269,7 +1269,7 @@ contains
 
   end subroutine psb_m_simple_a2av
 
-  subroutine psb_m_m_triad_a2av(valsnd,iasnd,jasnd,sdsz,bsdindx,&
+  subroutine psb_m_m_simple_triad_a2av(valsnd,iasnd,jasnd,sdsz,bsdindx,&
        & valrcv,iarcv,jarcv,rvsz,brvindx,ictxt,info)
 #ifdef MPI_MOD
     use mpi
@@ -1350,9 +1350,9 @@ contains
       end if
     Enddo
 
-  end subroutine psb_m_m_triad_a2av
+  end subroutine psb_m_m_simple_triad_a2av
 
-  subroutine psb_m_e_triad_a2av(valsnd,iasnd,jasnd,sdsz,bsdindx,&
+  subroutine psb_m_e_simple_triad_a2av(valsnd,iasnd,jasnd,sdsz,bsdindx,&
        & valrcv,iarcv,jarcv,rvsz,brvindx,ictxt,info)
 #ifdef MPI_MOD
     use mpi
@@ -1433,7 +1433,7 @@ contains
       end if
     Enddo
 
-  end subroutine psb_m_e_triad_a2av
+  end subroutine psb_m_e_simple_triad_a2av
 
   
 end module psi_m_collective_mod

base/modules/penv/psi_s_collective_mod.F90

@@ -81,9 +81,9 @@ module psi_s_collective_mod
     module procedure psb_s_simple_a2av
   end interface psb_simple_a2av
 
-  interface psb_triad_a2av
-    module procedure psb_s_e_triad_a2av, psb_s_m_triad_a2av
-  end interface psb_triad_a2av
+  interface psb_simple_triad_a2av
+    module procedure psb_s_e_simple_triad_a2av, psb_s_m_simple_triad_a2av
+  end interface psb_simple_triad_a2av
 
 
 contains 
@@ -1392,7 +1392,7 @@ contains
 
   end subroutine psb_s_simple_a2av
 
-  subroutine psb_s_m_triad_a2av(valsnd,iasnd,jasnd,sdsz,bsdindx,&
+  subroutine psb_s_m_simple_triad_a2av(valsnd,iasnd,jasnd,sdsz,bsdindx,&
        & valrcv,iarcv,jarcv,rvsz,brvindx,ictxt,info)
 #ifdef MPI_MOD
     use mpi
@@ -1473,9 +1473,9 @@ contains
       end if
     Enddo
 
-  end subroutine psb_s_m_triad_a2av
+  end subroutine psb_s_m_simple_triad_a2av
 
-  subroutine psb_s_e_triad_a2av(valsnd,iasnd,jasnd,sdsz,bsdindx,&
+  subroutine psb_s_e_simple_triad_a2av(valsnd,iasnd,jasnd,sdsz,bsdindx,&
        & valrcv,iarcv,jarcv,rvsz,brvindx,ictxt,info)
 #ifdef MPI_MOD
     use mpi
@@ -1556,7 +1556,7 @@ contains
       end if
     Enddo
 
-  end subroutine psb_s_e_triad_a2av
+  end subroutine psb_s_e_simple_triad_a2av
 
   
 end module psi_s_collective_mod

base/modules/penv/psi_z_collective_mod.F90

@@ -67,9 +67,9 @@ module psi_z_collective_mod
     module procedure psb_z_simple_a2av
   end interface psb_simple_a2av
 
-  interface psb_triad_a2av
-    module procedure psb_z_e_triad_a2av, psb_z_m_triad_a2av
-  end interface psb_triad_a2av
+  interface psb_simple_triad_a2av
+    module procedure psb_z_e_simple_triad_a2av, psb_z_m_simple_triad_a2av
+  end interface psb_simple_triad_a2av
 
 
 contains 
@@ -901,7 +901,7 @@ contains
 
   end subroutine psb_z_simple_a2av
 
-  subroutine psb_z_m_triad_a2av(valsnd,iasnd,jasnd,sdsz,bsdindx,&
+  subroutine psb_z_m_simple_triad_a2av(valsnd,iasnd,jasnd,sdsz,bsdindx,&
        & valrcv,iarcv,jarcv,rvsz,brvindx,ictxt,info)
 #ifdef MPI_MOD
     use mpi
@@ -982,9 +982,9 @@ contains
       end if
     Enddo
 
-  end subroutine psb_z_m_triad_a2av
+  end subroutine psb_z_m_simple_triad_a2av
 
-  subroutine psb_z_e_triad_a2av(valsnd,iasnd,jasnd,sdsz,bsdindx,&
+  subroutine psb_z_e_simple_triad_a2av(valsnd,iasnd,jasnd,sdsz,bsdindx,&
        & valrcv,iarcv,jarcv,rvsz,brvindx,ictxt,info)
 #ifdef MPI_MOD
     use mpi
@@ -1065,7 +1065,7 @@ contains
       end if
     Enddo
 
-  end subroutine psb_z_e_triad_a2av
+  end subroutine psb_z_e_simple_triad_a2av
 
   
 end module psi_z_collective_mod