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

Merged encapsluation fixes in desc_type from trunk.

Browse Source
This commit is contained in:
Salvatore Filippone
2008-09-23 11:14:37 +00:00
parent 7c38528a66
commit 7461cd9c5e
42 changed files with 1643 additions and 494 deletions
Download Patch File Download Diff File Expand all files Collapse all files
base/modules/psi_mod.f90
+11 -3
View File
@@ -473,12 +473,20 @@ module psi_mod
end subroutine psi_ldsc_pre_halo
end interface
interface psi_bld_hash
subroutine psi_bld_hash(desc,info)
!!$ interface psi_bld_hash
!!$ subroutine psi_bld_hash(desc,info)
!!$ use psb_descriptor_type, only : psb_desc_type, psb_spk_, psb_dpk_
!!$ type(psb_desc_type), intent(inout) :: desc
!!$ integer, intent(out) :: info
!!$ end subroutine psi_bld_hash
!!$ end interface
interface psi_bld_g2lmap
subroutine psi_bld_g2lmap(desc,info)
use psb_descriptor_type, only : psb_desc_type, psb_spk_, psb_dpk_
type(psb_desc_type), intent(inout) :: desc
integer, intent(out) :: info
end subroutine psi_bld_hash
end subroutine psi_bld_g2lmap
end interface
interface psi_bld_tmphalo