DIR_TRANS_CTL Subroutine

public subroutine DIR_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)

Uses

  • proc~~dir_trans_ctl~2~~UsesGraph proc~dir_trans_ctl~2 DIR_TRANS_CTL PARKIND1 PARKIND1 proc~dir_trans_ctl~2->PARKIND1 module~field_split_mod~2 FIELD_SPLIT_MOD proc~dir_trans_ctl~2->module~field_split_mod~2 module~ftdir_ctl_mod FTDIR_CTL_MOD proc~dir_trans_ctl~2->module~ftdir_ctl_mod module~ltdir_ctl_mod LTDIR_CTL_MOD proc~dir_trans_ctl~2->module~ltdir_ctl_mod module~shuffle_mod SHUFFLE_MOD proc~dir_trans_ctl~2->module~shuffle_mod module~tpm_gen~2 TPM_GEN proc~dir_trans_ctl~2->module~tpm_gen~2 module~parkind_ectrans PARKIND_ECTRANS module~tpm_gen~2->module~parkind_ectrans module~parkind_ectrans->PARKIND1

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

  • Interface. ---------- CALL DIR_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(:,:,:)

Calls

proc~~dir_trans_ctl~2~~CallsGraph proc~dir_trans_ctl~2 DIR_TRANS_CTL proc~field_split FIELD_SPLIT proc~dir_trans_ctl~2->proc~field_split proc~ftdir_ctl FTDIR_CTL proc~dir_trans_ctl~2->proc~ftdir_ctl proc~ltdir_ctl LTDIR_CTL proc~dir_trans_ctl~2->proc~ltdir_ctl proc~shuffle SHUFFLE proc~dir_trans_ctl~2->proc~shuffle gstats gstats proc~ftdir_ctl->gstats proc~fourier_out FOURIER_OUT proc~ftdir_ctl->proc~fourier_out proc~ftdir FTDIR proc~ftdir_ctl->proc~ftdir proc~trgtol TRGTOL proc~ftdir_ctl->proc~trgtol proc~ltdir_ctl->gstats proc~ltdir LTDIR proc~ltdir_ctl->proc~ltdir proc~trltom TRLTOM proc~ltdir_ctl->proc~trltom d_nptrls d_nptrls proc~ftdir->d_nptrls d_nstagtf d_nstagtf proc~ftdir->d_nstagtf interface~execute_dir_fft EXECUTE_DIR_FFT proc~ftdir->interface~execute_dir_fft mpl_barrier mpl_barrier proc~ftdir->mpl_barrier proc~gstats_nvtx GSTATS_NVTX proc~ftdir->proc~gstats_nvtx dr_hook dr_hook proc~ltdir->dr_hook interface~assign_ptr ASSIGN_PTR proc~ltdir->interface~assign_ptr proc~ltdir->mpl_barrier proc~get_allocation GET_ALLOCATION proc~ltdir->proc~get_allocation proc~ltdir->proc~gstats_nvtx proc~ledir LEDIR proc~ltdir->proc~ledir proc~ledir_strides LEDIR_STRIDES proc~ltdir->proc~ledir_strides proc~updsp UPDSP proc~ltdir->proc~updsp proc~updspb UPDSPB proc~ltdir->proc~updspb proc~uvtvd UVTVD proc~ltdir->proc~uvtvd proc~trgtol->dr_hook proc~trgtol->interface~assign_ptr interface~ext_acc_pass ext_acc_pass proc~trgtol->interface~ext_acc_pass mpi_irecv mpi_irecv proc~trgtol->mpi_irecv mpi_isend mpi_isend proc~trgtol->mpi_isend proc~trgtol->mpl_barrier mpl_comm_oml mpl_comm_oml proc~trgtol->mpl_comm_oml mpl_wait mpl_wait proc~trgtol->mpl_wait oml_my_thread oml_my_thread proc~trgtol->oml_my_thread proc~ext_acc_create ext_acc_create proc~trgtol->proc~ext_acc_create proc~ext_acc_delete ext_acc_delete proc~trgtol->proc~ext_acc_delete proc~trgtol->proc~get_allocation proc~trgtol->proc~gstats_nvtx proc~pe2set PE2SET proc~trgtol->proc~pe2set proc~trltom->dr_hook proc~trltom->interface~assign_ptr mpi_alltoallv mpi_alltoallv proc~trltom->mpi_alltoallv proc~trltom->mpl_barrier mpl_myrank mpl_myrank proc~trltom->mpl_myrank proc~trltom->proc~get_allocation proc~trltom->proc~gstats_nvtx acc_create acc_create proc~ext_acc_create->acc_create acc_delete acc_delete proc~ext_acc_delete->acc_delete proc~abort_trans ABORT_TRANS proc~get_allocation->proc~abort_trans proc~ledir->dr_hook proc~ledir->mpl_barrier proc~ledir->proc~gstats_nvtx proc~ledir->proc~ledir_strides d_myms d_myms proc~ledir->d_myms d_offsets_gemm1 d_offsets_gemm1 proc~ledir->d_offsets_gemm1 d_offsets_gemm2 d_offsets_gemm2 proc~ledir->d_offsets_gemm2 proc~hip_dgemm_batched_overload HIP_DGEMM_BATCHED_OVERLOAD proc~ledir->proc~hip_dgemm_batched_overload proc~hip_dgemm_grouped_overload HIP_DGEMM_GROUPED_OVERLOAD proc~ledir->proc~hip_dgemm_grouped_overload proc~ledir_strides->d_offsets_gemm1 proc~ledir_strides->d_offsets_gemm2 proc~pe2set->proc~abort_trans proc~updsp->proc~updspb proc~uvtvd->d_myms 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 acc_get_hip_stream acc_get_hip_stream proc~hip_dgemm_batched_overload->acc_get_hip_stream interface~hip_dgemm_batched HIP_DGEMM_BATCHED proc~hip_dgemm_batched_overload->interface~hip_dgemm_batched proc~hip_dgemm_grouped_overload->acc_get_hip_stream interface~hip_dgemm_grouped HIP_DGEMM_GROUPED proc~hip_dgemm_grouped_overload->interface~hip_dgemm_grouped