Add adjncy component

fnd_owner
Salvatore Filippone 5 years ago
parent 4366ac4948
commit b3d6a970ee

@ -127,7 +127,9 @@ module psb_indx_map_mod
integer(psb_ipk_), allocatable :: oracle(:,:) integer(psb_ipk_), allocatable :: oracle(:,:)
!> Halo owners !> Halo owners
integer(psb_ipk_), allocatable :: halo_owner(:) integer(psb_ipk_), allocatable :: halo_owner(:)
!> Adjacency list for processes
integer(psb_ipk_), allocatable :: p_adjncy(:)
contains contains
procedure, pass(idxmap) :: get_state => base_get_state procedure, pass(idxmap) :: get_state => base_get_state

Loading…
Cancel
Save