psblas3:

Fixed TRANSP intent.

base/serial/impl/psb_c_mat_impl.F90

@@ -1613,7 +1613,7 @@ subroutine psb_c_transp_2mat(a,b)
     info = psb_err_alloc_dealloc_
     goto 9999
   end if
-  call a%a%transp_2mat(b%a)    
+  call a%a%transp(b%a)    
 
   call psb_erractionrestore(err_act)
   return
@@ -1694,7 +1694,7 @@ subroutine psb_c_transc_2mat(a,b)
     info = psb_err_alloc_dealloc_
     goto 9999
   end if
-  call a%a%transc_2mat(b%a)    
+  call a%a%transc(b%a)    
 
   call psb_erractionrestore(err_act)
   return

base/serial/impl/psb_d_mat_impl.F90

@@ -1612,7 +1612,7 @@ subroutine psb_d_transp_2mat(a,b)
     info = psb_err_alloc_dealloc_
     goto 9999
   end if
-  call a%a%transp_2mat(b%a)    
+  call a%a%transp(b%a)    
 
   call psb_erractionrestore(err_act)
   return
@@ -1693,7 +1693,7 @@ subroutine psb_d_transc_2mat(a,b)
     info = psb_err_alloc_dealloc_
     goto 9999
   end if
-  call a%a%transc_2mat(b%a)    
+  call a%a%transc(b%a)    
 
   call psb_erractionrestore(err_act)
   return

base/serial/impl/psb_s_mat_impl.F90

@@ -1611,7 +1611,7 @@ subroutine psb_s_transp_2mat(a,b)
     info = psb_err_alloc_dealloc_
     goto 9999
   end if
-  call a%a%transp_2mat(b%a)    
+  call a%a%transp(b%a)    
 
   call psb_erractionrestore(err_act)
   return
@@ -1692,7 +1692,7 @@ subroutine psb_s_transc_2mat(a,b)
     info = psb_err_alloc_dealloc_
     goto 9999
   end if
-  call a%a%transc_2mat(b%a)    
+  call a%a%transc(b%a)    
 
   call psb_erractionrestore(err_act)
   return

base/serial/impl/psb_z_mat_impl.F90

@@ -1611,7 +1611,7 @@ subroutine psb_z_transp_2mat(a,b)
     info = psb_err_alloc_dealloc_
     goto 9999
   end if
-  call a%a%transp_2mat(b%a)    
+  call a%a%transp(b%a)    
 
   call psb_erractionrestore(err_act)
   return
@@ -1692,7 +1692,7 @@ subroutine psb_z_transc_2mat(a,b)
     info = psb_err_alloc_dealloc_
     goto 9999
   end if
-  call a%a%transc_2mat(b%a)    
+  call a%a%transc(b%a)    
 
   call psb_erractionrestore(err_act)
   return