EDIR_TRANS_CTL Subroutine

public subroutine EDIR_TRANS_CTL(KF_UV_G, KF_SCALARS_G, KF_GP, KF_FS, KF_UV, KF_SCALARS, PSPVOR, PSPDIV, PSPSCALAR, KVSETUV, KVSETSC, PGP, PSPSC3A, PSPSC3B, PSPSC2, KVSETSC3A, KVSETSC3B, KVSETSC2, PGPUV, PGP3A, PGP3B, PGP2, PMEANU, PMEANV, AUX_PROC)

Uses

  • proc~~edir_trans_ctl~~UsesGraph proc~edir_trans_ctl EDIR_TRANS_CTL PARKIND1 PARKIND1 proc~edir_trans_ctl->PARKIND1 YOMHOOK YOMHOOK proc~edir_trans_ctl->YOMHOOK module~buffered_allocator_mod BUFFERED_ALLOCATOR_MOD proc~edir_trans_ctl->module~buffered_allocator_mod module~eftdir_mod EFTDIR_MOD proc~edir_trans_ctl->module~eftdir_mod module~eltdir_mod~2 ELTDIR_MOD proc~edir_trans_ctl->module~eltdir_mod~2 module~ftdir_mod FTDIR_MOD proc~edir_trans_ctl->module~ftdir_mod module~tpm_gen TPM_GEN proc~edir_trans_ctl->module~tpm_gen module~tpm_trans~2 TPM_TRANS proc~edir_trans_ctl->module~tpm_trans~2 module~trgtol_mod TRGTOL_MOD proc~edir_trans_ctl->module~trgtol_mod module~trltom_mod~2 TRLTOM_MOD proc~edir_trans_ctl->module~trltom_mod~2 module~trltom_pack_unpack TRLTOM_PACK_UNPACK proc~edir_trans_ctl->module~trltom_pack_unpack EC_PARKIND EC_PARKIND module~buffered_allocator_mod->EC_PARKIND iso_c_binding iso_c_binding module~buffered_allocator_mod->iso_c_binding module~abort_trans_mod ABORT_TRANS_MOD module~buffered_allocator_mod->module~abort_trans_mod module~growing_allocator_mod GROWING_ALLOCATOR_MOD module~buffered_allocator_mod->module~growing_allocator_mod module~eltdir_mod~2->module~buffered_allocator_mod module~tpm_gen->EC_PARKIND module~tpm_trans~2->module~growing_allocator_mod module~parkind_ectrans PARKIND_ECTRANS module~tpm_trans~2->module~parkind_ectrans module~trgtol_mod->module~buffered_allocator_mod module~trltom_mod~2->module~buffered_allocator_mod module~trltom_pack_unpack->module~buffered_allocator_mod module~trltom_pack_unpack->module~parkind_ectrans module~growing_allocator_mod->iso_c_binding module~parkind_ectrans->PARKIND1

*** EDIR_TRANS_CTL - Control routine for direct spectral transform.

  • Interface. ---------- CALL EDIR_TRANS_CTL(...)

Arguments

Type IntentOptional Attributes Name
integer(kind=JPIM), intent(in) :: KF_UV_G
integer(kind=JPIM), intent(in) :: KF_SCALARS_G
integer(kind=JPIM), intent(in) :: KF_GP
integer(kind=JPIM), intent(in) :: KF_FS
integer(kind=JPIM), intent(in) :: KF_UV
integer(kind=JPIM), intent(in) :: KF_SCALARS
real(kind=JPRB), intent(out), optional :: PSPVOR(:,:)
real(kind=JPRB), intent(out), optional :: PSPDIV(:,:)
real(kind=JPRB), intent(out), optional :: PSPSCALAR(:,:)
integer(kind=JPIM), intent(in), optional :: KVSETUV(:)
integer(kind=JPIM), intent(in), optional :: KVSETSC(:)
real(kind=JPRB), intent(in), optional :: PGP(:,:,:)
real(kind=JPRB), intent(out), optional :: PSPSC3A(:,:,:)
real(kind=JPRB), intent(out), optional :: PSPSC3B(:,:,:)
real(kind=JPRB), intent(out), optional :: PSPSC2(:,:)
integer(kind=JPIM), intent(in), optional :: KVSETSC3A(:)
integer(kind=JPIM), intent(in), optional :: KVSETSC3B(:)
integer(kind=JPIM), intent(in), optional :: KVSETSC2(:)
real(kind=JPRB), intent(in), optional :: PGPUV(:,:,:,:)
real(kind=JPRB), intent(in), optional :: PGP3A(:,:,:,:)
real(kind=JPRB), intent(in), optional :: PGP3B(:,:,:,:)
real(kind=JPRB), intent(in), optional :: PGP2(:,:,:)
real(kind=JPRB), intent(out), optional :: PMEANU(:)
real(kind=JPRB), intent(out), optional :: PMEANV(:)
real :: AUX_PROC

Calls

proc~~edir_trans_ctl~~CallsGraph proc~edir_trans_ctl EDIR_TRANS_CTL dr_hook dr_hook proc~edir_trans_ctl->dr_hook gstats gstats proc~edir_trans_ctl->gstats prepare_ftdir prepare_ftdir proc~edir_trans_ctl->prepare_ftdir proc~eftdir EFTDIR proc~edir_trans_ctl->proc~eftdir proc~eltdir ELTDIR proc~edir_trans_ctl->proc~eltdir proc~instantiate_allocator INSTANTIATE_ALLOCATOR proc~edir_trans_ctl->proc~instantiate_allocator proc~make_buffered_allocator MAKE_BUFFERED_ALLOCATOR proc~edir_trans_ctl->proc~make_buffered_allocator proc~prepare_eltdir PREPARE_ELTDIR proc~edir_trans_ctl->proc~prepare_eltdir proc~prepare_trgtol PREPARE_TRGTOL proc~edir_trans_ctl->proc~prepare_trgtol proc~prepare_trltom PREPARE_TRLTOM proc~edir_trans_ctl->proc~prepare_trltom proc~prepare_trltom_pack PREPARE_TRLTOM_PACK proc~edir_trans_ctl->proc~prepare_trltom_pack proc~trgtol TRGTOL proc~edir_trans_ctl->proc~trgtol proc~trltom TRLTOM proc~edir_trans_ctl->proc~trltom proc~trltom_pack TRLTOM_PACK proc~edir_trans_ctl->proc~trltom_pack proc~eftdir->dr_hook interface~assign_ptr ASSIGN_PTR proc~eftdir->interface~assign_ptr interface~execute_dir_fft EXECUTE_DIR_FFT proc~eftdir->interface~execute_dir_fft proc~get_allocation GET_ALLOCATION proc~eftdir->proc~get_allocation proc~eltdir->dr_hook proc~eltdir->interface~assign_ptr proc~eledir ELEDIR proc~eltdir->proc~eledir proc~eprfi2b EPRFI2B proc~eltdir->proc~eprfi2b proc~eupdsp EUPDSP proc~eltdir->proc~eupdsp proc~euvtvd EUVTVD proc~eltdir->proc~euvtvd proc~euvtvd_comm EUVTVD_COMM proc~eltdir->proc~euvtvd_comm proc~eltdir->proc~get_allocation proc~reallocate_growing_allocation REALLOCATE_GROWING_ALLOCATION proc~instantiate_allocator->proc~reallocate_growing_allocation proc~reserve RESERVE proc~prepare_eltdir->proc~reserve proc~prepare_trgtol->proc~reserve proc~prepare_trltom->proc~reserve proc~prepare_trltom_pack->proc~reserve proc~trgtol->dr_hook ext_acc_create ext_acc_create proc~trgtol->ext_acc_create ext_acc_delete ext_acc_delete proc~trgtol->ext_acc_delete ext_acc_pass ext_acc_pass proc~trgtol->ext_acc_pass proc~trgtol->interface~assign_ptr mpl_abort mpl_abort proc~trgtol->mpl_abort mpl_barrier mpl_barrier proc~trgtol->mpl_barrier mpl_wait mpl_wait proc~trgtol->mpl_wait proc~abort_trans ABORT_TRANS proc~trgtol->proc~abort_trans proc~trgtol->proc~get_allocation proc~gstats_nvtx GSTATS_NVTX proc~trgtol->proc~gstats_nvtx proc~pe2set PE2SET proc~trgtol->proc~pe2set proc~trltom->dr_hook proc~trltom->interface~assign_ptr proc~trltom->mpl_barrier mpl_myrank mpl_myrank proc~trltom->mpl_myrank proc~trltom->proc~abort_trans proc~trltom->proc~get_allocation proc~trltom->proc~gstats_nvtx proc~trltom_pack->interface~assign_ptr proc~trltom_pack->proc~get_allocation proc~abort_trans->mpl_abort sdl_srlabort sdl_srlabort proc~abort_trans->sdl_srlabort sdl_traceback sdl_traceback proc~abort_trans->sdl_traceback proc~eledir->dr_hook proc~eledir->interface~execute_dir_fft proc~eprfi2b->dr_hook proc~eupdsp->dr_hook proc~eupdspb EUPDSPB proc~eupdsp->proc~eupdspb proc~euvtvd->dr_hook proc~euvtvd_comm->dr_hook proc~euvtvd_comm->mpl_wait proc~euvtvd_comm->proc~abort_trans mpl_recv mpl_recv proc~euvtvd_comm->mpl_recv mpl_send mpl_send proc~euvtvd_comm->mpl_send proc~set2pe SET2PE proc~euvtvd_comm->proc~set2pe proc~get_allocation->proc~abort_trans proc~gstats_nvtx->gstats proc~pe2set->proc~abort_trans proc~destroy_growing_allocator DESTROY_GROWING_ALLOCATOR proc~reallocate_growing_allocation->proc~destroy_growing_allocator proc~eupdspb->dr_hook proc~set2pe->proc~abort_trans abor1 abor1 proc~set2pe->abor1

Called by

proc~~edir_trans_ctl~~CalledByGraph proc~edir_trans_ctl EDIR_TRANS_CTL proc~edir_trans EDIR_TRANS proc~edir_trans->proc~edir_trans_ctl proc~edir_trans~2 EDIR_TRANS proc~edir_trans~2->proc~edir_trans_ctl