INV_TRANS_CTLAD Subroutine

public subroutine INV_TRANS_CTLAD(KF_UV_G, KF_SCALARS_G, KF_GP, KF_FS, KF_OUT_LT, KF_UV, KF_SCALARS, KF_SCDERS, PSPVOR, PSPDIV, PSPSCALAR, KVSETUV, KVSETSC, PGP, PSPSC3A, PSPSC3B, PSPSC2, KVSETSC3A, KVSETSC3B, KVSETSC2, PGPUV, PGP3A, PGP3B, PGP2)

Uses

  • proc~~inv_trans_ctlad~~UsesGraph proc~inv_trans_ctlad INV_TRANS_CTLAD PARKIND1 PARKIND1 proc~inv_trans_ctlad->PARKIND1 module~field_split_mod~2 FIELD_SPLIT_MOD proc~inv_trans_ctlad->module~field_split_mod~2 module~ftinv_ctlad_mod FTINV_CTLAD_MOD proc~inv_trans_ctlad->module~ftinv_ctlad_mod module~ltinv_ctlad_mod LTINV_CTLAD_MOD proc~inv_trans_ctlad->module~ltinv_ctlad_mod module~shuffle_mod SHUFFLE_MOD proc~inv_trans_ctlad->module~shuffle_mod module~tpm_gen~2 TPM_GEN proc~inv_trans_ctlad->module~tpm_gen~2 module~tpm_trans~2 TPM_TRANS proc~inv_trans_ctlad->module~tpm_trans~2 module~parkind_ectrans PARKIND_ECTRANS module~tpm_gen~2->module~parkind_ectrans iso_c_binding iso_c_binding module~tpm_trans~2->iso_c_binding module~growing_allocator_mod GROWING_ALLOCATOR_MOD module~tpm_trans~2->module~growing_allocator_mod module~tpm_trans~2->module~parkind_ectrans module~growing_allocator_mod->iso_c_binding module~parkind_ectrans->PARKIND1

*** INV_TRANS_CTLAD - Control routine for inverse spectral transform adj.

  • Interface. ---------- CALL INV_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_OUT_LT
integer(kind=JPIM), intent(in) :: KF_UV
integer(kind=JPIM), intent(in) :: KF_SCALARS
integer(kind=JPIM), intent(in) :: KF_SCDERS
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~~inv_trans_ctlad~~CallsGraph proc~inv_trans_ctlad INV_TRANS_CTLAD proc~field_split FIELD_SPLIT proc~inv_trans_ctlad->proc~field_split proc~ftinv_ctlad FTINV_CTLAD proc~inv_trans_ctlad->proc~ftinv_ctlad proc~ltinv_ctlad LTINV_CTLAD proc~inv_trans_ctlad->proc~ltinv_ctlad proc~shuffle SHUFFLE proc~inv_trans_ctlad->proc~shuffle gstats gstats proc~ftinv_ctlad->gstats proc~abort_trans ABORT_TRANS proc~ftinv_ctlad->proc~abort_trans proc~fourier_inad FOURIER_INAD proc~ftinv_ctlad->proc~fourier_inad proc~fscad FSCAD proc~ftinv_ctlad->proc~fscad proc~ftinvad FTINVAD proc~ftinv_ctlad->proc~ftinvad proc~trgtol TRGTOL proc~ftinv_ctlad->proc~trgtol proc~ltinv_ctlad->gstats proc~ltinvad LTINVAD proc~ltinv_ctlad->proc~ltinvad proc~trltom TRLTOM proc~ltinv_ctlad->proc~trltom 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 EXEC_FFTW proc~ftinvad->proc~exec_fftw proc~asre1bad ASRE1BAD proc~ltinvad->proc~asre1bad proc~leinvad LEINVAD proc~ltinvad->proc~leinvad proc~prepsnm PREPSNM proc~ltinvad->proc~prepsnm proc~prfi1bad PRFI1BAD proc~ltinvad->proc~prfi1bad proc~spnsdead SPNSDEAD proc~ltinvad->proc~spnsdead proc~vdtuvad VDTUVAD proc~ltinvad->proc~vdtuvad dr_hook dr_hook proc~trgtol->dr_hook interface~assign_ptr ASSIGN_PTR 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 mpl_barrier mpl_barrier 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~get_allocation GET_ALLOCATION 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 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 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~leinvad->dr_hook interface~gemm GEMM proc~leinvad->interface~gemm proc~mult_butm MULT_BUTM proc~leinvad->proc~mult_butm 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 proc~mult_butm->abor1 proc~mult_butm->interface~gemm

Called by

proc~~inv_trans_ctlad~~CalledByGraph proc~inv_trans_ctlad INV_TRANS_CTLAD proc~inv_transad~2 INV_TRANSAD proc~inv_transad~2->proc~inv_trans_ctlad