fdurastante/psblas3
1
0
Fork 0
mirror of https://github.com/sfilippone/psblas3.git synced 2026-10-16 10:52:08 +00:00
Code Issues Packages Projects Releases Wiki Activity

Fix wrong subroutine name ref.

Browse Source
This commit is contained in:
Salvatore Filippone
2020-11-20 13:21:04 +01:00
parent 025a4b5512
commit e445819960
1 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files
base/internals/psi_bld_glb_dep_list.F90
+3 -3
View File
@@ -29,8 +29,8 @@
! POSSIBILITY OF SUCH DAMAGE.
!
!
subroutine psi_i_bld_glb_csr_dep_list(ctxt,loc_dl,length_dl,c_dep_list,dl_ptr,info)
use psi_mod, psb_protect_name => psi_i_bld_glb_csr_dep_list
subroutine psi_i_bld_glb_dep_list(ctxt,loc_dl,length_dl,c_dep_list,dl_ptr,info)
use psi_mod, psb_protect_name => psi_i_bld_glb_dep_list
#ifdef MPI_MOD
use mpi
#endif
@@ -123,4 +123,4 @@ subroutine psi_i_bld_glb_csr_dep_list(ctxt,loc_dl,length_dl,c_dep_list,dl_ptr,in
return
end subroutine psi_i_bld_glb_csr_dep_list
end subroutine psi_i_bld_glb_dep_list