DIR_TRANS_CTLAD Subroutine

public subroutine DIR_TRANS_CTLAD(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_ctlad~~UsesGraph proc~dir_trans_ctlad DIR_TRANS_CTLAD PARKIND1 PARKIND1 proc~dir_trans_ctlad->PARKIND1 module~field_split_mod~2 FIELD_SPLIT_MOD proc~dir_trans_ctlad->module~field_split_mod~2 module~ftdir_ctlad_mod FTDIR_CTLAD_MOD proc~dir_trans_ctlad->module~ftdir_ctlad_mod module~ltdir_ctlad_mod LTDIR_CTLAD_MOD proc~dir_trans_ctlad->module~ltdir_ctlad_mod module~shuffle_mod SHUFFLE_MOD proc~dir_trans_ctlad->module~shuffle_mod module~tpm_gen~2 TPM_GEN proc~dir_trans_ctlad->module~tpm_gen~2 module~parkind_ectrans PARKIND_ECTRANS module~tpm_gen~2->module~parkind_ectrans module~parkind_ectrans->PARKIND1

*** DIR_TRANS_CTLAD - Control routine for direct spectral transform-adj.

  • Interface. ---------- CALL DIR_TRANS_CTLAD(...)

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(inout), optional :: PSPVOR(:,:)
real(kind=JPRB), intent(inout), optional :: PSPDIV(:,:)
real(kind=JPRB), intent(inout), optional :: PSPSCALAR(:,:)
integer(kind=JPIM), intent(in), optional :: KVSETUV(:)
integer(kind=JPIM), intent(in), optional :: KVSETSC(:)
real(kind=JPRB), intent(out), optional :: PGP(:,:,:)
real(kind=JPRB), intent(inout), optional :: PSPSC3A(:,:,:)
real(kind=JPRB), intent(inout), optional :: PSPSC3B(:,:,:)
real(kind=JPRB), intent(inout), 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(out), optional :: PGPUV(:,:,:,:)
real(kind=JPRB), intent(out), optional :: PGP3A(:,:,:,:)
real(kind=JPRB), intent(out), optional :: PGP3B(:,:,:,:)
real(kind=JPRB), intent(out), optional :: PGP2(:,:,:)

Calls

proc~~dir_trans_ctlad~~CallsGraph proc~dir_trans_ctlad DIR_TRANS_CTLAD proc~field_split FIELD_SPLIT proc~dir_trans_ctlad->proc~field_split proc~ftdir_ctlad FTDIR_CTLAD proc~dir_trans_ctlad->proc~ftdir_ctlad proc~ltdir_ctlad LTDIR_CTLAD proc~dir_trans_ctlad->proc~ltdir_ctlad proc~shuffle SHUFFLE proc~dir_trans_ctlad->proc~shuffle gstats gstats proc~ftdir_ctlad->gstats proc~fourier_outad FOURIER_OUTAD proc~ftdir_ctlad->proc~fourier_outad proc~ftdirad FTDIRAD proc~ftdir_ctlad->proc~ftdirad proc~trltog TRLTOG proc~ftdir_ctlad->proc~trltog proc~ltdir_ctlad->gstats proc~ltdirad LTDIRAD proc~ltdir_ctlad->proc~ltdirad proc~trmtol TRMTOL proc~ltdir_ctlad->proc~trmtol proc~exec_fftw EXEC_FFTW proc~ftdirad->proc~exec_fftw proc~ldfou2ad LDFOU2AD proc~ltdirad->proc~ldfou2ad proc~ledirad LEDIRAD proc~ltdirad->proc~ledirad proc~prepsnm PREPSNM proc~ltdirad->proc~prepsnm proc~prfi2ad PRFI2AD proc~ltdirad->proc~prfi2ad proc~updspad UPDSPAD proc~ltdirad->proc~updspad proc~uvtvdad UVTVDAD proc~ltdirad->proc~uvtvdad dr_hook dr_hook proc~trltog->dr_hook interface~assign_ptr ASSIGN_PTR proc~trltog->interface~assign_ptr interface~ext_acc_pass ext_acc_pass proc~trltog->interface~ext_acc_pass mpi_irecv mpi_irecv proc~trltog->mpi_irecv mpi_isend mpi_isend proc~trltog->mpi_isend mpl_barrier mpl_barrier proc~trltog->mpl_barrier mpl_comm_oml mpl_comm_oml proc~trltog->mpl_comm_oml mpl_wait mpl_wait proc~trltog->mpl_wait oml_my_thread oml_my_thread proc~trltog->oml_my_thread proc~abort_trans ABORT_TRANS proc~trltog->proc~abort_trans proc~ext_acc_create ext_acc_create proc~trltog->proc~ext_acc_create proc~ext_acc_delete ext_acc_delete proc~trltog->proc~ext_acc_delete proc~get_allocation GET_ALLOCATION proc~trltog->proc~get_allocation proc~gstats_nvtx GSTATS_NVTX proc~trltog->proc~gstats_nvtx proc~pe2set PE2SET proc~trltog->proc~pe2set proc~trmtol->dr_hook proc~trmtol->interface~assign_ptr mpi_alltoallv mpi_alltoallv proc~trmtol->mpi_alltoallv proc~trmtol->mpl_barrier mpl_myrank mpl_myrank proc~trmtol->mpl_myrank proc~trmtol->proc~get_allocation proc~trmtol->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_fftw->dr_hook abor1 abor1 proc~exec_fftw->abor1 dfftw_execute_dft_c2r dfftw_execute_dft_c2r proc~exec_fftw->dfftw_execute_dft_c2r dfftw_execute_dft_r2c dfftw_execute_dft_r2c proc~exec_fftw->dfftw_execute_dft_r2c fftw_alloc_complex fftw_alloc_complex proc~exec_fftw->fftw_alloc_complex fftw_free fftw_free proc~exec_fftw->fftw_free fftwf_alloc_complex fftwf_alloc_complex proc~exec_fftw->fftwf_alloc_complex fftwf_free fftwf_free proc~exec_fftw->fftwf_free proc~create_plan_fftw CREATE_PLAN_FFTW proc~exec_fftw->proc~create_plan_fftw sfftw_execute_dft_c2r sfftw_execute_dft_c2r proc~exec_fftw->sfftw_execute_dft_c2r sfftw_execute_dft_r2c sfftw_execute_dft_r2c proc~exec_fftw->sfftw_execute_dft_r2c acc_create acc_create proc~ext_acc_create->acc_create acc_delete acc_delete proc~ext_acc_delete->acc_delete proc~get_allocation->proc~abort_trans proc~ledirad->dr_hook interface~gemm GEMM proc~ledirad->interface~gemm proc~mult_butm MULT_BUTM proc~ledirad->proc~mult_butm proc~pe2set->proc~abort_trans proc~prfi2bad PRFI2BAD proc~prfi2ad->proc~prfi2bad proc~updspbad UPDSPBAD proc~updspad->proc~updspbad 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 proc~mult_butm->abor1 proc~mult_butm->interface~gemm

Called by

proc~~dir_trans_ctlad~~CalledByGraph proc~dir_trans_ctlad DIR_TRANS_CTLAD proc~dir_transad~2 DIR_TRANSAD proc~dir_transad~2->proc~dir_trans_ctlad