init_fill Subroutine

public subroutine init_fill(f, char, to_low, to_high, to_list, from_low, from_high, from_list, ierr)

Uses

FIXME : Add documentation

Arguments

Type IntentOptional Attributes Name
type(redist_type), intent(out) :: f
character(len=1), intent(in) :: char
integer, intent(in), dimension(:) :: to_low
integer, intent(in), dimension(:) :: to_high
type(index_list_type), intent(in), dimension (0:nproc-1) :: to_list
integer, intent(in), dimension(:) :: from_low
integer, intent(in), dimension(:) :: from_high
type(index_list_type), intent(in), dimension (0:nproc-1) :: from_list
integer, intent(out), optional :: ierr

Contents

Source Code

init_fill

Source Code

  subroutine init_fill (f, char, to_low, to_high, to_list, &
       from_low, from_high, from_list, ierr)
    use mp, only: nproc
    implicit none
    type (redist_type), intent (out) :: f
    character(1), intent (in) :: char
    type (index_list_type), dimension (0:nproc-1), intent (in) :: to_list, from_list
    integer, dimension(:), intent (in) :: to_low, from_low, to_high, from_high
    integer, optional, intent (out) :: ierr

    call init_redist(f, char, to_low, to_high, to_list, &
         from_low, from_high, from_list, ierr)
  end subroutine init_fill