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~eftdir_ctl_mod EFTDIR_CTL_MOD proc~edir_trans_ctl->module~eftdir_ctl_mod module~eltdir_ctl_mod ELTDIR_CTL_MOD proc~edir_trans_ctl->module~eltdir_ctl_mod module~field_split_mod FIELD_SPLIT_MOD proc~edir_trans_ctl->module~field_split_mod module~shuffle_mod SHUFFLE_MOD proc~edir_trans_ctl->module~shuffle_mod module~tpm_gen TPM_GEN proc~edir_trans_ctl->module~tpm_gen EC_PARKIND EC_PARKIND module~tpm_gen->EC_PARKIND

*** 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 proc~eftdir_ctl EFTDIR_CTL proc~edir_trans_ctl->proc~eftdir_ctl proc~eltdir_ctl ELTDIR_CTL proc~edir_trans_ctl->proc~eltdir_ctl proc~field_split FIELD_SPLIT proc~edir_trans_ctl->proc~field_split proc~shuffle SHUFFLE proc~edir_trans_ctl->proc~shuffle proc~eftdir_ctl->dr_hook foubuf_in foubuf_in proc~eftdir_ctl->foubuf_in gstats gstats proc~eftdir_ctl->gstats proc~extper EXTPER proc~eftdir_ctl->proc~extper proc~fourier_out FOURIER_OUT proc~eftdir_ctl->proc~fourier_out proc~ftdir FTDIR proc~eftdir_ctl->proc~ftdir proc~trgtol TRGTOL proc~eftdir_ctl->proc~trgtol proc~eltdir_ctl->dr_hook foubuf foubuf proc~eltdir_ctl->foubuf proc~eltdir_ctl->gstats proc~eltdir ELTDIR proc~eltdir_ctl->proc~eltdir proc~euvtvd_comm EUVTVD_COMM proc~eltdir_ctl->proc~euvtvd_comm proc~trltom TRLTOM proc~eltdir_ctl->proc~trltom proc~eltdir->dr_hook proc~eltdir->proc~euvtvd_comm interface~assign_ptr ASSIGN_PTR 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~get_allocation GET_ALLOCATION proc~eltdir->proc~get_allocation proc~euvtvd_comm->dr_hook mpl_recv mpl_recv proc~euvtvd_comm->mpl_recv mpl_send mpl_send proc~euvtvd_comm->mpl_send proc~abort_trans ABORT_TRANS proc~euvtvd_comm->proc~abort_trans proc~set2pe SET2PE proc~euvtvd_comm->proc~set2pe proc~extper->dr_hook abor1 abor1 proc~extper->abor1 proc~fourier_out->foubuf_in proc~ftdir->interface~assign_ptr interface~execute_dir_fft EXECUTE_DIR_FFT proc~ftdir->interface~execute_dir_fft mpl_barrier mpl_barrier proc~ftdir->mpl_barrier proc~ftdir->proc~get_allocation proc~gstats_nvtx GSTATS_NVTX proc~ftdir->proc~gstats_nvtx proc~trgtol->dr_hook proc~trgtol->gstats gstats_barrier gstats_barrier proc~trgtol->gstats_barrier gstats_barrier2 gstats_barrier2 proc~trgtol->gstats_barrier2 proc~trgtol->mpl_barrier proc~trgtol->mpl_recv proc~trgtol->mpl_send mpl_wait mpl_wait proc~trgtol->mpl_wait mpl_waitany mpl_waitany proc~trgtol->mpl_waitany proc~allocate_buffers_cst ALLOCATE_BUFFERS_CST proc~trgtol->proc~allocate_buffers_cst proc~allocate_buffers_sr ALLOCATE_BUFFERS_SR proc~trgtol->proc~allocate_buffers_sr proc~tgrl_copy_pglat TGRL_COPY_PGLAT proc~trgtol->proc~tgrl_copy_pglat proc~tgrl_copy_zcombuf TGRL_COPY_ZCOMBUF proc~trgtol->proc~tgrl_copy_zcombuf proc~tgrl_init_packing_vars TGRL_INIT_PACKING_VARS proc~trgtol->proc~tgrl_init_packing_vars proc~trgl_allocate_heap_buffer TRGL_ALLOCATE_HEAP_BUFFER proc~trgtol->proc~trgl_allocate_heap_buffer proc~trgl_allocate_vars TRGL_ALLOCATE_VARS proc~trgtol->proc~trgl_allocate_vars proc~trgl_init_off_vars TRGL_INIT_OFF_VARS proc~trgtol->proc~trgl_init_off_vars proc~trgl_init_vars TRGL_INIT_VARS proc~trgtol->proc~trgl_init_vars proc~trgl_prolog TRGL_PROLOG proc~trgtol->proc~trgl_prolog proc~trltom->dr_hook proc~trltom->interface~assign_ptr mpl_alltoallv mpl_alltoallv proc~trltom->mpl_alltoallv 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 mpl_abort mpl_abort proc~abort_trans->mpl_abort sdl_srlabort sdl_srlabort proc~abort_trans->sdl_srlabort sdl_traceback sdl_traceback proc~abort_trans->sdl_traceback proc~exec_efftw EXEC_EFFTW proc~eledir->proc~exec_efftw proc~eprfi2b->dr_hook proc~eprfi2b->foubuf proc~eupdsp->dr_hook proc~eupdspb EUPDSPB proc~eupdsp->proc~eupdspb proc~euvtvd->dr_hook proc~get_allocation->proc~abort_trans proc~gstats_nvtx->gstats proc~set2pe->abor1 proc~set2pe->proc~abort_trans proc~tgrl_copy_pglat->proc~abort_trans proc~trgl_allocate_heap_buffer->proc~abort_trans proc~inigptr INIGPTR proc~trgl_prolog->proc~inigptr proc~pe2set PE2SET proc~trgl_prolog->proc~pe2set proc~eupdspb->dr_hook proc~exec_efftw->dr_hook proc~exec_efftw->abor1 dfftw_execute_dft_c2r dfftw_execute_dft_c2r proc~exec_efftw->dfftw_execute_dft_c2r dfftw_execute_dft_r2c dfftw_execute_dft_r2c proc~exec_efftw->dfftw_execute_dft_r2c fftw_alloc_complex fftw_alloc_complex proc~exec_efftw->fftw_alloc_complex fftw_free fftw_free proc~exec_efftw->fftw_free fftwf_alloc_complex fftwf_alloc_complex proc~exec_efftw->fftwf_alloc_complex fftwf_free fftwf_free proc~exec_efftw->fftwf_free proc~create_plan_fftw CREATE_PLAN_FFTW proc~exec_efftw->proc~create_plan_fftw sfftw_execute_dft_c2r sfftw_execute_dft_c2r proc~exec_efftw->sfftw_execute_dft_c2r sfftw_execute_dft_r2c sfftw_execute_dft_r2c proc~exec_efftw->sfftw_execute_dft_r2c proc~inigptr->proc~abort_trans proc~pe2set->proc~abort_trans proc~create_plan_fftw->dr_hook proc~create_plan_fftw->abor1 proc~create_plan_fftw->fftw_alloc_complex proc~create_plan_fftw->fftw_free proc~create_plan_fftw->fftwf_alloc_complex proc~create_plan_fftw->fftwf_free dfftw_destroy_plan dfftw_destroy_plan proc~create_plan_fftw->dfftw_destroy_plan dfftw_plan_many_dft_c2r dfftw_plan_many_dft_c2r proc~create_plan_fftw->dfftw_plan_many_dft_c2r dfftw_plan_many_dft_r2c dfftw_plan_many_dft_r2c proc~create_plan_fftw->dfftw_plan_many_dft_r2c sfftw_destroy_plan sfftw_destroy_plan proc~create_plan_fftw->sfftw_destroy_plan sfftw_plan_many_dft_c2r sfftw_plan_many_dft_c2r proc~create_plan_fftw->sfftw_plan_many_dft_c2r sfftw_plan_many_dft_r2c sfftw_plan_many_dft_r2c proc~create_plan_fftw->sfftw_plan_many_dft_r2c

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