twoseq Program

Variables

Type Attributes Name Initial
integer, parameter :: ngx = 6
integer, parameter :: ngy = 4
integer :: ier
integer :: nprocs
integer, dimension(:), pointer :: myids
integer :: comm1
integer :: comm2
integer :: asize
integer :: mysize
integer :: i
integer :: myproc
integer, dimension(1) :: start1
integer, dimension(1) :: length1
integer, dimension(:), pointer :: start2
integer, dimension(:), pointer :: length2
type(GlobalSegMap) :: GSmap1
type(GlobalSegMap) :: GSmap2
type(AttrVect) :: av1
type(AttrVect) :: av2
type(Rearranger) :: Rearr

Subroutines

subroutine model1(comm1, mod1av)

Arguments

Type IntentOptional Attributes Name
integer :: comm1
type(AttrVect) :: mod1av

subroutine model2(comm2, mod2av)

Arguments

Type IntentOptional Attributes Name
integer :: comm2
type(AttrVect) :: mod2av