DIST_SPEC_CONTROL_MOD Module


Used by

  • module~~dist_spec_control_mod~2~~UsedByGraph module~dist_spec_control_mod~2 DIST_SPEC_CONTROL_MOD proc~dist_spec DIST_SPEC proc~dist_spec->module~dist_spec_control_mod~2 proc~dist_spec~2 DIST_SPEC proc~dist_spec~2->module~dist_spec_control_mod~2 proc~edist_spec EDIST_SPEC proc~edist_spec->module~dist_spec_control_mod~2 proc~edist_spec~2 EDIST_SPEC proc~edist_spec~2->module~dist_spec_control_mod~2

Subroutines

public subroutine DIST_SPEC_CONTROL(PSPECG, KFDISTG, KFROM, KVSET, PSPEC, LDIM1_IS_FLD, KSMAX, KSPEC2, KSPEC2MX, KSPEC2G, KPOSSP, KDIM0G, KUMPP, KALLMS, KPTRMS, KN, KSORT)

*** DIST_SPEC_CONTROL - Distribute global spectral array among processors

Read more…

Arguments

Type IntentOptional Attributes Name
real(kind=JPRB), intent(in), optional, CONTIGUOUS :: PSPECG(:,:)
integer(kind=JPIM), intent(in) :: KFDISTG
integer(kind=JPIM), intent(in) :: KFROM(:)
integer(kind=JPIM), intent(in) :: KVSET(:)
real(kind=JPRB), intent(out), optional, CONTIGUOUS :: PSPEC(:,:)
logical, intent(in) :: LDIM1_IS_FLD
integer(kind=JPIM), intent(in) :: KSMAX
integer(kind=JPIM), intent(in) :: KSPEC2
integer(kind=JPIM), intent(in) :: KSPEC2MX
integer(kind=JPIM), intent(in) :: KSPEC2G
integer(kind=JPIM), intent(in) :: KPOSSP(NPRTRW+1)
integer(kind=JPIM), intent(in) :: KDIM0G(0:)
integer(kind=JPIM), intent(in) :: KUMPP(NPRTRW)
integer(kind=JPIM), intent(in) :: KALLMS(KSMAX+1)
integer(kind=JPIM), intent(in) :: KPTRMS(NPRTRW)
integer(kind=JPIM), intent(in) :: KN(0:KSMAX)
integer(kind=JPIM), intent(in), optional, TARGET :: KSORT(:)